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

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

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

revision 1.2 by mocchiut, Fri Jul 20 08:24:53 2007 UTC revision 1.3 by mocchiut, Thu Nov 29 14:20:31 2007 UTC
# Line 75  C Line 75  C
75            IA = MSTR + 1            IA = MSTR + 1
76  C  C
77            NN = 0            NN = 0
78            IF (M.EQ.2) NN = 1  c          IF (N.EQ.2) NN = 1
79            IF (MOD(I,2).EQ.NN) THEN            IF (MOD(J,2).EQ.NN) THEN
80               IF (REVERSE.EQ.0) THEN               IF (REVERSE.EQ.0) THEN
81                  SHIFT = +0.5                  SHIFT = +0.5
82               ELSE               ELSE
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.23