Warning, /include/geant321/cgcaan.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:41 cernlib
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_GEANT321_CGCAAN_INC
0010 #define CERNLIB_GEANT321_CGCAAN_INC
0011 *
0012 *
0013 * cgcaan.inc
0014 *
0015 #if !defined(CERNLIB_INCLUDE)
0016 #if !defined(CERNLIB_SINGLE)
0017 DOUBLE PRECISION RAD,COSI,SINI,COSDA(2),SINDA(2),XYHA(4,2)
0018 INTEGER NASTP(2)
0019 COMMON /CGCAAN/ RAD,COSI,SINI,COSDA,SINDA,XYHA,NASTP
0020 + ,IFULL,ATREDG
0021 #endif
0022 #endif
0023 #if !defined(CERNLIB_INCLUDE)
0024 #if defined(CERNLIB_SINGLE)
0025 REAL COSDA(2),SINDA(2),XYHA(4,2)
0026 INTEGER NASTP(2)
0027 COMMON /CGCAAN/ RAD,COSI,SINI,COSDA,SINDA,XYHA,NASTP
0028 + ,IFULL,ATREDG
0029 #endif
0030 #endif
0031 *
0032 * cgcaan.inc
0033 *
0034 #if defined(CERNLIB_INCLUDE)
0035 #include "geant321/incbeg.inc"
0036 + CGCAAN
0037 #include "geant321/incend.inc"
0038 *
0039 #endif
0040
0041 #endif
