www.pudn.com > laminar.rar > bound.inc, change:2000-11-23,size:604b


      COMMON /IBOUND/ IJI(NIA),IJPI(NIA),NINL(NGR),IIS(NGR),
     *       IJI1(NIA),IJI2(NIA),IJO(NOA),IJPO(NOA),NOUT(NGR),
     *       IOS(NGR),IJO1(NOA),IJO2(NOA),IJS(NSA),IJPS(NSA),
     *       NSYM(NGR),ISS(NGR),IJS1(NSA),IJS2(NSA),IJW(NWA),
     *       IJPW(NWA),NWAL(NGR),IWS(NGR),IJW1(NWA),IJW2(NWA),
     *       IWAS(NGR),NWALI(NGR),NWALA(NGR),IJL(NOCA),IJR(NOCA),        
     *       NOC(NGR),IOCS(NGR),IJOC1(NOCA),IJOC2(NOCA)
      COMMON /RBOUND/ FMI(NIA),FMO(NOA),SRDS(NSA),XNS(NSA),
     *       YNS(NSA),SRDW(NWA),XTW(NWA),YTW(NWA),FOC(NOCA),
     *       FMOC(NOCA),AR(NOCA),AL(NOCA)