Back to home page

EIC code displayed by LXR

 
 

    


Warning, /include/geant321/ludat3.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:34  cernlib
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_GEANT321_LUDAT3_INC
0010 #define CERNLIB_GEANT321_LUDAT3_INC
0011 *
0012 *
0013 * ludat3.inc
0014 *
0015 #if !defined(CERNLIB_INCLUDE)
0016       COMMON/LUDAT3/MDCY(500,3),MDME(2000,2),BRAT(2000),KFDP(2000,5)
0017       INTEGER MDCY,MDME,KFDP
0018       REAL    BRAT
0019       SAVE /LUDAT3/
0020 *
0021 #endif
0022 *
0023 * ludat3.inc
0024 *
0025 #if defined(CERNLIB_INCLUDE)
0026 *
0027 #include "geant321/incbeg.inc"
0028      +    ludat3
0029 #include "geant321/incend.inc"
0030 #endif
0031 
0032 #endif