*
* $Id$
*
* $Log$
* Revision 1.1  1996/03/06 10:47:02  mclareni
* Initial revision
*
*
*
* readiq.inc
*
#include "test_include/rspace.inc"
      COMMON //    NO(40), IFLXQ(10), IXSTOR, IXHOLD
     +,            FENCE(10), LQUSER(7), LQMAIN
     +,            LA1, LA2, LA3, LA4, LA5, LA6
     +,            LX1, LX2, LX3, LX4, LX5, LX6
     +,            M(100), DLAST
                     DIMENSION    LQ(NQN), IQ(NQN), Q(NQN)
                     EQUIVALENCE (LQ(1),LQUSER(1)),(IQ(1),Q(1),LQ(9))
