Merge from vendor branch TCPDUMP:
[dragonfly.git] / contrib / bc / Test / sqrt.b
1 scale = 5
2 for (a=1; a<500; a++) r=sqrt(a)
3 r
4 scale = 10
5 for (a=1; a<500; a++) r=sqrt(a)
6 r
7 scale = 25
8 for (a=1; a<500; a++) r=sqrt(a)
9 r
10 scale = 40
11 for (a=1; a<500; a++) r=sqrt(a)
12 r
13 quit