diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2014-01-19 21:37:01 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2014-01-19 21:37:01 +0200 |
| commit | 331e16c39a9658f67085b28e656417ee9d3b4b22 (patch) | |
| tree | 8bcceb824bb19165532579af6057584a3d521a4c /test/mpfrnegzero.awk | |
| parent | 4af359f9e6fb5030bdc1174c707b1728f029d7cf (diff) | |
| parent | 20ca1d1ba6e46f116e2dc169d263fd548b9bd074 (diff) | |
| download | egawk-331e16c39a9658f67085b28e656417ee9d3b4b22.tar.gz egawk-331e16c39a9658f67085b28e656417ee9d3b4b22.tar.bz2 egawk-331e16c39a9658f67085b28e656417ee9d3b4b22.zip | |
Merge branch 'gawk-4.1-stable'
Diffstat (limited to 'test/mpfrnegzero.awk')
| -rw-r--r-- | test/mpfrnegzero.awk | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/test/mpfrnegzero.awk b/test/mpfrnegzero.awk new file mode 100644 index 00000000..cc6bf65b --- /dev/null +++ b/test/mpfrnegzero.awk @@ -0,0 +1,15 @@ +BEGIN { + printf("-0 -> %f, -0.0 -> %f\n", -0, -0.0) + + printf("atan2(+0, -0) = %f\n", atan2(+0, -0)) + printf("atan2(+0.0, -0.0) = %f\n", atan2(+0.0, -0.0)) + + printf("atan2(-0, -0) = %f\n", atan2(-0, -0)) + printf("atan2(-0.0, -0.0) = %f\n", atan2(-0.0, -0.0)) + + printf("atan2(+0, +0) = %f\n", atan2(+0, +0)) + printf("atan2(+0.0, +0.0) = %f\n", atan2(+0.0, +0.0)) + + printf("atan2(-0, +0) = %f\n", atan2(-0, +0)) + printf("atan2(-0.0, +0.0) = %f\n", atan2(-0.0, +0.0)) +} |