ああ、560行がおかしい。
560 T(K-1)=T(K)
だ。