GEANT321/geant321/eropts.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.2  1996/07/25 15:01:02  ravndal
   6 * CMZ to CVS conversion artefact removed
   7 *
   8 * Revision 1.1  1996/03/06 15:32:33  mclareni
   9 * Add geane321 includes
  10 *
  11 *
  12 #ifndef CERNLIB_ERPRCDES_EROPTS_INC
  13 #define CERNLIB_ERPRCDES_EROPTS_INC
  14 *
  15 *      Sequence for conditions to stop tracking
  16 *
  17 * eropts.inc
  18 *
  19       CHARACTER*8     CHOPTI
  20       LOGICAL         LEEXAC, LELENG, LEONLY, LEPLAN, LEPOIN, LEVOLU
  21       REAL            ERPLI, ERPLO, ERLENG
  22       INTEGER         NAMEER, NUMVER, IOVLER
  23       COMMON /EROPTS/ ERPLI(3,2), ERPLO(3,4,MXPRED), ERLENG(MXPRED),
  24      +                NAMEER(MXPRED), NUMVER(MXPRED), IOVLER(MXPRED),
  25      +                LEEXAC, LELENG, LEONLY, LEPLAN, LEPOIN, LEVOLU
  26       COMMON /EROPTC/CHOPTI
  27 *
  28 * eropts.inc
  29 *
  30 #if defined(CERNLIB_INCLUDE)
  31 #include "geant231/incbeg.inc"
  32      +    EROPTS
  33 #include "geant321/incend.inc"
  34 #endif
  35
  36 #endif