gpamela/gpcdes/gpdkey.inc

*
* $Id: gpdkey.inc,v 3.9 2006/11/10 11:39:34 pam-ba Exp $
*
* $Log: gpdkey.inc,v $
* Revision 3.9  2006/11/10 11:39:34  pam-ba
* S2 and S1 z-positions corrected, He3 and plystyrene mixture added, Top Plate geometry simulated and titanium mixture added.
*
* Revision 3.8  2006/10/13 16:36:58  pam-ba
* Added a new material, the cadmium, for ND
*
* Revision 3.7  2006/05/18 10:52:31  pam-ba
* TOF geometry completed and a new material, the polystyrene (density 35 g/l), added
*
* Revision 3.6  2006/05/02 11:46:13  pam-ba
* TOF geometry and position updated and a new material, the mylar, added
*
* Revision 3.5  2006/04/10 11:07:42  cafagna
* GEN data card updated, ZDGEN added
*
* Revision 3.4  2006/04/09 23:28:55  cafagna
* Several new things, among this: ND and CARD
*
* Revision 3.3  2005/06/21 02:42:11  cafagna
* Major modification to the geometry and to the random number chain
*
* Revision 3.2  2002/12/05 10:17:42  pamela
* Update CAS and CALO geometries and positions. Makefile updated as well
*
* Revision 3.1.1.1  2002/07/11 16:01:59  cafagna
* First GPAMELA release on CVS
*
*
*
* gpdkey.inc
*
*               14/04/2005  13:25     by Marialuigia Ambriola
*               03/10/2002  10.47.54  by  Jens Lund
*CMZ :  3.00/00 01/05/2001  16.02.39  by  Marialuigia Ambriola
*CMZ :  2.03/00 06/11/2000  01.54.20  by  Francesco Cafagna
*CMZ :  2.02/00 12/10/2000  16.03.56  by  Francesco Cafagna
*CMZ :  2.01/00 05/04/2000  13.46.56  by  Marialuig ia Ambriola
*CMZ :  2.00/00 01/03/2000  12.57.55  by  Francesco Cafagna
*CMZ :  1.00/02 05/04/96  09.08.57  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   09/02/96
C
C Data block for GPKEY common
C
      DATA NCPL/44*-1111/
      DATA NCSI/9*-1111/
      DATA NCAB/22*-1111/
      DATA NOCAPL/44*.FALSE./
      DATA NOCASI/9*.FALSE./
      DATA NOCAAB/22*.FALSE./
      DATA NDET/10*4H    /
      DATA NHPAK/4H    /
      DATA NHBFILE/21*4H    /
      DATA NGARFILE/21*4H    /
      DATA NFSFILE/21*4H    /
      DATA NLSFILE/21*4H    /
      DATA XYZGEN/6*-1111./
      DATA NDECAS/3*4H    /
      DATA NDECAT/3*4H    /
      DATA NDETOF/3*4H    /
      DATA NDETRD/3*4H    /
      DATA NDESPE/3*4H    /
      DATA NDECAL/3*4H    /
      DATA NDES4/3*4H    /
      DATA NDEND/3*4H    /
      DATA NDECARD/3*4H    /
*ML:
      DATA PHGEN/0.,360./
      DATA THGEN/0.,90.,0./
      DATA TPAL/5*-1111./
      DATA TG10/5*-1111./
      DATA TPN2/5*-1111./
      DATA TPW/5*-1111./
      DATA TPKA/5*-1111./
      DATA TPFE/5*-1111./
      DATA TRAD/5*-1111./
      DATA TPRO/5*-1111./
      DATA TPCF/5*-1111./
      DATA TPSC/5*-1111./
      DATA TSCA/5*-1111./
      DATA TSTR/5*-1111./
      DATA TPXE/5*-1111./
      DATA TPAE/5*-1111./
*EM:
      DATA TPW2/5*-1111./
      DATA TPCE/5*-1111./
      DATA T10C/5*-1111./
*END EM.
*JeL:
      DATA TPPL/5*-1111./
*END JeL.
      DATA TMYL/5*-1111./
      DATA TPOL/5*-1111./
      DATA TCAD/5*-1111./
      DATA TCH2/5*-1111./
      DATA THE3/5*-1111./
      DATA TTAV/5*-1111./
*END ML.
      DATA COS2G/.FALSE./
