--- DarthVader/CalorimeterLevel2/src/nuclei.for	2007/07/20 08:24:55	1.2
+++ DarthVader/CalorimeterLevel2/src/nuclei.for	2007/11/29 14:20:33	1.3
@@ -68,17 +68,18 @@
         RPIANO(M) = 0.
 C
         DO J = 1,NPLA
+C
            IF (MOD(J,2).EQ.0) THEN
               IF (REVERSE.EQ.0) THEN
-                 SHIFT = -0.5
-              ELSE
                  SHIFT = +0.5
+              ELSE
+                 SHIFT = -0.5
               ENDIF
            ELSE
               IF (REVERSE.EQ.0) THEN
-                 SHIFT = +0.5
-              ELSE
                  SHIFT = -0.5
+              ELSE
+                 SHIFT = +0.5
               ENDIF
            ENDIF
 C