5 * Revision 1.1.1.1 1995/10/24 10:20:36 cernlib
9 #ifndef CERNLIB_GEANT321_GCRAYT_INC
10 #define CERNLIB_GEANT321_GCRAYT_INC
15 #if !defined(CERNLIB_INCLUDE)
16 COMMON/GCRAYT/INTEN,IOMBRA,IXYFLA,NOFLAG,
17 +XLPOS,YLPOS,ZLPOS,XLDIR,YLDIR,ZLDIR,APFLAH,
18 +CCXX(4),CCYY(4),CCZZ(4),BOFLAG,APFLAG,
19 +XCOSXS,YCOSYS,ZCOSZS,VDX,VDY,VDZ,SSLENG,
20 +XPINTS,YPINTS,ZPINTS,FPINTX,FPINTY,FPINTZ,
21 +AROTS(4,4),ZROTS(4,4),RRR(4)
23 #if defined(CERNLIB_TYPE)
24 #include "geant321/gtrayt.inc"