Warning, /include/cspack/hcdire.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1996/03/08 15:44:15 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_CSPACK_HCDIRE_INC
0010 #define CERNLIB_CSPACK_HCDIRE_INC
0011 *
0012 *
0013 * hcdire.inc
0014 *
0015 PARAMETER (NLPATM=100, MXFILES=50)
0016 COMMON /HCDIRN/NLCDIR,NLNDIR,NLPAT,ICDIR,NCHTOP,ICHTOP(MXFILES)
0017 + ,ICHTYP(MXFILES),ICHLUN(MXFILES)
0018 CHARACTER*16 CHNDIR, CHCDIR, CHPAT ,CHTOP
0019 COMMON /HCDIRC/CHCDIR(NLPATM),CHNDIR(NLPATM),CHPAT(NLPATM)
0020 + ,CHTOP(NLPATM)
0021 CHARACTER*80 HFNAME
0022 COMMON /HCFILE/HFNAME(MXFILES)
0023 *
0024
0025 #endif
