Sorry. for some reasons. ht is not updated when I compare the starting point and end of one cycle. nothing is changed.
end result with one cycle.
ht[1]
Variable containing:
( 0 ,.,.) = 
   17.8900

( 1 ,.,.) = 
   87.1190

compare to the beginning, there is no change. do you know why?
ht_ori[1]
Variable containing:
( 0 ,.,.) = 
   17.8900

( 1 ,.,.) = 
   87.1190