Warning, /include/hepdb/ckkeys.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1996/02/28 16:24:04 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_HEPDB_CKKEYS_INC
0010 #define CERNLIB_HEPDB_CKKEYS_INC
0011 *
0012 *
0013 * ckkeys.inc
0014 *
0015 INTEGER TENCK
0016 PARAMETER (MXDMCK=90, MXKYCK=10000, TENCK=10, MXKPCK=1000)
0017 PARAMETER (NOF1CK=10, NOF2CK=10, NOF3CK=6)
0018 PARAMETER (NOFSCK=5, NOFECK=5)
0019 * For DBL3
0020 * PARAMETER (NOF1CK=2, NOF2CK=5, NOF3CK=3)
0021 *
0022 COMMON /CKKEYS/ ICONCK(MXDMCK), INDKCK(MXKYCK), IOTYCK(MXDMCK)
0023 + , IPURCK(MXKYCK), KEY1CK(MXKYCK), KEYNCK(MXDMCK)
0024 + , KEYVCK(MXDMCK), KYP1CK(MXDMCK), KYP2CK(MXDMCK)
0025 + , KYVMCK(MXDMCK), KEY7CK, NKEYCK, NSKPCK, NSYSCK
0026 + , NWKYCK
0027 DIMENSION RKY1CK(MXKYCK)
0028 EQUIVALENCE (KEY1CK(1), RKY1CK(1))
0029 *
0030 COMMON /CKTAGS/ CHTGCK(TENCK), CTAGCK(MXDMCK), CHFTCK
0031 CHARACTER CHFTCK*32, CHTGCK*8, CTAGCK*8
0032 *
0033
0034 #endif
