gpamela/gpcdes/gpdkey.inc

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