Warning, /include/hbook/hcntpaw.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:51 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_HBOOK_HCNTPAW_INC
0010 #define CERNLIB_HBOOK_HCNTPAW_INC
0011 *
0012 *
0013 * hcntpaw.inc
0014 *
0015 *CMZ : 4.21/10 01/03/94 11.54.50 by Rene Brun
0016 *-- Author : Fons Rademakers 10/04/93
0017 *
0018 *-- ATTENTION: MAXCR4 must be 50007 in order for variables in $HCBONT to
0019 *-- fit into PAWCR4. When changing any of these parameters
0020 *-- check also $HCBONT.
0021 *
0022 PARAMETER (MAXCR8 = 1000, MAXCR4 = 50007, MAXC32 = 1000)
0023 REAL*8 RVAR8(MAXCR8)
0024 REAL RVAR4(MAXCR4)
0025 INTEGER IVAR4(MAXCR4)
0026 LOGICAL LVAR4(MAXCR4)
0027 CHARACTER*32 CVAR32(MAXC32)
0028 *
0029 COMMON /PAWCR8/ RVAR8
0030 COMMON /PAWCR4/ RVAR4
0031 COMMON /PAWC32/ CVAR32
0032 *
0033 EQUIVALENCE (IVAR4, RVAR4)
0034 EQUIVALENCE (LVAR4, RVAR4)
0035 *
0036
0037 #endif
