Back to home page

EIC code displayed by LXR

 
 

    


Warning, /include/higz/hcrast.inc is written in an unsupported language. File is not indexed.

0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1  1996/02/14 13:10:15  mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_HIGZ_HCRAST_INC
0010 #define CERNLIB_HIGZ_HCRAST_INC
0011 *
0012 *
0013 * hcrast.inc
0014 *
0015       PARAMETER          (NBW=30, L1=NBW/2, L2=(NBW+1)/2)
0016       PARAMETER          (LMASK=(NBW+1)*L1+(NBW-L1*2)*L2)
0017       INTEGER            IRAST(4),JMASK(NBW),MASK(LMASK)
0018       COMMON /HCRAST/    NXRAST,NYRAST,XRAST,DXRAST,YRAST,DYRAST,
0019      &                   IFRAST,JRAST,IRAST,JMASK,MASK
0020 
0021 #endif