C COMMON/CINPUT/ TP2TE,WLMIN,WLMAX,SMALLN,CECOEF, * ISUM,ICOLL,ISPLIN, * IWATOM, IWLINE, IWEQI, IDEBUG, IWATMO, * CRTN CHARACTER*6 CRTN