--- calo/ground/LEVEL2/src/crcalol2.for	2005/12/21 16:38:07	1.2
+++ calo/ground/LEVEL2/src/crcalol2.for	2006/01/13 09:50:11	1.3
@@ -140,8 +140,12 @@
       DISTX = 0.
       DISTY = 0.
 C
+C      print *,'trigty = ',trigty
+C
       DO I = 1,22
          DO J = 1,96
+C            print *,' i ',i,' j ',j,' x ',ESTRIP(1,I,J)
+C            print *,' i ',i,' j ',j,' y ',ESTRIP(2,I,J)
             IF ( MOD(I,2).NE.0 ) THEN
                IF ( ESTRIP(2,I,J).GT.EMIN ) THEN
                   DEXY(2,I,J) = ESTRIP(2,I,J)