      DIMEMSION  IARRAY(MAXI), INAME(NUMI),
     + IBC       (M         ),
     + KODES     (NG        ),
     + NODES     (NE        ,N         ),
     + NRES      (MAXTYP    ),
     + LTYPE     (NE        ),
     + IADD      (0:M       ),
     + IDIAG     (NDFREE    ),
     + INDEX     (NELFRE    ),
     + LFIRST    (M         ),
     + LLAST     (M         ),
     + LNODE     (N         ),
     + LPFIX     (NE        ,0:NLPFIX  ),
     + NBSPFX    (0:NSEG    ,0:NBSFIX  ),
     + LPPROP    (0:NNPFIX  ),
     + LPROP     (0:NLPFIX  ),
     + LTDATA    (6         ,NLTYPE    ),
     + MISFIX    (0:MISCFX  ),
     + NDXC      (MAXACT    ,NUMCE     ),
     + NODEF     (0:NSEG    ,0:LBN     ),
     + NRANGE    (NG        ,2         ),
     + NREQ      (MAXACT    ),
     + NPFIX     (M         ,0:NNPFIX  ),
