| 1 |
* |
| 2 |
* $Id: gpmat.inc,v 3.2 2002/12/05 10:17:42 pamela Exp $ |
| 3 |
* |
| 4 |
* $Log: gpmat.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:02:00 cafagna |
| 9 |
* First GPAMELA release on CVS |
| 10 |
* |
| 11 |
* |
| 12 |
* |
| 13 |
* gpmat.inc |
| 14 |
* |
| 15 |
* 03/10/2002 10.42.39 by Jens Lund |
| 16 |
*CMZ : 2.02/00 11/10/2000 20.14.33 by Francesco Cafagna |
| 17 |
*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola |
| 18 |
*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna |
| 19 |
*CMZ : 1.02/00 18/03/97 18.25.29 by Francesco Cafagna |
| 20 |
*CMZ : 1.00/02 15/03/96 17.47.37 by Francesco Cafagna |
| 21 |
*-- Author : Francesco Cafagna 05/12/95 |
| 22 |
C |
| 23 |
C Common with material definitions |
| 24 |
C |
| 25 |
C |
| 26 |
C Plast. sci: H 50%, C 50% , Rho=1.032 g/cm**3 from P.D.Book |
| 27 |
C G10 : SiO2 60%, Epoxy 40%, Rho=1.7 g/cm**3 from P.D.Book |
| 28 |
C Epoxy from CRC handbook (Raw estimation) |
| 29 |
c G10C : Si 53%, O 30%, C 15%, H 2%, Rho=1.7 g/cm**3 from Mirko, |
| 30 |
C for Calorimeter |
| 31 |
C N2 (Gas) : A=14.01, Z=7, Rho=1.25 g/l |
| 32 |
C Silicon : A=28.09, Z=14,Rho=2.33 g/cm**3, X0=9.36 from P.D.Book |
| 33 |
C Xenon : A=131.29, Z=54,Rho=5.858 g/l, X0=1447.6cm from P.D.Book |
| 34 |
C TRD rad. : Carbon fiber with density 0.060 g/cm**3, used in TS93 |
| 35 |
C Aerogel : A=96.11, Z=54 (Comp. n(SiO2)+2n(H2O)), Rho=.2g/cm**3 (Ave.), |
| 36 |
C X0=150 cm, from P.D.Book |
| 37 |
C Tungsten : W 95%, Cu 2.5%, Ni 2.5%, Rho=18.1 g/cm**3 from Mirko-Aerostudi |
| 38 |
C Kaolinite : Al 21%, Si 21.7%, O 55.8%, H 1.5% Rho=2.594 g/cm**3 (insulator |
| 39 |
C for calorimeter) from Mirko et al. |
| 40 |
C |
| 41 |
C The NM*** numbers are the material numbers in the JMATE structure |
| 42 |
C Note that the Silicon has been duplicate to allow the changing of |
| 43 |
C the special tracking parameter for both TRACKER and CALORIMETER |
| 44 |
C |
| 45 |
C |
| 46 |
C For Silicon special parameter has been added to be used in the Straggling |
| 47 |
C simulation. These parameter are stored into the User word in the JMAT |
| 48 |
C structure |
| 49 |
C |
| 50 |
INTEGER NMSCIN,NMG10,NMN2,NMSITR,NMSICA,NMXE,NMTRAD,NMAER |
| 51 |
*EM: |
| 52 |
INTEGER NMCERA,NMG10C,NMWCAL |
| 53 |
*END EM. |
| 54 |
*JeL: |
| 55 |
INTEGER NMPLAS |
| 56 |
*END JeL. |
| 57 |
REAL ASCIN,ZSCIN,WSCIN,DSCIN, |
| 58 |
+ AN2G,ZN2G,DN2G,RN2G, |
| 59 |
+ AG10,ZG10,WG10,DG10, |
| 60 |
+ AG10C,ZG10C,WG10C,DG10C, |
| 61 |
+ ASI ,ZSI ,DSI ,RSI, ABSI, |
| 62 |
+ AXE ,ZXE ,DXE ,RXE, |
| 63 |
+ ATRAD ,ZTRAD ,DTRAD ,RTRAD, |
| 64 |
+ AAER ,ZAER ,DAER ,RAER, |
| 65 |
+ D2SICA,D2SITR, |
| 66 |
+ AWCAL,ZWCAL,DWCAL,WWCAL, |
| 67 |
+ ACERA,ZCERA,DCERA,WCERA |
| 68 |
COMMON/GPCMAT/ NMSCIN,NMG10,NMN2,NMSITR,NMSICA,NMXE,NMTRAD,NMAER, |
| 69 |
*EM: |
| 70 |
+ NMCERA,NMG10C,NMWCAL, |
| 71 |
*END EM. |
| 72 |
*JeL: |
| 73 |
+ NMPLAS, |
| 74 |
*END JeL. |
| 75 |
+ ASCIN(2),ZSCIN(2),WSCIN(2),DSCIN, |
| 76 |
+ AN2G,ZN2G,DN2G,RN2G, |
| 77 |
+ AG10(2),ZG10(2),WG10(2),DG10, |
| 78 |
+ ASI,ZSI,DSI,RSI,ABSI, |
| 79 |
+ AXE,ZXE,DXE,RXE, |
| 80 |
+ ATRAD,ZTRAD,DTRAD,RTRAD, |
| 81 |
+ AAER,ZAER,DAER,RAER, |
| 82 |
+ D2SICA,D2SITR, |
| 83 |
*EM: |
| 84 |
+ AG10C(4),ZG10C(4),WG10C(4),DG10C, |
| 85 |
+ AWCAL(3),ZWCAL(3),DWCAL,WWCAL(3), |
| 86 |
+ ACERA(4),ZCERA(4),WCERA(4),DCERA |
| 87 |
*END EM. |
| 88 |
C |