/[PAMELA software]/gpamela/gpcdes/gpkey.inc
ViewVC logotype

Contents of /gpamela/gpcdes/gpkey.inc

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3.3 - (show annotations) (download)
Tue Jun 21 02:42:15 2005 UTC (19 years, 5 months ago) by cafagna
Branch: MAIN
CVS Tags: v4r2, v4r3
Changes since 3.2: +10 -6 lines
Major modification to the geometry and to the random number chain

1 *
2 * $Id: gpkey.inc,v 3.2 2002/12/05 10:17:42 pamela Exp $
3 *
4 * $Log: gpkey.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 * gpkey.inc
14 *
15 * 14/04/2005 13:15 by Marialuigia Ambriola
16 * 03/10/2002 10.46.12 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.58.14 by Francesco Cafagna
19 *CMZ : 2.02/00 12/10/2000 16.08.25 by Francesco Cafagna
20 *CMZ : 2.01/00 04/04/2000 18.16.35 by Unknown
21 *CMZ : 2.00/00 01/03/2000 12.57.55 by Francesco Cafagna
22 *CMZ : 1.02/00 22/10/99 13.28.17 by Francesco Cafagna
23 *CMZ : 1.01/00 02/05/96 08.57.38 by Francesco Cafagna
24 *CMZ : 1.00/03 15/04/96 14.56.38 by Francesco Cafagna
25 *CMZ : 1.00/02 05/04/96 11.38.01 by Francesco Cafagna
26 *-- Author : Francesco Cafagna 30/11/95
27 * COMMON WITH THE USER DEFINITED DATA CARDS
28 INTEGER FFIELD,NDET,NCAL,HBOOK,NSPTM,NHPAK,NAUTMED,NHBFILE,
29 + ISSTR,HLON,NCPL,NCSI,NCAB,NDECAS,NDECAT,NDETOF,
30 + NDETRD,NDESPE,NDECAL,NDES4,NGARFILE,NFSFILE,NLSFILE,
31 + HSEED
32 LOGICAL TOF,TRD,CAT,CAS,SPE,CAL,TS4,SPH,
33 + HBK,HTOF,HTRD,HCAT,HCAS,HSPE,HCAL,HS4,
34 + PTOF,PTRD,PCAT,PCAS,PSPE,PCAL,PS4,
35 + CALDIV,CALBLOCK,FLUKA,
36 + ATMAXFD,ASTEMAX,ADEEMAX,AEPSIL,ASTMIN,HLONG,
37 + BTMAXFD,BSTEMAX,BDEEMAX,BSTMIN,BEPSIL,NOCAPL,NOCASI,
38 + NOCAAB
39 REAL VTMAXFD,VSTEMAX,VDEEMAX,VEPSIL,VSTMIN,SSTR,XYZGEN,DZSH
40 *ML:
41 REAL PHGEN,THGEN
42 REAL TPAL,TG10,TPN2,TPW,TPKA,TPFE,TRAD,TPRO,TPCF,
43 + TPSC,TSCA,TSTR,TPXE,TPAE
44 *EM:
45 REAL T10C,TPW2,TPCE
46 *END EM.
47 *JeL:
48 REAL TPPL
49 *END JeL.
50 *END ML.
51 COMMON /GPCKEY/TOF,TRD,CAT,CAS,SPE,CAL,TS4,SPH,
52 + HBK,HTOF,HTRD,HCAT,HCAS,HSPE,HCAL,
53 + PTOF,PTRD,PCAT,PCAS,PSPE,PCAL,PS4,
54 + CALDIV,CALBLOCK,FLUKA,ATMAXFD,ASTEMAX,
55 + ADEEMAX,AEPSIL,ASTMIN,HLONG,BTMAXFD,BSTEMAX,
56 + BDEEMAX,BSTMIN,BEPSIL,NOCAPL(44),NOCASI(9),
57 + NOCAAB(22),
58 + FFIELD,NDET(8),NCAL(3),HBOOK,NSPTM(17),NHPAK,
59 + NAUTMED(5),NHBFILE(21),ISSTR,HLON,NCPL(44),NCSI(9),
60 + NCAB(22),NDECAS(3),NDECAT(3),NDETOF(3),NDETRD(3),
61 + NDESPE(3),NDECAL(3),NDES4(3),
62 + NGARFILE(21),NFSFILE(21),NLSFILE(21),HSEED,
63 + VTMAXFD,VSTEMAX,VDEEMAX,VEPSIL,VSTMIN,
64 + SSTR(2),XYZGEN(5),DZSH,PHGEN(2),THGEN(2),
65 *ML:
66 + TPAL(5),TG10(5),TPN2(5),TPW(5),TPKA(5),TPFE(5),
67 + TRAD(5),TPRO(5),TPCF(5),TPSC(5),TSCA(5),TSTR(5),
68 + TPXE(5),TPAE(5),
69 *END ML.
70 *EM:
71 + TPW2(5),TPCE(5),T10C(5),
72 *END EM.
73 *JeL:
74 + TPPL(5)
75 *END JeL.
76 *

  ViewVC Help
Powered by ViewVC 1.1.23