1 |
cafagna |
3.1 |
* |
2 |
|
|
* $Id$ |
3 |
|
|
* |
4 |
|
|
* $Log$ |
5 |
|
|
* |
6 |
|
|
* |
7 |
|
|
* gpdgeo.inc |
8 |
|
|
* |
9 |
|
|
*CMZ : 3.00/00 14/11/2000 09.13.05 by Emiliano Mocchiutti |
10 |
|
|
*CMZ : 2.02/00 12/10/2000 18.43.21 by Francesco Cafagna |
11 |
|
|
*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola |
12 |
|
|
*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna |
13 |
|
|
*CMZ : 1.02/00 04/02/2000 18.40.04 by Francesco Cafagna |
14 |
|
|
*CMZ : 1.01/00 06/05/96 11.40.48 by Francesco Cafagna |
15 |
|
|
*CMZ : 1.00/02 02/04/96 16.44.16 by Francesco Cafagna |
16 |
|
|
*-- Author : Francesco Cafagna 05/12/95 |
17 |
|
|
DATA PAME/0.,75.,200./ |
18 |
|
|
DATA SHEL/69.8,70.,75./ |
19 |
|
|
C DATA TFLA/126.8,127.,0.,33.45,0.,360./ |
20 |
|
|
DATA TFLA/0.,75.,.125/ |
21 |
|
|
DATA TSPH/0., 150.,0.,0.,0.,360./ |
22 |
|
|
DATA GAPTOP/2./ |
23 |
|
|
C TOF data |
24 |
|
|
DATA S11/22.,19.2,.45/ |
25 |
|
|
DATA S12/22.,19.2,.45/ |
26 |
|
|
DATA S21/9.,7.2,.35/ |
27 |
|
|
DATA S22/9.,7.2,.35/ |
28 |
|
|
DATA S31/9.,7.2,.35/ |
29 |
|
|
DATA S32/9.,7.2,.35/ |
30 |
|
|
DATA S4/18.,16.,.5/ |
31 |
|
|
DATA SCTIC/0.025/ |
32 |
|
|
DATA NS11X/9/ |
33 |
|
|
DATA NS12Y/9/ |
34 |
|
|
DATA NS21X/4/ |
35 |
|
|
DATA NS22Y/4/ |
36 |
|
|
DATA NS31Y/4/ |
37 |
|
|
DATA NS32X/4/ |
38 |
|
|
DATA ZS11,ZS12,ZS21,ZS22,ZS31,ZS32,ZS4 |
39 |
|
|
+ /107.8,106.8,74.9,74.1,27.1,26.3,2.3/ |
40 |
|
|
C CAT data |
41 |
|
|
*EM: |
42 |
|
|
c DATA CATB/22.05,21.05,0.55/ |
43 |
|
|
DATA CATB/22.2,21.3,0.5/ |
44 |
|
|
c DATA CATL/15.75,6.675,0.55/ |
45 |
|
|
c DATA CATT/6.3,14.375,0.55/ |
46 |
|
|
DATA CATL/2.6,14.9,0.4/ |
47 |
|
|
DATA CATT/8.45,21.2,0.4/ |
48 |
|
|
DATA CATH/9.4,7.7,0.5/ |
49 |
|
|
DATA CATF/2.6,3.15,0.4/ |
50 |
|
|
DATA CATO/9.3,0.05,0.5/ |
51 |
|
|
DATA CATP/0.05,7.7,0.5/ |
52 |
|
|
DATA ZCAT/75.75/ |
53 |
|
|
C CAS data |
54 |
|
|
*EM: |
55 |
|
|
C DATA CASX/15.25,0.55,23./ |
56 |
|
|
C DATA CASY/0.55,14.75,23./ |
57 |
|
|
DATA CSSX/15.7,0.5,21.6/ |
58 |
|
|
DATA CSSY/0.5,15.7,21.6/ |
59 |
|
|
DATA CASX/15.6,0.4,21.5/ |
60 |
|
|
DATA CASY/0.4,15.6,21.5/ |
61 |
|
|
DATA CASXD/2.4/ |
62 |
|
|
DATA CASYD/2.2/ |
63 |
|
|
DATA ZCAS/51.25/ |
64 |
|
|
*END: EM. |
65 |
|
|
C TRD data |
66 |
|
|
DATA TRFR/19,17.5,.2/ |
67 |
|
|
DATA TRFI/15.5,14.,.2/ |
68 |
|
|
DATA TRBS/3.3,18.5,1./ |
69 |
|
|
DATA TRDS/24.,24.5,13.5/ |
70 |
|
|
DATA TRDT/3.,3.,.25/ |
71 |
|
|
DATA TRDB/17.7,18.5,0/ |
72 |
|
|
DATA TRSO/0.197,0.2,14./ |
73 |
|
|
C DATA TRSI/0.,0.197,14./ |
74 |
|
|
DATA TRSI/0.,0.2,14./ |
75 |
|
|
DATA TRRA/13.2,14.,0/ |
76 |
|
|
DATA TRAN/1.75,1.75,1.0/ |
77 |
|
|
DATA TRAI/1.75,1.65,0.9/ |
78 |
|
|
DATA ZTRD/90.55/ |
79 |
|
|
DATA GAPTRD/1.5/ |
80 |
|
|
C Spectrometer data |
81 |
|
|
DATA SPEB/12.,11.4,0./ |
82 |
|
|
DATA MGPL/12.,11.4,4.05/ |
83 |
|
|
DATA MGPI/8.05,6.55,4.05/ |
84 |
|
|
DATA TRPB/12.,11.4,0.4/ |
85 |
|
|
DATA TRPL/0.,7.,0.4/ |
86 |
|
|
DATA TRSL/0.,7.,0./ |
87 |
|
|
DATA TSPA/2.6666,3.5,0.015/ |
88 |
|
|
DATA TRCP/0.005,7.,0.3/ |
89 |
|
|
DATA ZSPEC/50.6/ |
90 |
|
|
DATA NTRSL/3/ |
91 |
|
|
C Calorimeter data |
92 |
|
|
*EM: |
93 |
|
|
* DATA CASI/3.9,3.9,0.019/ |
94 |
|
|
DATA CASI/3.904,3.904,0.019/ |
95 |
|
|
DATA CG10/12.1,12.1,0.0875/ |
96 |
|
|
DATA C10C/12.1,12.1,0.08/ |
97 |
|
|
DATA CAAB/12.1,12.1,0.133/ |
98 |
|
|
DATA CAPL/12.1,12.1,0./ |
99 |
|
|
DATA CAAD/12.1,12.1,0.133/ |
100 |
|
|
DATA CAPD/12.1,12.1,0./ |
101 |
|
|
DATA CALB/19.7,19.7,10.2/ |
102 |
|
|
DATA CALS/20.,20.,10.5/ |
103 |
|
|
DATA ZCAL/13.05/ |
104 |
|
|
* DATA CALSTWID/0.36/ |
105 |
|
|
DATA CALSTWID/0.244/ |
106 |
|
|
* |
107 |
|
|
* NOTE: IF you change NCAPL, remember to modify the NCPL, NCSI, NOCAPL, |
108 |
|
|
* NOCASI array dimentions in $GPKEY, $GPDKEY common and data block. |
109 |
|
|
* The corresponding FFKEY call in GPFFR must be changed as well. |
110 |
|
|
* The GPDAT loop on these arrays should be checked too. |
111 |
|
|
* |
112 |
|
|
DATA NCAPL/22/ |
113 |
|
|
DATA NCAPLD/1/ |
114 |
|
|
C DATA DCASIX/0.3/ |
115 |
|
|
DATA DCASIX/0.292/ |
116 |
|
|
C DATA DCASIY/0.3/ |
117 |
|
|
DATA DCASIY/0.292/ |
118 |
|
|
DATA DCASIZ/0.15/ |
119 |
|
|
DATA NCASTR/32/ |
120 |
|
|
* |
121 |
|
|
DATA CAKA/12.,12.1,0.005/ |
122 |
|
|
DATA CAGL/12.,12.1,0.005/ |
123 |
|
|
DATA CAKP/12.,12.1,0.0025/ |
124 |
|
|
*END EM. |
125 |
|
|
C |