| 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 |
| 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 |
| 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 |
| 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) |