22 |
REAL TBAR(2,NPLAV) |
REAL TBAR(2,NPLAV) |
23 |
REAL PLANETOT, QMEAN |
REAL PLANETOT, QMEAN |
24 |
REAL VARCFIT(2) |
REAL VARCFIT(2) |
25 |
|
REAL NSATSTRIP |
26 |
REAL ELEN, SELEN |
REAL ELEN, SELEN |
27 |
INTEGER NPCFIT(2), PLANEMAX(2) |
INTEGER NPCFIT(2), PLANEMAX(2) |
28 |
C |
C |
37 |
C |
C |
38 |
INTEGER NPLA, REVERSE |
INTEGER NPLA, REVERSE |
39 |
C |
C |
40 |
|
REAL CLUS4(2,4,NCHA) |
41 |
|
INTEGER NCL4(2,4) |
42 |
|
INTEGER SELFDELAY(7,4) |
43 |
|
C |
44 |
COMMON / clevel1 / al_pp,estrip, good2, |
COMMON / clevel1 / al_pp,estrip, good2, |
45 |
& trkchi2, xalig, yalig, zalig, emin, |
& trkchi2, xalig, yalig, zalig, emin, |
46 |
& riginput,hzn,NPLA,REVERSE |
& riginput,hzn,NPLA,REVERSE |
48 |
C |
C |
49 |
COMMON / clevel2 / fmode,wartrig,trigty,good,perr(4) |
COMMON / clevel2 / fmode,wartrig,trigty,good,perr(4) |
50 |
& ,swerr(4),crc(4),selftrigger, |
& ,swerr(4),crc(4),selftrigger, |
51 |
& nstrip, qtot, ncore, qcore, impx, impy, |
& nstrip, nsatstrip, qtot, ncore, qcore, impx, impy, |
52 |
& tanx, tany, noint, ncyl, qcyl, qtrack, qmax, nx22, |
& tanx, tany, noint, ncyl, qcyl, qtrack, qmax, nx22, |
53 |
& qx22, qq, qtrackx, qtracky, dxtrack, dytrack, qlast, nlast, |
& qx22, qq, qtrackx, qtracky, dxtrack, dytrack, qlast, nlast, |
54 |
& qpre, npre, qpresh, npresh, qlow, nlow, qtr, ntr, |
& qpre, npre, qpresh, npresh, qlow, nlow, qtr, ntr, |
55 |
& planetot, qmean, PLANEMAX, DX0L, varcfit, npcfit, |
& planetot, qmean, PLANEMAX, DX0L, varcfit, npcfit, |
56 |
$ cibar, tibar, |
$ cibar, tibar, |
57 |
$ cbar, tbar, |
$ cbar, tbar, |
58 |
$ ELEN, SELEN |
$ ELEN, SELEN, selfdelay |
59 |
SAVE / clevel2 / |
SAVE / clevel2 / |
60 |
C |
C |
61 |
COMMON / EVENTI / DEXY |
COMMON / EVENTI / DEXY |
66 |
C |
C |
67 |
COMMON / GRUPPO2 / CLUS2, NCL2 |
COMMON / GRUPPO2 / CLUS2, NCL2 |
68 |
SAVE / GRUPPO2 / |
SAVE / GRUPPO2 / |
69 |
|
|
70 |
|
C |
71 |
|
COMMON / GRUPPO4 / CLUS4,NCL4 |
72 |
|
SAVE / GRUPPO4 / |