/[PAMELA software]/DarthVader/CalorimeterLevel2/inc/INTEST.TXT
ViewVC logotype

Diff of /DarthVader/CalorimeterLevel2/inc/INTEST.TXT

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

revision 1.1 by mocchiut, Fri May 19 13:15:49 2006 UTC revision 1.5 by mocchiut, Fri Jul 20 08:24:51 2007 UTC
# Line 1  Line 1 
1        INTEGER NPLA, NCHA, LENSEV        INTEGER NPLAV, NCHA, LENSEV
2        PARAMETER (NPLA=22,NCHA=96,LENSEV=NPLA*NCHA)        PARAMETER (NPLAV=22,NCHA=96,LENSEV=NPLAV*NCHA)
3        REAL ADIST, AA        REAL ADIST, AA
4        PARAMETER( ADIST=80.5,AA=0.96)        PARAMETER( ADIST=80.5,AA=0.96)
5  c      REAL PIANO(22)        REAL DEXY(2,NPLAV,NCHA)
6  C      PARAMETER (PIANO=8.59)        REAL CLUS(2,NPLAV,NCHA)
7        REAL DEXY(2,NPLA,NCHA)        INTEGER NCL(2,NPLAV)
       REAL CLUS(2,NPLA,NCHA)  
       INTEGER NCL(2,NPLA)  
8        REAL CLUS2(2,2,NCHA)        REAL CLUS2(2,2,NCHA)
9        INTEGER NCL2(2,2)        INTEGER NCL2(2,2)
10        INTEGER SELFTRIGGER        INTEGER SELFTRIGGER
11          INTEGER FMODE(2)
12  C  C
 c      integer obt,pkt_num,pro_num  
13        real nstrip, qtot, ncore, qcore, impx, impy, tanx, tany        real nstrip, qtot, ncore, qcore, impx, impy, tanx, tany
14        real noint, trigty        real noint, trigty, wartrig
15        REAL ncyl, qcyl, qtrack, qmax, nx22, qx22        REAL ncyl, qcyl, qtrack, qmax, nx22, qx22
16        real qq(4)        real qq(4)
17        REAL QTRACKX, QTRACKY, DXTRACK, DYTRACK, QLAST, NLAST, QPRE, NPRE        REAL QTRACKX, QTRACKY, DXTRACK, DYTRACK, QLAST, NLAST, QPRE, NPRE
18        REAL QPRESH,NPRESH,QLOW,NLOW,QTR,NTR        REAL QPRESH,NPRESH,QLOW,NLOW,QTR,NTR
19        INTEGER CIBAR(2,NPLA)        INTEGER CIBAR(2,NPLAV)
20        INTEGER TIBAR(2,NPLA)        INTEGER TIBAR(2,NPLAV)
21        REAL CBAR(2,NPLA)        REAL CBAR(2,NPLAV)
22        REAL TBAR(2,NPLA)        REAL TBAR(2,NPLAV)
23        REAL PLANETOT, QMEAN        REAL PLANETOT, QMEAN
24        REAL VARCFIT(2)        REAL VARCFIT(2)
25        REAL ELEN, SELEN        REAL ELEN, SELEN
26        INTEGER NPCFIT(2), PLANEMAX(2)        INTEGER NPCFIT(2), PLANEMAX(2)
27  C  C
 C             logical perr(4), swerr(4), crc(4),good  
28        integer perr, swerr, crc,good        integer perr, swerr, crc,good
29  c  c
30        double precision al_pp(2,5)        double precision al_pp(2,5)
31        INTEGER good2, trkchi2        INTEGER good2, trkchi2
32        REAL estrip(2,22,96), emin        REAL estrip(2,22,96), emin
33        real zalig, xalig, yalig        real zalig, xalig, yalig
34        REAL DX0L        REAL DX0L, RIGINPUT
35          INTEGER HZN
36    C
37          INTEGER NPLA, REVERSE
38  C  C
39        COMMON / clevel1 / al_pp,estrip, good2,        COMMON / clevel1 / al_pp,estrip, good2,
40       &     trkchi2, xalig, yalig, zalig, emin       &     trkchi2, xalig, yalig, zalig, emin,
41         &     riginput,hzn,NPLA,REVERSE
42        SAVE / clevel1 /        SAVE / clevel1 /
43  C  C
44        COMMON / clevel2 / trigty,good,perr(4)        COMMON / clevel2 / fmode,wartrig,trigty,good,perr(4)
45       &     ,swerr(4),crc(4),selftrigger,       &     ,swerr(4),crc(4),selftrigger,
46       &     nstrip, qtot, ncore, qcore, impx, impy,       &     nstrip, qtot, ncore, qcore, impx, impy,
47       &     tanx, tany, noint, ncyl, qcyl, qtrack, qmax, nx22,       &     tanx, tany, noint, ncyl, qcyl, qtrack, qmax, nx22,
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.23