/[PAMELA software]/yoda/techmodel/forroutines/tracker/commonyoda/level0.f
ViewVC logotype

Annotation of /yoda/techmodel/forroutines/tracker/commonyoda/level0.f

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3.0 - (hide annotations) (download)
Fri Mar 4 15:54:11 2005 UTC (19 years, 9 months ago) by kusanagi
Branch: MAIN
CVS Tags: BranchRev050129_2
Changes since 2.0: +0 -0 lines
Error proof version.
Implemented all detectors packets plus all the main telemetries packets.
Missing all the Init and Alarm packets.
Disabled CRC control on VarDump, ArrDump, TabDump for CPU debugging needs
(the data formats seems correct even if CRC get wrong)

1 kusanagi 1.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     *************************************************************************
13    
14    
15     c EVENT block:
16     logical good0 !flag to mark good or noise events
17     integer nev0 !level0 event number
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    
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     c$$$ integer trailer1,trailer2,trailer3,trailer4,trailer5,trailer6 !tappo di
55     c$$$c sergio da scrivere meglio...!???
56    
57    
58     common/level0/good0,nev0
59     $ ,DAQmode,DSPnumber,DATAlength,eventn,nclust,cutc,cutcl
60     $ ,addrcluster,signcluster,fc,compressiontime
61     $ ,fl5,fl4,fl3,fl2,fl1,fl6,checksum
62     $ ,TOTDATAlength,datatracker,pnum,cmdnum,bid,alarm,aswr
63     SAVE/level0/

  ViewVC Help
Powered by ViewVC 1.1.23