--- DarthVader/CalorimeterLevel2/src/laterale.for	2008/04/10 11:41:48	1.3
+++ DarthVader/CalorimeterLevel2/src/laterale.for	2009/08/04 14:01:20	1.5
@@ -49,6 +49,7 @@
             ENDDO
          ENDIF
 C
+c         print *,' I ',I,' A ',RQT1
  600     CONTINUE
 C
          B = IBAR(2,I)
@@ -63,6 +64,7 @@
          IF (B.GE.NCHA) B = NCHA - 1
          DO J = B-1,B+1
             IF (DEXY(2,I,J).GE.EMIN) RQT1 = RQT1 + DEXY(2,I,J)
+c            print *,' ==> J ',j,' dexy ',DEXY(2,I,J)
          ENDDO
 C     
          IF ((B-2).GE.1) THEN
@@ -79,10 +81,12 @@
             ENDDO
          ENDIF
 C
+c         print *,' I ',I,' B ',RQT1
  700     CONTINUE
       ENDDO
 C     
 C
- 800  RETURN
+c 800  RETURN
+      RETURN
       END