--- DarthVader/CalorimeterLevel2/src/laterale.for	2006/05/19 13:15:50	1.1
+++ DarthVader/CalorimeterLevel2/src/laterale.for	2007/07/20 08:24:54	1.2
@@ -9,8 +9,8 @@
       INCLUDE 'INTEST.TXT'
 C
       INTEGER A,B, INPIA
-      INTEGER IBAR(2,NPLA)
-      REAL BAR(2,NPLA)
+      INTEGER IBAR(2,NPLAV)
+      REAL BAR(2,NPLAV)
       REAL RQT1, RQT2
       COMMON / ANGOLO / BAR, IBAR
       SAVE / ANGOLO /