Warning, /include/higz/hcmctr.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.2 2002/05/22 09:16:20 couet
0006 * - the dimension of ABCD was wrong
0007 *
0008 * Revision 1.1.1.1 1996/02/14 13:10:17 mclareni
0009 * Higz
0010 *
0011 *
0012 #ifndef CERNLIB_HIGZ_HCMCTR_INC
0013 #define CERNLIB_HIGZ_HCMCTR_INC
0014 *
0015 *
0016 * hcmctr.inc
0017 *
0018 PARAMETER (NISO = 4, NMAXP = NISO*13, NMAXT = NISO*12)
0019 REAL XYZ(3,NMAXP),XYZN(3,NMAXP),GRAD(3,NMAXP)
0020 REAL DTRIA(6,NMAXT),ABCD(4,NMAXT)
0021 INTEGER ITRIA(3,NMAXT),IATTR(NMAXT),IORDER(NMAXT)
0022 COMMON /HCMCTR/ XYZ,XYZN,GRAD,DTRIA,ABCD,ITRIA,IATTR,IORDER
0023
0024 #endif
