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	cafagna	3.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