Merge from vendor branch TCPDUMP:
[dragonfly.git] / contrib / bc / Test / sqrt2.b
1 scale = 20
2 for (a=1; a<5000; a += 1) r=sqrt(a)
3 r
4 for (a=1; a<50000; a += 100) r=sqrt(a)
5 r
6 for (a=1; a<500000; a+=1000) r=sqrt(a)
7 r
8 for (a=1; a<5000000; a+=10000) r=sqrt(a)
9 r
10 quit