Warning, /include/hbook/hcbont.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:49 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_HBOOK_HCBONT_INC
0010 #define CERNLIB_HBOOK_HCBONT_INC
0011 *
0012 *
0013 * hcbont.inc
0014 *
0015 *CMZ : 4.21/10 01/03/94 11.54.50 by Rene Brun
0016 *-- Author : Rene Brun 10/01/94
0017 *
0018 *-- ATTENTION: when changing anything in these common blocks check
0019 *-- also $HCNTPAW.
0020 *
0021 PARAMETER (MAXNP = 1000, MAXNC = 8000)
0022 PARAMETER (MAXDUM=50007-4*MAXNP-3)
0023 REAL XONT(MAXNP), YONT(MAXNP), ZONT(MAXNP), WONT(MAXNP)
0024 REAL DUMCR4(MAXDUM)
0025 INTEGER KONTYP, NONT,NCHONT
0026 CHARACTER*4 CHONT(MAXNC)
0027 *
0028 COMMON /PAWCR4/KONTYP,NONT,XONT,YONT,ZONT,WONT,NCHONT,DUMCR4
0029 COMMON /PAWC32/ CHONT
0030 *
0031
0032 #endif
