Warning, /include/cspack/hcbook.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_HCBOOK_INC
0010 #define CERNLIB_CSPACK_HCBOOK_INC
0011 *
0012 *
0013 * hcbook.inc
0014 *
0015 INTEGER NWPAW,IXPAWC,IHDIV,IXHIGZ,IXKU, LMAIN
0016 REAL FENC , HCV
0017 COMMON/PAWC/NWPAW,IXPAWC,IHDIV,IXHIGZ,IXKU,FENC(5),LMAIN,HCV(9989)
0018 INTEGER IQ ,LQ
0019 REAL Q
0020 DIMENSION IQ(2),Q(2),LQ(8000)
0021 EQUIVALENCE (LQ(1),LMAIN),(IQ(1),LQ(9)),(Q(1),IQ(1))
0022 INTEGER HVERSN,IHWORK,LHBOOK,LHPLOT,LGTIT,LHWORK,
0023 +LCDIR,LSDIR,LIDS,LTAB,LCID,LCONT,LSCAT,LPROX,LPROY,LSLIX,
0024 +LSLIY,LBANX,LBANY,LPRX,LPRY,LFIX,LLID,LR1,LR2,LNAME,LCHAR,LINT,
0025 +LREAL,LBLOK,LLBLK,LBUFM,LBUF,LTMPM,LTMP,LTMP1,LHDUM,
0026 +LHFIT,LFUNC,LHFCO,LHFNA,LCIDN
0027 COMMON/HCBOOK/HVERSN,IHWORK,LHBOOK,LHPLOT,LGTIT,LHWORK,
0028 +LCDIR,LSDIR,LIDS,LTAB,LCID,LCONT,LSCAT,LPROX,LPROY,LSLIX,
0029 +LSLIY,LBANX,LBANY,LPRX,LPRY,LFIX,LLID,LR1,LR2,LNAME,LCHAR,LINT,
0030 +LREAL,LBLOK,LLBLK,LBUFM,LBUF,LTMPM,LTMP,LTMP1,LHDUM(10),
0031 +LHFIT,LFUNC,LHFCO,LHFNA,LCIDN
0032 *
0033 #include "cspack/hck.inc"
0034
0035 #endif
