a x =lt(x,5000000) x + 1 :s(a) date() rpos(1) rem . output end