*
* $Id: testc.inc,v 1.1.1.1 1996/03/08 15:21:44 mclareni Exp $
*
* $Log: testc.inc,v $
* Revision 1.1.1.1  1996/03/08 15:21:44  mclareni
* Epio
*
*
*
* testc.inc
*
#if (!defined(CERNLIB_VAXLONG))&&(!defined(CERNLIB_ND100B16))
      COMMON//NWOUT,NREC,IERR,NH,NPASS,ILWORD,ISPAN,IPAD,JREC,
     1 NBIT,ICALL,JWORD,IBUF11(1000),IBUF12(1000),IBUF13(1000),
     2 IDAT(500),IPAC(500),IH(10)
      COMMON/EPDBGC/DBUGFL
      LOGICAL DBUGFL
#endif
#if defined(CERNLIB_ND100B16)
      COMMON//NWOUT,NREC,IERR,NH,NPASS,ILWORD,ISPAN,IPAD,JREC,
     1 NBIT,ICALL,JWORD,IBUF11(2000),IBUF12(2000),IBUF13(2000),
     2 IDAT(1000),IPAC(1000),IH(20)
      COMMON/EPDBGC/DBUGFL
      LOGICAL DBUGFL
#endif
#if defined(CERNLIB_VAXLONG)
        PARAMETER (NVAXLONG = 3060)
      COMMON//NWOUT,NREC,IERR,NH,NPASS,ILWORD,ISPAN,IPAD,JREC,
     1 NBIT,ICALL,JWORD,IBUF11(NVAXLONG),IBUF12(1000),IBUF13(1000),
     2 IDAT(500),IPAC(500),IH(10)
      COMMON/EPDBGC/DBUGFL
      LOGICAL DBUGFL
#endif