GEANT321/geant321/decayc.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_DECAYC_INC
  10 #define CERNLIB_GEANT321_DECAYC_INC
  11 *
  12 *
  13 * decayc.inc
  14 *
  15 C***********************************************************************
  16 C     INCLUDE FILE: DECAYC COPY                   CREATED 12/12/86 BY PA
  17 C     NOTE: SEE ALSO DECAYC2 COPY
  18 C     CHANGES: NONE
  19 C     INCLUDED IN THE FOLLOWING SUBROUTINES OR FUNCTIONS: NOT UPDATED
  20 C
  21 C     DESCRIPTION OF THE COMMON BLOCK(S) AND VARIABLE(S)
  22 C
  23 C***********************************************************************
  24       PARAMETER (IDMAX9=540)
  25       CHARACTER*8 ZKNAME
  26       COMMON/FKDECC/ NZK(IDMAX9,3),WT(IDMAX9)
  27       COMMON/FKDECH/ ZKNAME(IDMAX9)
  28
  29
  30 #endif