Warning, /include/geant321/gcstra.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1995/10/24 10:20:32 cernlib
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_GEANT321_GCSTRA_INC
0010 #define CERNLIB_GEANT321_GCSTRA_INC
0011 *
0012 *
0013 * gcstra.inc
0014 *
0015 #if !defined(CERNLIB_INCLUDE)
0016 PARAMETER (ILTAB=200)
0017 COMMON /GCSTRA / EMAX,EM(200),SFINT,EPSR(ILTAB),EPSI(ILTAB),
0018 + FINT(ILTAB),EMIN,EPPS,BETA2,GAMMA2,WP2,S2,MEEV,EMM(200),
0019 + GAMLOG(21),NP,NTAB,IE,NFACT,NICOLL
0020 *
0021 INTEGER NP,NTAB,IE,NFACT
0022 REAL EMAX,EM,SFINT,EPSR,EPSI,FINT,EMIN,EPPS,EMM,GAMLOG
0023 + ,BETA2,GAMMA2,WP2,S2,MEEV
0024 *
0025 #endif
0026
0027 #endif
