/[PAMELA software]/DarthVader/CalorimeterLevel2/src/calol2cm.for
ViewVC logotype

Diff of /DarthVader/CalorimeterLevel2/src/calol2cm.for

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5 by mocchiut, Mon Jan 22 09:17:00 2007 UTC revision 1.6 by mocchiut, Mon Mar 26 14:02:07 2007 UTC
# Line 177  C Line 177  C
177  C                C              
178                 DO I = 1,NPLA                     DO I = 1,NPLA    
179                    NN = 0                    NN = 0
180  C????                  IF (M.EQ.2) NN = 1                    IF (M.EQ.2) NN = 1
181                    IF (MOD(I,2).EQ.NN) THEN                    IF (MOD(I,2).EQ.NN) THEN
182                       SHIFT = +0.5                       SHIFT = +0.5
183                    ELSE                    ELSE
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.23