--- DarthVader/CalorimeterLevel2/src/calol2tr.for	2006/05/19 13:15:50	1.1
+++ DarthVader/CalorimeterLevel2/src/calol2tr.for	2006/05/30 14:57:59	1.2
@@ -559,10 +559,14 @@
       DO J = NPLA-4,NPLA
          NNX = IBAR(1,J)
          IF (NNX.NE.-1) THEN
-            IF (NNX.LT.9) NNX = 9
-            IF (NNX.GT.88) NNX = 88
-            INFX = NNX - 8
-            ISUPX = NNX + 8
+            IF (NNX.LT.5) NNX = 5
+            IF (NNX.GT.92) NNX = 92
+c            IF (NNX.LT.9) NNX = 9
+c            IF (NNX.GT.88) NNX = 88
+            INFX = NNX - 4
+            ISUPX = NNX + 4
+c            INFX = NNX - 8
+c            ISUPX = NNX + 8
             DO I = INFX,ISUPX
                IF (DEXY(1,J,I).GE.EMIN) THEN
                   NLAST = NLAST + 1
@@ -573,10 +577,14 @@
 C
          NNY = IBAR(2,J)
          IF (NNY.NE.-1) THEN
-            IF (NNY.LT.9) NNY = 9
-            IF (NNY.GT.88) NNY = 88
-            INFY = NNY - 8
-            ISUPY = NNY + 8
+            IF (NNY.LT.5) NNY = 5
+            IF (NNY.GT.92) NNY = 92
+c            IF (NNY.LT.9) NNY = 9
+c            IF (NNY.GT.88) NNY = 88
+            INFY = NNY - 4
+            ISUPY = NNY + 4
+c            INFY = NNY - 8
+c            ISUPY = NNY + 8
             DO I=INFY,ISUPY
                IF (DEXY(2,J,I).GE.EMIN) THEN
                   NLAST = NLAST + 1