| 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 |
| 39 |
C |
C |
| 40 |
REAL CLUS4(2,4,NCHA) |
REAL CLUS4(2,4,NCHA) |
| 41 |
INTEGER NCL4(2,4) |
INTEGER NCL4(2,4) |
| 42 |
|
INTEGER SELFDELAY(7,4) |
| 43 |
C |
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, |
| 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 |