/[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.4 by mocchiut, Mon Jan 22 09:16:56 2007 UTC revision 1.6 by mocchiut, Fri Aug 10 08:01:23 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)        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, wartrig        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)
# Line 38  c Line 34  c
34        REAL DX0L, RIGINPUT        REAL DX0L, RIGINPUT
35        INTEGER HZN        INTEGER HZN
36  C  C
37          INTEGER NPLA, REVERSE
38    C
39          REAL CLUS4(2,4,NCHA)
40          INTEGER NCL4(2,4)
41    
42    C
43        COMMON / clevel1 / al_pp,estrip, good2,        COMMON / clevel1 / al_pp,estrip, good2,
44       &     trkchi2, xalig, yalig, zalig, emin,       &     trkchi2, xalig, yalig, zalig, emin,
45       &     riginput,hzn       &     riginput,hzn,NPLA,REVERSE
46        SAVE / clevel1 /        SAVE / clevel1 /
47  C  C
48        COMMON / clevel2 / fmode,wartrig,trigty,good,perr(4)        COMMON / clevel2 / fmode,wartrig,trigty,good,perr(4)
# Line 63  C Line 65  C
65  C  C
66        COMMON / GRUPPO2 / CLUS2, NCL2        COMMON / GRUPPO2 / CLUS2, NCL2
67        SAVE / GRUPPO2 /        SAVE / GRUPPO2 /
68    
69    C
70          COMMON / GRUPPO4 / CLUS4,NCL4
71          SAVE / GRUPPO4 /
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.23