gpamela/gpcdes/gpaltr.inc

*
* $Id$
*
* $Log$
*
*
* gpaltr.inc
*
*CMZ :  3.00/00 09/04/2001  10.50.57  by  Marialuigia Ambriola
*-- Author :    Marialuigia Ambriola   30/03/2001
C
C Common to store the attenuation lengths for media in TRD
C
        REAL ENATT,ATTTRD,EY,EA,ER,EINT
        COMMON/GPALTR/ENATT(115),ATTTRD(115,4),EY(115),EA(115),
     +               ER(115),EINT(115)
1	cafagna	3.1	*
2			* $Id$
3			*
4			* $Log$
5			*
6			*
7			* gpaltr.inc
8			*
9			*CMZ : 3.00/00 09/04/2001 10.50.57 by Marialuigia Ambriola
10			*-- Author : Marialuigia Ambriola 30/03/2001
11			C
12			C Common to store the attenuation lengths for media in TRD
13			C
14			REAL ENATT,ATTTRD,EY,EA,ER,EINT
15			COMMON/GPALTR/ENATT(115),ATTTRD(115,4),EY(115),EA(115),
16			+ ER(115),EINT(115)