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

Diff of /gpamela/gpcdes/gpkey.inc

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3.1.1.1 by cafagna, Thu Jul 11 16:01:59 2002 UTC revision 3.14 by pamela, Tue Jan 29 18:25:16 2008 UTC
# Line 1  Line 1 
1  *  *
2  * $Id$  * $Id: gpkey.inc,v 3.13 2007/10/02 17:58:31 cafagna Exp $
3    *
4    * $Log: gpkey.inc,v $
5    * Revision 3.13  2007/10/02 17:58:31  cafagna
6    * Power law spectra introduced
7    *
8    * Revision 3.12  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    * Revision 3.11  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    * Revision 3.10  2006/10/13 16:36:58  pam-ba
15    * Added a new material, the cadmium, for ND
16    *
17    * Revision 3.9  2006/05/18 10:52:32  pam-ba
18    * TOF geometry completed and a new material, the polystyrene (density 35 g/l), added
19    *
20    * Revision 3.8  2006/05/02 11:46:13  pam-ba
21    * TOF geometry and position updated and a new material, the mylar, added
22    *
23    * Revision 3.7  2006/04/10 11:07:43  cafagna
24    * GEN data card updated, ZDGEN added
25    *
26    * Revision 3.6  2006/04/09 23:28:58  cafagna
27    * Several new things, among this: ND and CARD
28    *
29    * Revision 3.5  2005/12/20 12:21:04  cafagna
30    * gpnd directory added along with ND files
31    *
32    * Revision 3.4  2005/12/14 03:16:06  cafagna
33    * Neutron detector added. Geometry and GPCALOR package
34    *
35    * Revision 3.3  2005/06/21 02:42:15  cafagna
36    * Major modification to the geometry and to the random number chain
37    *
38    * Revision 3.2  2002/12/05 10:17:42  pamela
39    * Update CAS and CALO geometries and positions. Makefile updated as well
40    *
41    * Revision 3.1.1.1  2002/07/11 16:01:59  cafagna
42    * First GPAMELA release on CVS
43  *  *
 * $Log$  
