Warning, /include/geant321/gcmulo.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:31 cernlib
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_GEANT321_GCMULO_INC
0010 #define CERNLIB_GEANT321_GCMULO_INC
0011 *
0012 *
0013 * gcmulo.inc
0014 *
0015 #if !defined(CERNLIB_INCLUDE)
0016 COMMON/GCMULO/SINMUL(101),COSMUL(101),SQRMUL(101),OMCMOL,CHCMOL
0017 + ,EKMIN,EKMAX,NEKBIN,NEK1,EKINV,GEKA,GEKB,EKBIN(200),ELOW(200)
0018 C
0019 REAL SINMUL,COSMUL,SQRMUL,OMCMOL,CHCMOL,EKMIN,EKMAX,ELOW,EKINV
0020 REAL GEKA,GEKB,EKBIN
0021 INTEGER NEKBIN,NEK1
0022 C
0023 #endif
0024 *
0025 * gcmulo.inc
0026 *
0027 #if defined(CERNLIB_INCLUDE)
0028 *
0029 #include "geant321/incbeg.inc"
0030 + gcmulo
0031 #include "geant321/incend.inc"
0032 #endif
0033
0034 #endif
