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

Diff of /gpamela/gpcdes/gpmat.inc

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

revision 3.7 by pam-ba, Fri Nov 10 11:39:34 2006 UTC revision 3.8 by pamela, Tue Jan 29 18:25:16 2008 UTC
# Line 1  Line 1 
1  *  *
2  * $Id: gpmat.inc,v 3.6 2006/10/13 16:36:58 pam-ba Exp $  * $Id: gpmat.inc,v 3.7 2006/11/10 11:39:34 pam-ba Exp $
3  *  *
4  * $Log: gpmat.inc,v $  * $Log: gpmat.inc,v $
5    * Revision 3.7  2006/11/10 11:39:34  pam-ba
6    * S2 and S1 z-positions corrected, He3 and plystyrene mixture added, Top Plate geometry simulated and titanium mixture added.
7    *
8  * Revision 3.6  2006/10/13 16:36:58  pam-ba  * Revision 3.6  2006/10/13 16:36:58  pam-ba
9  * Added a new material, the cadmium, for ND  * Added a new material, the cadmium, for ND
10  *  *
# Line 56  C He3        : from Leonov: Z=2, A=3 Rho Line 59  C He3        : from Leonov: Z=2, A=3 Rho
59  C Polyethylene(CH2): for ND from Leonv: A=12.011,1.00794, Z=6,1, Rho=.93 g/cm3  C Polyethylene(CH2): for ND from Leonv: A=12.011,1.00794, Z=6,1, Rho=.93 g/cm3
60  C TAV        : Titanium alloy for top plate: Ti(90%), Al(6%), Va(4%):  C TAV        : Titanium alloy for top plate: Ti(90%), Al(6%), Va(4%):
61  c              Z=(22,13,23), A=(47.867,26.9815,50.9415),Rho=4.49234 g/cm3  c              Z=(22,13,23), A=(47.867,26.9815,50.9415),Rho=4.49234 g/cm3
62    C NYL6       : Nylon 6 for shell external cover:(NH(CH2)5CO)n, 6C, 11H, 1O, 1N
63    c              Z=(6,1,8,7), A=(12.011,1.00794,15.9994,14.00674), Rho=1.14 g/cm3
64    C AMG6M      : AMg6M for top container (TSPH volume): Al(94%), Mg(6%)
65    C              Z=(13,12), A=(26.9815,24.3050), Rho=2.610 g/cm3
66  C  C
67  C The NM*** numbers are the material numbers in the JMATE structure  C The NM*** numbers are the material numbers in the JMATE structure
68  C Note that the Silicon has been duplicate to allow the changing of  C Note that the Silicon has been duplicate to allow the changing of
# Line 73  C Line 80  C
80  *JeL:  *JeL:
81        INTEGER NMPLAS        INTEGER NMPLAS
82  *END JeL.  *END JeL.
83        INTEGER NMMYL,NMPOL,NMCAD,NMTAV,NMHE3,NMCH2        INTEGER NMMYL,NMPOL,NMCAD,NMTAV,NMHE3,NMCH2,NMNYL6,NMAMG6M
84        REAL ASCIN,ZSCIN,WSCIN,DSCIN,        REAL ASCIN,ZSCIN,WSCIN,DSCIN,
85       +     AN2G,ZN2G,DN2G,RN2G,       +     AN2G,ZN2G,DN2G,RN2G,
86       +     AG10,ZG10,WG10,DG10,       +     AG10,ZG10,WG10,DG10,
# Line 90  C Line 97  C
97       +     ACAD,ZCAD,DCAD,RCAD,       +     ACAD,ZCAD,DCAD,RCAD,
98       +     ATAV,ZTAV,DTAV,WTAV,       +     ATAV,ZTAV,DTAV,WTAV,
99       +     AHE3,ZHE3,DHE3,RHE3,       +     AHE3,ZHE3,DHE3,RHE3,
100       +     APOLND,ZPOLND,DPOLND,WPOLND       +     APOLND,ZPOLND,DPOLND,WPOLND,
101         +     ANYL6,ZNYL6,DNYL6,WNYL6,
102         +     AAMG6M,ZAMG6M,DAMG6M,WAMG6M
103        COMMON/GPCMAT/ NMSCIN,NMG10,NMN2,NMSITR,NMSICA,NMXE,NMTRAD,NMAER,        COMMON/GPCMAT/ NMSCIN,NMG10,NMN2,NMSITR,NMSICA,NMXE,NMTRAD,NMAER,
104  *EM:  *EM:
105       +              NMCERA,NMG10C,NMWCAL,       +              NMCERA,NMG10C,NMWCAL,
# Line 98  C Line 107  C
107  *JeL:  *JeL:
108       +              NMPLAS,       +              NMPLAS,
109  *END JeL.  *END JeL.
110       +              NMMYL,NMPOL,NMCAD,NMTAV,NMHE3,NMCH2,       +              NMMYL,NMPOL,NMCAD,NMTAV,NMHE3,NMCH2,NMNYL6,
111         +              NMAMG6M,NMIRON,
112       +              ASCIN(2),ZSCIN(2),WSCIN(2),DSCIN,       +              ASCIN(2),ZSCIN(2),WSCIN(2),DSCIN,
113       +              AN2G,ZN2G,DN2G,RN2G,       +              AN2G,ZN2G,DN2G,RN2G,
114       +              AG10(2),ZG10(2),WG10(2),DG10,       +              AG10(2),ZG10(2),WG10(2),DG10,
# Line 117  C Line 127  C
127       +              ACAD,ZCAD,DCAD,RCAD,       +              ACAD,ZCAD,DCAD,RCAD,
128       +              ATAV(3),ZTAV(3),DTAV,WTAV(3),       +              ATAV(3),ZTAV(3),DTAV,WTAV(3),
129       +              AHE3, ZHE3, DHE3, RHE3,       +              AHE3, ZHE3, DHE3, RHE3,
130       +              APOLND(2),ZPOLND(2),DPOLND,WPOLND(2)       +              APOLND(2),ZPOLND(2),DPOLND,WPOLND(2),
131         +              ANYL6(4),ZNYL6(4),DNYL6,WNYL6(4),
132         +              AAMG6M(2),ZAMG6M(2),DAMG6M,WAMG6M(2)    
133  C  C
134    
135    
Legend:
Removed from v.3.7  
changed lines
  Added in v.3.8
  ViewVC Help
Powered by ViewVC 1.1.23