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