/[PAMELA software]/DarthVader/TrackerLevel2/inc/F77/common_mini_2.f
ViewVC logotype

Diff of /DarthVader/TrackerLevel2/inc/F77/common_mini_2.f

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

revision 1.4 by pam-fi, Mon Feb 19 16:28:39 2007 UTC revision 1.5 by pam-fi, Wed Mar 28 09:05:08 2007 UTC
# Line 55  c     REAL*8 DEDXTRK            !(1) Line 55  c     REAL*8 DEDXTRK            !(1)
55        REAL*8 XV,YV,ZV        REAL*8 XV,YV,ZV
56        REAL*8 AXV,AYV        REAL*8 AXV,AYV
57        REAL*8 COV        REAL*8 COV
58          REAL*8 FACT
59        INTEGER NSTEP        INTEGER NSTEP
60        INTEGER IDCAND            !(2)        INTEGER IDCAND            !(2)
61        INTEGER TRACKMODE        INTEGER TRACKMODE
62          INTEGER ISTEPMIN
63        COMMON/TRACK/        COMMON/TRACK/
64       $      AL(5)                                      !track parameters       $      AL(5)                                      !track parameters
65       $     ,XM(NPLANES),YM(NPLANES),ZM(NPLANES)        !couple    => xyz point       $     ,XM(NPLANES),YM(NPLANES),ZM(NPLANES)        !couple    => xyz point
# Line 73  c     $     ,DEDXTRK(NPLANES)           Line 75  c     $     ,DEDXTRK(NPLANES)          
75       $     ,XV(NPLANES),YV(NPLANES),ZV(NPLANES)       $     ,XV(NPLANES),YV(NPLANES),ZV(NPLANES)
76       $     ,AXV(NPLANES),AYV(NPLANES)       $     ,AXV(NPLANES),AYV(NPLANES)
77       $     ,COV(5,5)       $     ,COV(5,5)
78         $     ,FACT                ! factor scale for tracking precision
79       $     ,NSTEP       $     ,NSTEP
80       $     ,IDCAND              !(2) track-candidate ID (to relate some level1 info)       $     ,IDCAND              !(2) track-candidate ID (to relate some level1 info)
81       $     ,TRACKMODE           ! tracking mode, 0=normal, 1=with bremsstrahlung       $     ,TRACKMODE           ! tracking mode, 0=normal, 1=with bremsstrahlung
82         $     ,ISTEPMIN            ! minimum number of step during tracking
83  c******************************************************  c******************************************************
84  cccccc 06/10/2005 modified by elena vannuccini ---> (1)  cccccc 06/10/2005 modified by elena vannuccini ---> (1)
85  cccccc 17/08/2006 modified by elena vannuccini ---> (2)  cccccc 17/08/2006 modified by elena vannuccini ---> (2)
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.23