THMSTS,THMSTS/-SP=THMSTS,LB:[1,1]BIOREGAN/LB:CHMSTS:CSTHMS,F77OTS/LB / ACTFIL=1 //