| 1 |
* |
| 2 |
* $Id: gpmed.inc,v 3.4 2006/05/18 10:52:32 pam-ba Exp $ |
| 3 |
* |
| 4 |
* $Log: gpmed.inc,v $ |
| 5 |
* Revision 3.4 2006/05/18 10:52:32 pam-ba |
| 6 |
* TOF geometry completed and a new material, the polystyrene (density 35 g/l), added |
| 7 |
* |
| 8 |
* Revision 3.3 2006/05/02 11:46:13 pam-ba |
| 9 |
* TOF geometry and position updated and a new material, the mylar, added |
| 10 |
* |
| 11 |
* Revision 3.2 2002/12/05 10:17:42 pamela |
| 12 |
* Update CAS and CALO geometries and positions. Makefile updated as well |
| 13 |
* |
| 14 |
* Revision 3.1.1.1 2002/07/11 16:01:59 cafagna |
| 15 |
* First GPAMELA release on CVS |
| 16 |
* |
| 17 |
* |
| 18 |
* |
| 19 |
* gpmed.inc |
| 20 |
* |
| 21 |
* 03/10/2002 11.15.52 by Jens Lund |
| 22 |
*CMZ : 3.00/00 20/03/2001 17.31.38 by Marialuigia Ambriola |
| 23 |
*CMZ : 2.02/00 09/10/2000 15.33.16 by Francesco Cafagna |
| 24 |
*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola |
| 25 |
*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna |
| 26 |
*CMZ : 1.02/00 10/03/97 12.52.13 by Francesco Cafagna |
| 27 |
*CMZ : 1.00/02 06/02/96 12.55.04 by Francesco Cafagna |
| 28 |
*-- Author : Francesco Cafagna 05/12/95 |
| 29 |
C |
| 30 |
C Common with tracking media definition |
| 31 |
C |
| 32 |
INTEGER MN2,MSCIN,MAER,MXE,MKAP,MTRAD,MMAG,MROA,MCF,MSIC, |
| 33 |
+ MSIT,MG10,MCE,MW,MAL,ISVOLGP |
| 34 |
*EM: |
| 35 |
INTEGER MW2,MCER,MG10C |
| 36 |
*END EM. |
| 37 |
*JeL: |
| 38 |
INTEGER MPLAS |
| 39 |
*END JeL. |
| 40 |
INTEGER MMYL,MPOL,MCAD |
| 41 |
REAL FIELDMGP,TMAXFDGP,STEMAXGP,DEEMAXGP,EPSILGP,STMINGP |
| 42 |
COMMON /GPCMED/ MN2,MSCIN,MAER,MXE,MKAP,MTRAD,MMAG,MROA, |
| 43 |
+ MCF,MSIC,MSIT,MG10,MCE,MW,MAL,ISVOLGP, |
| 44 |
+ FIELDMGP,TMAXFDGP,STEMAXGP,DEEMAXGP,EPSILGP,STMINGP, |
| 45 |
*EM: |
| 46 |
+ MW2,MCER,MG10C, |
| 47 |
*END EM. |
| 48 |
*JeL: |
| 49 |
+ MPLAS,MMYL,MPOL,MCAD |
| 50 |
*END JeL. |
| 51 |
C |
Parent Directory
| 
Revision Log