_RL tk1002
tk1002=tk100*tk100
& 90.9241 _d 0*log(tk100) - 1.47696 _d 0*tk1002 +
& 0.0049867 _d 0*tk1002))
& 0.0047036 _d 0*tk1002))
& 90.9241*log(tk100) - 1.47696*tk1002 +
& 0.0049867*tk1002))
& 0.0047036*tk1002))