Back to home page

EIC code displayed by LXR

 
 

    


Warning, /include/zebra/zbcd.inc is written in an unsupported language. File is not indexed.

0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1  1996/03/06 10:46:51  mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_ZEBRA_ZBCD_INC
0010 #define CERNLIB_ZEBRA_ZBCD_INC
0011 *
0012 *                 BCD char. in CETA order with A1 format
0013 *
0014 * zbcd.inc
0015 *
0016       COMMON /ZBCD/  IQNUM2(11),IQLETT(26),IQNUM(10),   IQPLUS,IQMINS
0017      +,              IQSTAR,IQSLAS,IQOPEN,IQCLOS,IQDOLL,IQEQU, IQBLAN
0018      +,              IQCOMA,IQDOT, IQNUMB,IQAPO, IQEXCL,IQCOLO,IQQUOT
0019      +,              IQUNDE,IQCLSQ,IQAND, IQAT,  IQQUES,IQOPSQ,IQGREA
0020      +,              IQLESS,IQREVE,IQCIRC,IQSEMI,IQPERC,  IQLOWL(26)
0021      +,              IQCROP,IQVERT,IQCRCL,IQNOT, IQGRAV,  IQILEG
0022      +,              NQHOL0,NQHOLL(95)
0023 
0024 #endif