scale = 20
for (a=1; a<500; a++) r=sqrt(a)
r
quit