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	*
2	* $Id: gpdkey.inc,v 3.2 2002/12/05 10:17:42 pamela Exp $
3	*
4	* $Log: gpdkey.inc,v $
5	* Revision 3.2 2002/12/05 10:17:42 pamela
6	* Update CAS and CALO geometries and positions. Makefile updated as well
7	*
8	* Revision 3.1.1.1 2002/07/11 16:01:59 cafagna
9	* First GPAMELA release on CVS
10	*
11	*
12	*
13	* gpdkey.inc
14	*
15	* 14/04/2005 13:25 by Marialuigia Ambriola
16	* 03/10/2002 10.47.54 by Jens Lund
17	*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	*CMZ : 2.01/00 05/04/2000 13.46.56 by Marialuig ia Ambriola
21	*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	DATA NFSFILE/21*4H /
38	DATA NLSFILE/21*4H /
39	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	*JeL:
70	DATA TPPL/5*-1111./
71	*END JeL.
72	*END ML.