gpamela/gcdes/gtrayt.inc

*
* $Id$
*
* $Log$
*
*
* gtrayt.inc
*
      INTEGER INTEN,IOMBRA,IXYFLA,NOFLAG
      REAL XLPOS,YLPOS,ZLPOS,XLDIR,YLDIR,ZLDIR,APFLAH,
     +     CCXX,CCYY,CCZZ,BOFLAG,APFLAG,
     +     XCOSXS,YCOSYS,ZCOSZS,VDX,VDY,VDZ,SSLENG,
     +     XPINTS,YPINTS,ZPINTS,FPINTX,FPINTY,FPINTZ,
     +     AROTS,ZROTS,RRR
1	*
2	* $Id$
3	*
4	* $Log$
5	*
6	*
7	* gtrayt.inc
8	*
9	INTEGER INTEN,IOMBRA,IXYFLA,NOFLAG
10	REAL XLPOS,YLPOS,ZLPOS,XLDIR,YLDIR,ZLDIR,APFLAH,
11	+ CCXX,CCYY,CCZZ,BOFLAG,APFLAG,
12	+ XCOSXS,YCOSYS,ZCOSZS,VDX,VDY,VDZ,SSLENG,
13	+ XPINTS,YPINTS,ZPINTS,FPINTX,FPINTY,FPINTZ,
14	+ AROTS,ZROTS,RRR