Bugfix in AliPoints2Memory
[u/mrichter/AliRoot.git] / GEANT321 / geant321 / resnuc.inc
1 *
2 * $Id$
3 *
4 * $Log$
5 * Revision 1.1.1.1  1995/10/24 10:20:42  cernlib
6 * Geant
7 *
8 *
9 #ifndef CERNLIB_GEANT321_RESNUC_INC
10 #define CERNLIB_GEANT321_RESNUC_INC
11 *
12 *
13 * resnuc.inc
14 *
15 *                                                                     *
16 *=== resnuc ==========================================================*
17 *                                                                     *
18 *---------------------------------------------------------------------*
19 *                                                                     *
20 *     Include file Resnuc                                             *
21 *                                                                     *
22 *     Created on 20 april 1990  by            Alfredo Ferrari         *
23 *                                               INFN Milan            *
24 *                                                                     *
25 *     Last change on  9  march  1993                                  *
26 *                                                                     *
27 *     Included in the following routines:                             *
28 *                                                                     *
29 *            BDNOPT                                                   *
30 *            COREVT                                                   *
31 *            CORRIN                                                   *
32 *            DISTNU                                                   *
33 *            DRES                                                     *
34 *            EVDEEX                                                   *
35 *            EVENTQ                                                   *
36 *            EVENTV                                                   *
37 *            EVEVAP                                                   *
38 *            FEREVV                                                   *
39 *            FERHAV                                                   *
40 *            LOWRES                                                   *
41 *            NUCEVT                                                   *
42 *            NUCEVV                                                   *
43 *            NUCRIN                                                   *
44 *            NUCRIV                                                   *
45 *                                                                     *
46 *---------------------------------------------------------------------*
47 *
48       LOGICAL LRNFSS
49       COMMON /FKRESN/  AMNTAR, AMMTAR, AMNZM1, AMMZM1, AMNNM1, AMMNM1,
50      &                   ANOW,   ZNOW, ANCOLL, ZNCOLL,   ERES,  EKRES,
51      &                 AMNRES, AMMRES,  PTRES,  PXRES,  PYRES,  PZRES,
52      &                 PTRES2,  KTARP,  KTARN, IGREYP, IGREYN,  ICRES,
53      &                  IBRES, IEVAPL, IEVAPH, IEVNEU, IEVPRO, IEVDEU,
54      &                 IEVTRI, IEV3HE, IEV4HE, IDEEXG,  IBTAR, ICHTAR,
55      &                 IOTHER, LRNFSS
56  
57
58 #endif