COMMON/FIXALP/ABSO(MFREQ),EMIS(MFREQ),SCAT(MFREQ), * REIT(MDEPTH),REIN(MDEPTH),REIM(MDEPTH), * REIP(MLVEXP,MDEPTH), * AREIT(MDEPTH),AREIN(MDEPTH),AREIM(MDEPTH), * AREIP(MLVEXP,MDEPTH), * CREIT(MDEPTH),CREIN(MDEPTH),CREIM(MDEPTH), * CREIP(MLVEXP,MDEPTH), * REIX(MDEPTH),CREIX(MDEPTH), * REDX(MDEPTH),REDT(MDEPTH),REDN(MDEPTH), * REDM(MDEPTH),REDP(MLVEXP,MDEPTH), * REDXM(MDEPTH),REDTM(MDEPTH),REDNM(MDEPTH), * REDMM(MDEPTH),REDPM(MLVEXP,MDEPTH), * REDTP(MDEPTH),REDNP(MDEPTH),REDXP(MDEPTH), * REDMP(MDEPTH),REDPP(MLVEXP,MDEPTH), * HEIT(MDEPTH),HEIN(MDEPTH),HEIM(MDEPTH), * HEIP(MLVEXP,MDEPTH), * HEITM(MDEPTH),HEINM(MDEPTH),HEIMM(MDEPTH), * HEIPM(MLVEXP,MDEPTH), * HEITP(MDEPTH),HEINP(MDEPTH),HEIMP(MDEPTH), * HEIPP(MLVEXP,MDEPTH), * EHET(MDEPTH),EHEN(MDEPTH),ERET(MDEPTH),EREN(MDEPTH), * EHEP(MLVEX3,MDEPTH),EREP(MLVEX3,MDEPTH), * APT(MLVEXP,MDEPTH),APN(MLVEXP,MDEPTH), * AAPT(MLVEX3,MDEPTH),AAPN(MLVEX3,MDEPTH), * CAPT(MLVEX3,MDEPTH),CAPN(MLVEX3,MDEPTH), * APP(MLVEXP,MLVEXP,MDEPTH), * AAPP(MLVEX3,MLVEX3,MDEPTH), * CAPP(MLVEX3,MLVEX3,MDEPTH),QTLAS, * IFALI,IFPOPR,irprec,ifprec,itold1,itold2,itlas