GEANT321/geant321/bamjcm.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_BAMJCM_INC
  10 #define CERNLIB_GEANT321_BAMJCM_INC
  11 *
  12 *
  13 * bamjcm.inc
  14 *
  15 *
  16 *=== bamjcm ===========================================================*
  17 *
  18
  19 *                                                                      *
  20 *----------------------------------------------------------------------*
  21 *                                                                      *
  22 *     Bamjcm by A. Ferrari                                             *
  23 *                           included in:                               *
  24 *                                        bamjet                        *
  25 *     When changing kmxjcm dimension look also at verein!!!!!          *
  26 *----------------------------------------------------------------------*
  27 *                                                                      *
  28       PARAMETER (KMXJCM = 100)
  29       COMMON /FKBAMJ/  RPX(KMXJCM),  RPY(KMXJCM),   RE(KMXJCM),
  30      &                KFR1(KMXJCM), KFR2(KMXJCM),   IV(KMXJCM)
  31
  32
  33
  34 #endif