1 |
mocchiut |
1.1 |
|
2 |
|
|
****************************************************************************** |
3 |
|
|
* |
4 |
|
|
* Common for on-line tracker calibrations |
5 |
|
|
* |
6 |
|
|
* 2 calibration packets are sent, one for X views and one for Y views. |
7 |
|
|
* Thus, each packet contains calibration parameters of nplanes=6 views. |
8 |
|
|
* |
9 |
|
|
****************************************************************************** |
10 |
|
|
|
11 |
|
|
integer good0 |
12 |
|
|
integer DAQmode(nplanes) |
13 |
|
|
integer DSPnumber(nplanes) !view number |
14 |
|
|
integer calibnumber(nplanes) |
15 |
|
|
integer ncalib_event(nplanes) |
16 |
|
|
integer ped_l1(nplanes),ped_l2(nplanes),ped_l3(nplanes) |
17 |
|
|
integer sig_l1(nplanes),sig_l2(nplanes),sig_l3(nplanes) |
18 |
|
|
integer nbad_l1(nplanes),nbad_l2(nplanes),nbad_l3(nplanes) |
19 |
|
|
integer cal_flag(nplanes) |
20 |
|
|
integer checksum(nplanes) |
21 |
|
|
real DSPped_par(nplanes,nstrips_view) !online pedestal |
22 |
|
|
real DSPsig_par(nplanes,nstrips_view) !online sigma |
23 |
|
|
integer DSPbad_par(nplanes,nstrips_view) !online bad strips |
24 |
|
|
integer crc_cal(nplanes,3) !crc control for ladder pkts |
25 |
|
|
integer crc_hcal(nplanes) !crc control for header pkt |
26 |
|
|
|
27 |
|
|
common/trkcalib/good0,DAQmode,DSPnumber |
28 |
|
|
$ ,calibnumber, |
29 |
|
|
$ ncalib_event, |
30 |
|
|
$ ped_l1,ped_l2,ped_l3, |
31 |
|
|
$ sig_l1,sig_l2,sig_l3, |
32 |
|
|
$ nbad_l1,nbad_l2,nbad_l3, |
33 |
|
|
$ cal_flag |
34 |
|
|
$ ,DSPped_par,DSPsig_par,DSPbad_par,crc_cal,crc_hcal |
35 |
|
|
SAVE/trkcalib/ |
36 |
|
|
|
37 |
|
|
|
38 |
|
|
|