/[PAMELA software]/DarthVader/TrackerLevel2/inc/F77/level0.f
ViewVC logotype

Contents of /DarthVader/TrackerLevel2/inc/F77/level0.f

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (show annotations) (download)
Fri May 19 13:15:53 2006 UTC (18 years, 6 months ago) by mocchiut
Branch: MAIN
Branch point for: DarthVader
Initial revision

1 *************************************************************************
2 *
3 * Common level0_2003.f
4 *
5 * contains LEVEL0 ntuple variables definitions for 2003 test
6 *
7 * to be included in:
8 * - ../readraw/readraw.F
9 * - ../reduction/reduction.f
10 * - !???
11 *
12 * 10/9/2005 modified by david fedele to include general variables
13 *************************************************************************
14
15
16 c GENERAL block:
17 integer good0 !flag to mark good or noise events
18
19 c HEADER block:
20 c header variables for each view:
21 integer DAQmode(12) !9 = full acquisition mode
22 !10 = compressed acquisition mode
23 !11 = compressed+full acquisition mode
24 integer DSPnumber(12) !view number
25 integer DATAlength(12) !data buffer length
26 integer eventn(12) !DSP event number
27 integer nclust(12) !nclust*2+1 = number of strips to be
28 ! included in cluster
29 integer cutc(12) !cut to include strips in a cluster
30 integer cutcl(12) !cut to search for clusters
31 integer addrcluster(12,3) !address of the greatest cluster(view,ladder)
32 integer signcluster(12,3) !signal of the greatest cluster(view,ladder)
33 integer fc(12) !compression flag
34 integer compressiontime(12) !DSP program compression time
35 integer fl5(12) !flag
36 integer fl4(12) !flag
37 integer fl3(12) !flag
38 integer fl2(12) !flag
39 integer fl1(12) !flag
40 integer fl6(12) !flag
41 integer checksum(12) !DSP header checksum
42 integer pnum(12) !peripheral number
43 integer cmdnum(12) !command number
44 integer bid(12) !board identifier
45 integer alarm(12) !alarm
46 integer aswr(12) !response length
47 integer crc(12) !DSP crc controll
48
49 c DATA block:
50 integer TOTDATAlength !sum of all views datalength (to assign
51 ! dimension to datatracker array)
52 integer datatracker(49152) !data tracker buffer (.DAT raw data)
53
54
55 common/level0event/DAQmode,DSPnumber
56 $ ,DATAlength,eventn,nclust,cutc,cutcl
57 $ ,addrcluster,signcluster,fc,compressiontime
58 $ ,fl5,fl4,fl3,fl2,fl1,fl6,checksum,TOTDATAlength
59 $ ,datatracker,pnum,cmdnum,bid,alarm,aswr,good0,crc
60
61
62 SAVE/level0event/
63 c***********************************************************
64

  ViewVC Help
Powered by ViewVC 1.1.23