diff options
| author | andreas <andreas@FreeBSD.org> | 1998-04-29 21:53:01 +0000 |
|---|---|---|
| committer | andreas <andreas@FreeBSD.org> | 1998-04-29 21:53:01 +0000 |
| commit | 0ec6169bea8adb8ddbf8f9ce363f6e1803f88621 (patch) | |
| tree | 1529c15b522fa7bd199b5491bc88817aefc9b779 /contrib/bc/Test/sqrt1.b | |
| download | FreeBSD-src-0ec6169bea8adb8ddbf8f9ce363f6e1803f88621.zip FreeBSD-src-0ec6169bea8adb8ddbf8f9ce363f6e1803f88621.tar.gz | |
Import GNU bc 1.04
PR: 4183
Diffstat (limited to 'contrib/bc/Test/sqrt1.b')
| -rw-r--r-- | contrib/bc/Test/sqrt1.b | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/contrib/bc/Test/sqrt1.b b/contrib/bc/Test/sqrt1.b new file mode 100644 index 0000000..c3ca269 --- /dev/null +++ b/contrib/bc/Test/sqrt1.b @@ -0,0 +1,13 @@ +for (j=0; j<10; j++) { + a = .9; + b = .9+j; + scale = 2; + for (i=0; i<90; i++) { + scale += 1; + a /= 10; + b += a; + x = sqrt(b); + } + x; +} +quit |
