gpamela/gpcdes/gpdkey.inc

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