Back to home page

EIC code displayed by LXR

 
 

    


Warning, /include/geant321/gcrayt.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:35  cernlib
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_GEANT321_GCRAYT_INC
0010 #define CERNLIB_GEANT321_GCRAYT_INC
0011 *
0012 *
0013 * gcrayt.inc
0014 *
0015 #if !defined(CERNLIB_INCLUDE)
0016       COMMON/GCRAYT/INTEN,IOMBRA,IXYFLA,NOFLAG,
0017      +XLPOS,YLPOS,ZLPOS,XLDIR,YLDIR,ZLDIR,APFLAH,
0018      +CCXX(4),CCYY(4),CCZZ(4),BOFLAG,APFLAG,
0019      +XCOSXS,YCOSYS,ZCOSZS,VDX,VDY,VDZ,SSLENG,
0020      +XPINTS,YPINTS,ZPINTS,FPINTX,FPINTY,FPINTZ,
0021      +AROTS(4,4),ZROTS(4,4),RRR(4)
0022 C
0023 #if defined(CERNLIB_TYPE)
0024 #include "geant321/gtrayt.inc"
0025 #endif
0026 C
0027 #endif
0028 
0029 #endif