Back to home page

EIC code displayed by LXR

 
 

    


Warning, /include/hbook/hcbook.inc is written in an unsupported language. File is not indexed.

0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1  1996/01/16 17:07:50  mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_HBOOK_HCBOOK_INC
0010 #define CERNLIB_HBOOK_HCBOOK_INC
0011 *
0012 *
0013 * hcbook.inc
0014 *
0015 *CMZ :  4.19/01 30/04/93  17.22.15  by  Rene Brun
0016 *-- Author :
0017       INTEGER     NWPAW,IXPAWC,IHDIV,IXHIGZ,IXKU,        LMAIN
0018       REAL                                       FENC   ,      HCV
0019       COMMON/PAWC/NWPAW,IXPAWC,IHDIV,IXHIGZ,IXKU,FENC(5),LMAIN,HCV(9989)
0020       INTEGER   IQ        ,LQ
0021       REAL            Q
0022       DIMENSION IQ(2),Q(2),LQ(8000)
0023       EQUIVALENCE (LQ(1),LMAIN),(IQ(1),LQ(9)),(Q(1),IQ(1))
0024       INTEGER       HVERSN,IHWORK,LHBOOK,LHPLOT,LGTIT,LHWORK,
0025      +LCDIR,LSDIR,LIDS,LTAB,LCID,LCONT,LSCAT,LPROX,LPROY,LSLIX,
0026      +LSLIY,LBANX,LBANY,LPRX,LPRY,LFIX,LLID,LR1,LR2,LNAME,LCHAR,LINT,
0027      +LREAL,LBLOK,LLBLK,LBUFM,LBUF,LTMPM,LTMP,LTMP1,LHPLIP,LHDUM,
0028      +LHFIT,LFUNC,LHFCO,LHFNA,LCIDN
0029       COMMON/HCBOOK/HVERSN,IHWORK,LHBOOK,LHPLOT,LGTIT,LHWORK,
0030      +LCDIR,LSDIR,LIDS,LTAB,LCID,LCONT,LSCAT,LPROX,LPROY,LSLIX,
0031      +LSLIY,LBANX,LBANY,LPRX,LPRY,LFIX,LLID,LR1,LR2,LNAME,LCHAR,LINT,
0032      +LREAL,LBLOK,LLBLK,LBUFM,LBUF,LTMPM,LTMP,LTMP1,LHPLIP,LHDUM(9),
0033      +LHFIT,LFUNC,LHFCO,LHFNA,LCIDN
0034 *
0035 #include "hbook/hck.inc"
0036 
0037 #endif