GEANT321/geant321/metlsp.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_METLSP_INC
  10 #define CERNLIB_GEANT321_METLSP_INC
  11 *
  12 *
  13 * metlsp.inc
  14 *
  15 C***********************************************************************
  16 C     INCLUDE FILE: METLSP COPY                   CREATED 11/12/86 BY PA
  17 C     CHANGES: NONE
  18 C     INCLUDED IN THE FOLLOWING SUBROUTINES OR FUNCTIONS: NOT UPDATED
  19 C
  20 C     DESCRIPTION OF THE COMMON BLOCK(S) AND VARIABLE(S)
  21 C
  22 C***********************************************************************
  23       PARAMETER (IDMAX2=1133)
  24       COMMON/FKMETL/ IS,ITS(IDMAX2),CXS(IDMAX2),CYS(IDMAX2),CZS(IDMAX2),
  25      *ELS(IDMAX2),PLS(IDMAX2)
  26
  27
  28 #endif