gpamela/gcdes/gcstra.inc

*
* $Id$
*
* $Log$
*
*
* gcstra.inc
*
      PARAMETER (ILTAB=200)
      COMMON /GCSTRA / EMAX,EM(200),SFINT,EPSR(ILTAB),EPSI(ILTAB),
     +  FINT(ILTAB),EMIN,EPPS,BETA2,GAMMA2,WP2,S2,MEEV,EMM(200),
     +  GAMLOG(21),NP,NTAB,IE,NFACT,NICOLL
*
      INTEGER NP,NTAB,IE,NFACT
      REAL    EMAX,EM,SFINT,EPSR,EPSI,FINT,EMIN,EPPS,EMM,GAMLOG
     +        ,BETA2,GAMMA2,WP2,S2,MEEV
*
1	*
2	* $Id$
3	*
4	* $Log$
5	*
6	*
7	* gcstra.inc
8	*
9	PARAMETER (ILTAB=200)
10	COMMON /GCSTRA / EMAX,EM(200),SFINT,EPSR(ILTAB),EPSI(ILTAB),
11	+ FINT(ILTAB),EMIN,EPPS,BETA2,GAMMA2,WP2,S2,MEEV,EMM(200),
12	+ GAMLOG(21),NP,NTAB,IE,NFACT,NICOLL
13	*
14	INTEGER NP,NTAB,IE,NFACT
15	REAL EMAX,EM,SFINT,EPSR,EPSI,FINT,EMIN,EPPS,EMM,GAMLOG
16	+ ,BETA2,GAMMA2,WP2,S2,MEEV
17	*