aTS = log(aTT/aTK)
aTS2 = aTS*aTS
aTS3 = aTS2*aTS
aTS4 = aTS3*aTS
aTS5 = aTS4*aTS
oCnew = oA0 + oA1*aTS + oA2*aTS2 + oA3*aTS3 +
& + stemp*(oB0 + oB1*aTS + oB2*aTS2 + oB3*aTS3)
_RL aTS