COMMON/OVERAL/
     1 XO(500)     ,YO(500)      ,WTO(500)    ,YHATO(12,500),IEXPO   ,
     2 THDCS(100)  ,DCSEXP(100)  ,WTDCS(100)  ,DCSCAL(100)  ,NDCS    ,
     3 STEMPB(20)  ,SBEXP(20)    ,WTB(20)     ,BCALC(20)    ,NTMPB   ,
     4 STU(20)     ,UEXP(20)     ,WTU(20)     ,UCALC(20)    ,NTU     ,
     5 STET(20)    ,ETMEXP(11,20),WTET(11,20) ,ETAMIX(11,20),NM(20)  ,
     6 STET12(20)  ,ET12EXP(20)  ,WTET12(20)  ,ET12(20)     ,NET12   ,
     7 STD(100)    ,DIFEXP(100)  ,WTD(100)    ,SD(100)      ,NTMPD   ,
     8 EXPV(30)    ,QSEXP(30)    ,WTQ(30)     ,QCALC(30)    ,NV      ,
     9 TC(3)       ,TCEXP(10,3)  ,WTTC(10,3)  ,TCALC(10,3)  ,NTTC(3) ,
     X STCI(10)    ,TCIEXP(10)   ,WTCI(10)    ,TCICAL(10)   ,NTCI    ,
     1 ALFT(3)     ,ALFEXP(10,3) ,WTALF(10,3) ,ALFCAL(10,3) ,NALF(3) ,
     2 DPT(2)      ,DPEXP(30,2)  ,WTDP(30,2)  ,DPCAL(30,2)  ,NDPT(2) ,
     3 RST(2)      ,RSEXP(30,2)  ,WTST(30,2)  ,STCAL(30,2)  ,NST(2)  ,
     4 PHIO,PHIDCS,PHIB,PHIU,PHIET,PHIETI,PHID,PHIQ,PHITC,PHITCI,
     5 PHIALF,PHIDPT,PHIRST,NTMPET,NTMTC,NTMALF,NTMDP,NTMST,
     6 EMU,VELDCS,STDVO(11),INDEX