/[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.2 by mocchiut, Tue Nov 14 14:08:49 2006 UTC revision 1.4 by mocchiut, Mon Jan 22 09:16:56 2007 UTC
# Line 10  C      PARAMETER (PIANO=8.59) Line 10  C      PARAMETER (PIANO=8.59)
10        REAL CLUS2(2,2,NCHA)        REAL CLUS2(2,2,NCHA)
11        INTEGER NCL2(2,2)        INTEGER NCL2(2,2)
12        INTEGER SELFTRIGGER        INTEGER SELFTRIGGER
13          INTEGER FMODE(2)
14  C  C
15  c      integer obt,pkt_num,pro_num  c      integer obt,pkt_num,pro_num
16        real nstrip, qtot, ncore, qcore, impx, impy, tanx, tany        real nstrip, qtot, ncore, qcore, impx, impy, tanx, tany
17        real noint, trigty        real noint, trigty, wartrig
18        REAL ncyl, qcyl, qtrack, qmax, nx22, qx22        REAL ncyl, qcyl, qtrack, qmax, nx22, qx22
19        real qq(4)        real qq(4)
20        REAL QTRACKX, QTRACKY, DXTRACK, DYTRACK, QLAST, NLAST, QPRE, NPRE        REAL QTRACKX, QTRACKY, DXTRACK, DYTRACK, QLAST, NLAST, QPRE, NPRE
# Line 42  C Line 43  C
43       &     riginput,hzn       &     riginput,hzn
44        SAVE / clevel1 /        SAVE / clevel1 /
45  C  C
46        COMMON / clevel2 / trigty,good,perr(4)        COMMON / clevel2 / fmode,wartrig,trigty,good,perr(4)
47       &     ,swerr(4),crc(4),selftrigger,       &     ,swerr(4),crc(4),selftrigger,
48       &     nstrip, qtot, ncore, qcore, impx, impy,       &     nstrip, qtot, ncore, qcore, impx, impy,
49       &     tanx, tany, noint, ncyl, qcyl, qtrack, qmax, nx22,       &     tanx, tany, noint, ncyl, qcyl, qtrack, qmax, nx22,
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.23