GEANT321/geant321/depnuc.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.1  1995/10/24 10:20:38  cernlib
   6 * Geant
   7 *
   8 *
   9 #ifndef CERNLIB_GEANT321_DEPNUC_INC
  10 #define CERNLIB_GEANT321_DEPNUC_INC
  11 *
  12 *
  13 * depnuc.inc
  14 *
  15 *                                                                     *
  16 *=== depnuc ==========================================================*
  17 *                                                                     *
  18       LOGICAL LLASTN, LLAST1
  19       COMMON /FKDEPN/    EKLAST, AMLAST, PXLAST, PYLAST, PZLAST,
  20      &                   EKINC , AMINC , PXXINC, PYYINC, PZZINC,
  21      &                   KTLAST, KTINC , LLASTN, LLAST1
  22
  23
  24 #endif