call cont(10000000)
print msec; " milliseconds"
t0 = msec
print msec+t0; " milliseconds"
end
subroutine cont(n)
sum = 0
for i = 1 to n
sum += 1
next i
end subroutine