*
* $Id$
*
* $Log$
* Revision 1.1  1996/02/15 17:55:03  mclareni
* Initial revision
*
*
*
* tublow1.inc
*
#if 0
      DIMENSION    MCHECK(5)
#endif
#if 0
      EQUIVALENCE (MCHECK,CHECK)
#endif
#if 0
      DATA MCHECK  /40H 0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ    /
#endif
#if 0
      DATA NCH     /37/
#endif
