GEANT321/geant321/finlsp.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_FINLSP_INC
  10 #define CERNLIB_GEANT321_FINLSP_INC
  11 *
  12 *
  13 * finlsp.inc
  14 *
  15 C***********************************************************************
  16 C     INCLUDE FILE: FINLSP COPY                   CREATED 11/12/86 BY PA
  17 C     NOTE: SEE ALSO FILE FINLSP2 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 (IDMAX7=100)
  25       COMMON/FKFINL/ CXR(IDMAX7),CYR(IDMAX7),CZR(IDMAX7),
  26      *ELR(IDMAX7),PLR(IDMAX7),IR,ITR(IDMAX7)
  27
  28
  29 #endif