44  *  *
45  *  *
46  * gpkey.inc  * gpkey.inc
47  *  *
48    *               14/04/2005  13:15     by Marialuigia Ambriola
49    *               03/10/2002  10.46.12  by  Jens Lund
50  *CMZ :  3.00/00 01/05/2001  16.02.39  by  Marialuigia Ambriola  *CMZ :  3.00/00 01/05/2001  16.02.39  by  Marialuigia Ambriola
51  *CMZ :  2.03/00 06/11/2000  01.58.14  by  Francesco Cafagna  *CMZ :  2.03/00 06/11/2000  01.58.14  by  Francesco Cafagna
52  *CMZ :  2.02/00 12/10/2000  16.08.25  by  Francesco Cafagna  *CMZ :  2.02/00 12/10/2000  16.08.25  by  Francesco Cafagna
# Line 18  Line 59 
59  *-- Author :    Francesco Cafagna   30/11/95  *-- Author :    Francesco Cafagna   30/11/95
60  * COMMON WITH THE USER DEFINITED DATA CARDS  * COMMON WITH THE USER DEFINITED DATA CARDS
61         INTEGER FFIELD,NDET,NCAL,HBOOK,NSPTM,NHPAK,NAUTMED,NHBFILE,         INTEGER FFIELD,NDET,NCAL,HBOOK,NSPTM,NHPAK,NAUTMED,NHBFILE,
62       +         ISSTR,HLON,NCPL,NCSI,NCAB,NDECAS,NDECAT,NDETOF,NDETRD,       +         ISSTR,HLON,NCPL,NCSI,NCAB,NDECAS,NDECAT,NDETOF,
63       +         NDESPE,NDECAL,NDES4,NGARFILE       +         NDETRD,NDESPE,NDECAL,NDES4,NDEND,NDECARD,NGARFILE,
64         LOGICAL TOF,TRD,CAT,CAS,SPE,CAL,TS4,SPH,       +         NFSFILE,NLSFILE,HSEED
65       +         HBK,HTOF,HTRD,HCAT,HCAS,HSPE,HCAL,HS4,         LOGICAL TOF,TRD,CAT,CAS,SPE,CAL,TS4,ND,CARD,SPH,
66       +         PTOF,PTRD,PCAT,PCAS,PSPE,PCAL,PS4,       +         HBK,HTOF,HTRD,HCAT,HCAS,HSPE,HCAL,HS4,HND,HCARD,
67       +         CALDIV,CALBLOCK,FLUKA,       +         PTOF,PTRD,PCAT,PCAS,PSPE,PCAL,PS4,PND,PCARD,
68         +         CALDIV,CALBLOCK,FLUKA,GPCALOR,
69       +         ATMAXFD,ASTEMAX,ADEEMAX,AEPSIL,ASTMIN,HLONG,       +         ATMAXFD,ASTEMAX,ADEEMAX,AEPSIL,ASTMIN,HLONG,
70       +         BTMAXFD,BSTEMAX,BDEEMAX,BSTMIN,BEPSIL,NOCAPL,NOCASI,       +         BTMAXFD,BSTEMAX,BDEEMAX,BSTMIN,BEPSIL,NOCAPL,NOCASI,
71       +         NOCAAB       +         NOCAAB,COS2G
72         REAL    VTMAXFD,VSTEMAX,VDEEMAX,VEPSIL,VSTMIN,SSTR,XYZGEN,DZSH         REAL    VTMAXFD,VSTEMAX,VDEEMAX,VEPSIL,VSTMIN,SSTR,XYZGEN,DZSH
73  *ML:  *ML:
74         REAL    PHGEN,THGEN         REAL    PHGEN,THGEN,PLAW
75         REAL    TPAL,TG10,TPN2,TPW,TPKA,TPFE,TRAD,TPRO,TPCF,         REAL    TPAL,TG10,TPN2,TPW,TPKA,TPFE,TRAD,TPRO,TPCF,
76       +         TPSC,TSCA,TSTR,TPXE,TPAE       +         TPSC,TSCA,TSTR,TPXE,TPAE
77  *EM:  *EM:
78         REAL    T10C,TPW2,TPCE         REAL    T10C,TPW2,TPCE
79  *END EM.  *END EM.
80    *JeL:
81           REAL    TPPL
82    *END JeL.
83           REAL    TMYL,TPOL,TCAD,TCH2,THE3,TTAV,TNYL,TAMG,TIRO
84  *END ML.  *END ML.
85         COMMON /GPCKEY/TOF,TRD,CAT,CAS,SPE,CAL,TS4,SPH,         PARAMETER (NNSPTM=27)
86       +               HBK,HTOF,HTRD,HCAT,HCAS,HSPE,HCAL,         COMMON /GPCKEY/TOF,TRD,CAT,CAS,SPE,CAL,TS4,ND,CARD,SPH,
87       +               PTOF,PTRD,PCAT,PCAS,PSPE,PCAL,PS4,       +               HBK,HTOF,HTRD,HCAT,HCAS,HSPE,HCAL,HS4,HND,HCARD,
88       +               CALDIV,CALBLOCK,FLUKA,ATMAXFD,ASTEMAX,       +               PTOF,PTRD,PCAT,PCAS,PSPE,PCAL,PS4,PND,PCARD,
89         +               CALDIV,CALBLOCK,FLUKA,GPCALOR,ATMAXFD,ASTEMAX,
90       +               ADEEMAX,AEPSIL,ASTMIN,HLONG,BTMAXFD,BSTEMAX,       +               ADEEMAX,AEPSIL,ASTMIN,HLONG,BTMAXFD,BSTEMAX,
91       +               BDEEMAX,BSTMIN,BEPSIL,NOCAPL(44),NOCASI(9),       +               BDEEMAX,BSTMIN,BEPSIL,NOCAPL(44),NOCASI(9),
92       +               NOCAAB(22),       +               NOCAAB(22),COS2G,
93       +               FFIELD,NDET(8),NCAL(3),HBOOK,NSPTM(17),NHPAK,       +               FFIELD,NDET(10),NCAL(3),HBOOK,NSPTM(NNSPTM),NHPAK,
94       +               NAUTMED(5),NHBFILE(21),ISSTR,HLON,NCPL(44),NCSI(9),       +               NAUTMED(5),NHBFILE(21),ISSTR,HLON,NCPL(44),NCSI(9),
95       +               NCAB(22),NDECAS(3),NDECAT(3),NDETOF(3),NDETRD(3),       +               NCAB(22),NDECAS(3),NDECAT(3),NDETOF(3),NDETRD(3),
96       +               NDESPE(3),NDECAL(3),NDES4(3),       +               NDESPE(3),NDECAL(3),NDES4(3),NDEND(3),NDECARD(3),
97         +               NGARFILE(21),NFSFILE(21),NLSFILE(21),HSEED,
98       +               VTMAXFD,VSTEMAX,VDEEMAX,VEPSIL,VSTMIN,       +               VTMAXFD,VSTEMAX,VDEEMAX,VEPSIL,VSTMIN,
99       +               SSTR(2),XYZGEN(5),DZSH,PHGEN(2),THGEN(2),       +               SSTR(2),XYZGEN(6),DZSH,PHGEN(2),THGEN(3),PLAW(4),
100  *ML:  *ML:
101       +               TPAL(5),TG10(5),TPN2(5),TPW(5),TPKA(5),TPFE(5),       +               TPAL(5),TG10(5),TPN2(5),TPW(5),TPKA(5),TPFE(5),
102       +               TRAD(5),TPRO(5),TPCF(5),TPSC(5),TSCA(5),TSTR(5),       +               TRAD(5),TPRO(5),TPCF(5),TPSC(5),TSCA(5),TSTR(5),
# Line 57  Line 105 
105  *EM:  *EM:
106       +               TPW2(5),TPCE(5),T10C(5),       +               TPW2(5),TPCE(5),T10C(5),
107  *END EM.  *END EM.
108       +               NGARFILE(21)  *JeL:
109         +               TPPL(5),
110    *END JeL.
111         +               TMYL(5),TPOL(5),TCAD(5),TCH2(5),THE3(5),TTAV(5),
112         +               TNYL(5),TAMG(5),TIRO(5)
113  *  *
Legend:
Removed from v.3.1.1.1  
changed lines
  Added in v.3.14
  ViewVC Help
Powered by ViewVC 1.1.23