1	cafagna	3.1	*
2	cafagna	3.10	* $Id: gpdkey.inc,v 3.9 2006/11/10 11:39:34 pam-ba Exp $
3	pamela	3.2	*
4			* $Log: gpdkey.inc,v $
5	cafagna	3.10	* Revision 3.9 2006/11/10 11:39:34 pam-ba
6			* S2 and S1 z-positions corrected, He3 and plystyrene mixture added, Top Plate geometry simulated and titanium mixture added.
7			*
8	pam-ba	3.9	* Revision 3.8 2006/10/13 16:36:58 pam-ba
9			* Added a new material, the cadmium, for ND
10			*
11	pam-ba	3.8	* Revision 3.7 2006/05/18 10:52:31 pam-ba
12			* TOF geometry completed and a new material, the polystyrene (density 35 g/l), added
13			*
14	pam-ba	3.7	* Revision 3.6 2006/05/02 11:46:13 pam-ba
15			* TOF geometry and position updated and a new material, the mylar, added
16			*
17	pam-ba	3.6	* Revision 3.5 2006/04/10 11:07:42 cafagna
18			* GEN data card updated, ZDGEN added
19			*
20	cafagna	3.5	* Revision 3.4 2006/04/09 23:28:55 cafagna
21			* Several new things, among this: ND and CARD
22			*
23	cafagna	3.4	* Revision 3.3 2005/06/21 02:42:11 cafagna
24			* Major modification to the geometry and to the random number chain
25			*
26	cafagna	3.3	* Revision 3.2 2002/12/05 10:17:42 pamela
27			* Update CAS and CALO geometries and positions. Makefile updated as well
28			*
29	pamela	3.2	* Revision 3.1.1.1 2002/07/11 16:01:59 cafagna
30			* First GPAMELA release on CVS
31	cafagna	3.1	*
32			*
33			*
34			* gpdkey.inc
35			*
36	cafagna	3.3	* 14/04/2005 13:25 by Marialuigia Ambriola
37			* 03/10/2002 10.47.54 by Jens Lund
38	cafagna	3.1	*CMZ : 3.00/00 01/05/2001 16.02.39 by Marialuigia Ambriola
39			*CMZ : 2.03/00 06/11/2000 01.54.20 by Francesco Cafagna
40			*CMZ : 2.02/00 12/10/2000 16.03.56 by Francesco Cafagna
41	cafagna	3.3	*CMZ : 2.01/00 05/04/2000 13.46.56 by Marialuig ia Ambriola
42	cafagna	3.1	*CMZ : 2.00/00 01/03/2000 12.57.55 by Francesco Cafagna
43			*CMZ : 1.00/02 05/04/96 09.08.57 by Francesco Cafagna
44			*-- Author : Francesco Cafagna 09/02/96
45			C
46			C Data block for GPKEY common
47			C
48			DATA NCPL/44*-1111/
49			DATA NCSI/9*-1111/
50			DATA NCAB/22*-1111/
51			DATA NOCAPL/44*.FALSE./
52			DATA NOCASI/9*.FALSE./
53			DATA NOCAAB/22*.FALSE./
54	cafagna	3.4	DATA NDET/10*4H /
55	cafagna	3.1	DATA NHPAK/4H /
56			DATA NHBFILE/21*4H /
57			DATA NGARFILE/21*4H /
58	cafagna	3.3	DATA NFSFILE/21*4H /
59			DATA NLSFILE/21*4H /
60	cafagna	3.5	DATA XYZGEN/6*-1111./
61	cafagna	3.1	DATA NDECAS/3*4H /
62			DATA NDECAT/3*4H /
63			DATA NDETOF/3*4H /
64			DATA NDETRD/3*4H /
65			DATA NDESPE/3*4H /
66			DATA NDECAL/3*4H /
67			DATA NDES4/3*4H /
68	cafagna	3.4	DATA NDEND/3*4H /
69			DATA NDECARD/3*4H /
70	cafagna	3.1	*ML:
71			DATA PHGEN/0.,360./
72	cafagna	3.10	DATA THGEN/0.,90.,0./
73	cafagna	3.1	DATA TPAL/5*-1111./
74			DATA TG10/5*-1111./
75			DATA TPN2/5*-1111./
76			DATA TPW/5*-1111./
77			DATA TPKA/5*-1111./
78			DATA TPFE/5*-1111./
79			DATA TRAD/5*-1111./
80			DATA TPRO/5*-1111./
81			DATA TPCF/5*-1111./
82			DATA TPSC/5*-1111./
83			DATA TSCA/5*-1111./
84			DATA TSTR/5*-1111./
85			DATA TPXE/5*-1111./
86			DATA TPAE/5*-1111./
87			*EM:
88			DATA TPW2/5*-1111./
89			DATA TPCE/5*-1111./
90			DATA T10C/5*-1111./
91			*END EM.
92	pamela	3.2	*JeL:
93			DATA TPPL/5*-1111./
94			*END JeL.
95	pam-ba	3.6	DATA TMYL/5*-1111./
96	pam-ba	3.7	DATA TPOL/5*-1111./
97	pam-ba	3.8	DATA TCAD/5*-1111./
98	pam-ba	3.9	DATA TCH2/5*-1111./
99			DATA THE3/5*-1111./
100			DATA TTAV/5*-1111./
101	cafagna	3.1	*END ML.
102	cafagna	3.10	DATA COS2G/.FALSE./