GEANT321/geant321/inpdat2.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.1  1995/10/24 10:20:40  cernlib
   6 * Geant
   7 *
   8 *
   9 #ifndef CERNLIB_GEANT321_INPDAT2_INC
  10 #define CERNLIB_GEANT321_INPDAT2_INC
  11 *
  12 *
  13 * inpdat2.inc
  14 *
  15 *
  16 *=== inpdat2 ==========================================================*
  17 *
  18 *----------------------------------------------------------------------*
  19 *     include file: inpdat2 copy          created 29/3/90 by A. Ferrari
  20 *     changes: none
  21 *     included in the following subroutines or functions: not updated
  22 *
  23 *     T H I S   I S   A   C O P Y   O F   I N P D A T   C R E A T E D
  24 *     T O   A V O I D   T O   D I R T Y   T H E   B A M J E T
  25 *     P A R A M E T E R S !!!!!!!!!!!!
  26 *
  27 *     description of the common block(s) and variable(s)
  28 *
  29 *----------------------------------------------------------------------*
  30 *
  31       COMMON /FKINPD/ A1BAMJ, B1BAMJ, B2BAMJ, B3BAMJ, BETBAM, ASBAMJ,
  32      &                B8BAMJ, AMEBAM, DIQBAM, IMPS (6,6), IMVE (6,6),
  33      &                IB08 (6,21), IB10 (6,21), IA08 (6,21),
  34      &                IA10 (6,21), LTBAMJ, LEBAMJ, ISUBAM
  35
  36
  37 #endif