gpamela/gpcdes/gpdkey.inc

*
* $Id: gpdkey.inc,v 3.2 2002/12/05 10:17:42 pamela Exp $
*
* $Log: gpdkey.inc,v $
* 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/8*4H    /
      DATA NHPAK/4H    /
      DATA NHBFILE/21*4H    /
      DATA NGARFILE/21*4H    /
      DATA NFSFILE/21*4H    /
      DATA NLSFILE/21*4H    /
      DATA XYZGEN/5*-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    /
*ML:
      DATA PHGEN/0.,360./
      DATA THGEN/0.,90./
      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.
*END ML.
1	cafagna	3.1	*
2	cafagna	3.3	* $Id: gpdkey.inc,v 3.2 2002/12/05 10:17:42 pamela Exp $
3	pamela	3.2	*
4			* $Log: gpdkey.inc,v $
5	cafagna	3.3	* Revision 3.2 2002/12/05 10:17:42 pamela
6			* Update CAS and CALO geometries and positions. Makefile updated as well
7			*
8	pamela	3.2	* Revision 3.1.1.1 2002/07/11 16:01:59 cafagna
9			* First GPAMELA release on CVS
10	cafagna	3.1	*
11			*
12			*
13			* gpdkey.inc
14			*
15	cafagna	3.3	* 14/04/2005 13:25 by Marialuigia Ambriola
16			* 03/10/2002 10.47.54 by Jens Lund
17	cafagna	3.1	*CMZ : 3.00/00 01/05/2001 16.02.39 by Marialuigia Ambriola
18			*CMZ : 2.03/00 06/11/2000 01.54.20 by Francesco Cafagna
19			*CMZ : 2.02/00 12/10/2000 16.03.56 by Francesco Cafagna
20	cafagna	3.3	*CMZ : 2.01/00 05/04/2000 13.46.56 by Marialuig ia Ambriola
21	cafagna	3.1	*CMZ : 2.00/00 01/03/2000 12.57.55 by Francesco Cafagna
22			*CMZ : 1.00/02 05/04/96 09.08.57 by Francesco Cafagna
23			*-- Author : Francesco Cafagna 09/02/96
24			C
25			C Data block for GPKEY common
26			C
27			DATA NCPL/44*-1111/
28			DATA NCSI/9*-1111/
29			DATA NCAB/22*-1111/
30			DATA NOCAPL/44*.FALSE./
31			DATA NOCASI/9*.FALSE./
32			DATA NOCAAB/22*.FALSE./
33			DATA NDET/8*4H /
34			DATA NHPAK/4H /
35			DATA NHBFILE/21*4H /
36			DATA NGARFILE/21*4H /
37	cafagna	3.3	DATA NFSFILE/21*4H /
38			DATA NLSFILE/21*4H /
39	cafagna	3.1	DATA XYZGEN/5*-1111./
40			DATA NDECAS/3*4H /
41			DATA NDECAT/3*4H /
42			DATA NDETOF/3*4H /
43			DATA NDETRD/3*4H /
44			DATA NDESPE/3*4H /
45			DATA NDECAL/3*4H /
46			DATA NDES4/3*4H /
47			*ML:
48			DATA PHGEN/0.,360./
49			DATA THGEN/0.,90./
50			DATA TPAL/5*-1111./
51			DATA TG10/5*-1111./
52			DATA TPN2/5*-1111./
53			DATA TPW/5*-1111./
54			DATA TPKA/5*-1111./
55			DATA TPFE/5*-1111./
56			DATA TRAD/5*-1111./
57			DATA TPRO/5*-1111./
58			DATA TPCF/5*-1111./
59			DATA TPSC/5*-1111./
60			DATA TSCA/5*-1111./
61			DATA TSTR/5*-1111./
62			DATA TPXE/5*-1111./
63			DATA TPAE/5*-1111./
64			*EM:
65			DATA TPW2/5*-1111./
66			DATA TPCE/5*-1111./
67			DATA T10C/5*-1111./
68			*END EM.
69	pamela	3.2	*JeL:
70			DATA TPPL/5*-1111./
71			*END JeL.
72	cafagna	3.1	*END ML.