This commit was generated by cvs2svn to compensate for changes in r2,
[u/mrichter/AliRoot.git] / GEANT321 / geant321 / inpdat.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_INPDAT_INC
10 #define CERNLIB_GEANT321_INPDAT_INC
11 *
12 *
13 * inpdat.inc
14 *
15 *
16 *=== inpdat ===========================================================*
17 *
18 *----------------------------------------------------------------------*
19 *     include file: inpdat copy          Created 22/12/86 by PA Aarnio
20 *     changes: revised 29/3/90 by A. Ferrari
21 *     included in the following subroutines or functions: not updated
22 *
23 *     N O W   T H E R E   I S   A   C O P Y   O F   I N P D A T
24 *     (  I N P D A T 2  )   C R E A T E D
25 *     T O   A V O I D   T O   D I R T Y   T H E   B A M J E T
26 *     P A R A M E T E R S !!!!!!!!!!!!
27 *
28 *     description of the common block(s) and variable(s)
29 *
30 *----------------------------------------------------------------------*
31 *
32       COMMON /FKINPD/ A1, B1, B2, B3, BET, AS, B8, AME, DIQ, IMPS(6,6),
33      &                IMVE(6,6),  IB08(6,21), IB10(6,21), IA08(6,21),
34      &                IA10(6,21), LT, LE, ISU
35  
36
37 #endif