GEANT321/geant321/balanc.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.1  1995/10/24 10:20:37  cernlib
   6 * Geant
   7 *
   8 *
   9 #ifndef CERNLIB_GEANT321_BALANC_INC
  10 #define CERNLIB_GEANT321_BALANC_INC
  11 *
  12 *
  13 * balanc.inc
  14 *
  15 *                                                                     *
  16 *=== balanc ==========================================================*
  17 *                                                                     *
  18       LOGICAL LRESMP, LEVDIF, LPRDIF
  19       COMMON /FKBALA/  ETTOT,  PTTOT, PXTTOT, PYTTOT, PZTTOT,
  20      &                 EINCP,  EINCN, TVGREY, TVGRE0,  TVEUZ,
  21      &                   EUZ,    PUX,    PUY,    PUZ,  ENUCR, PXNUCR,
  22      &                PYNUCR, PZNUCR,  EINTR, PXINTR, PYINTR, PZINTR,
  23      &                  EFRM,  PXFRM,  PYFRM,  PZFRM,   PSEA,
  24      &                NGREYP, NGREYN,    ICU,    IBU, ICNUCR, IBNUCR,
  25      &                ICINTR, IBINTR, LRESMP, LEVDIF, LPRDIF
  26
  27
  28 #endif