# Run via time command to see execution time! # number^2 until number > 50 set number,1 marker set,mainloop inc number,$~number cmp smaller,$~number,50,"marker goto,mainloop" print $~number