GEANT321/geant321/s_consts.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.1  1995/10/24 10:20:43  cernlib
   6 * Geant
   7 *
   8 *
   9 #ifndef CERNLIB_GEANT321_S_CONSTS_INC
  10 #define CERNLIB_GEANT321_S_CONSTS_INC
  11 *
  12 *
  13 * s_consts.inc
  14 *
  15       COMMON/CONSTS/ PI,TWPI,PIBTW,MP,MPI,MMU,MEL,MKCH,MK0,SMP,SMPI,
  16      $               SMU,CT,CTKCH,CTK0,
  17      $               ML0,MSP,MS0,MSM,MX0,MXM,CTL0,CTSP,CTSM,CTX0,CTXM,
  18      $               RMASS(35),RCHARG(35)
  19 C
  20                      REAL MP,MPI,MMU,MEL,MKCH,MK0,
  21      *                    ML0,MSP,MS0,MSM,MX0,MXM
  22 C
  23
  24 #endif