/[PAMELA software]/eventviewer/ground/src/ptlevel1.for
ViewVC logotype

Diff of /eventviewer/ground/src/ptlevel1.for

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

revision 1.1 by mocchiut, Tue Dec 6 10:12:57 2005 UTC revision 1.2 by mocchiut, Thu Mar 9 15:50:54 2006 UTC
# Line 22  c      COMMON /PAWCHC/ CFILE Line 22  c      COMMON /PAWCHC/ CFILE
22          real clz(2,500)          real clz(2,500)
23          real sigma_matrix(12,3072)          real sigma_matrix(12,3072)
24  c  c
25          Integer pkt_type1;          Integer pkt_type1
26          Integer pkt_num1;          Integer pkt_num1
27          Integer obt1;          Integer obt1
28          Integer which_calib1;  c       Integer which_calib1
29    
30  c  c
31  c       parameter(NWPAWC=8)  c       parameter(NWPAWC=8)
# Line 36  c      save/quest/ Line 36  c      save/quest/
36  c  c
37  c        c      
38    
39          COMMON /PWCR4/ GOOD1,NEV1,          LOGICAL crc1(12)
40       &    pkt_type1,pkt_num1,obt1,which_calib1,          integer cpu_crc1
41            integer whic_calib1, swcode1
42    C    
43    
44            COMMON /PWCR4/ GOOD1,NEV1,whic_calib1,swcode1,crc1,
45         &    pkt_type1,pkt_num1,obt1,cpu_crc1,
46       &    NCLSTR1,VIEW,LADDER,MAXS,MULT,DEDX       &    NCLSTR1,VIEW,LADDER,MAXS,MULT,DEDX
47       &    ,INDSTART,INDMAX,TOTCLLENGTH,CLSIGNAL,CNEV,       &    ,INDSTART,INDMAX,TOTCLLENGTH,CLSIGNAL,CNEV,
48       &    ncl,clp,cls,clz,sigma_matrix           &    ncl,clp,cls,clz,sigma_matrix    
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.23