$ perl -e 'for (-2.0,-1.9,-1.5,-1.1,-1.0,-0.9,-0.5,-0.1,-0) {$v = $_ * 0; printf("%5s -> %2s,%.100e\n",$_,$v,$v)}' -2 -> 0,0.00000000000000000000000000000000000000000000000000000000 +00000000000000000000000000000000000000000000e+00 -1.9 -> -0,-0.0000000000000000000000000000000000000000000000000000000 +000000000000000000000000000000000000000000000e+00 -1.5 -> -0,-0.0000000000000000000000000000000000000000000000000000000 +000000000000000000000000000000000000000000000e+00 -1.1 -> -0,-0.0000000000000000000000000000000000000000000000000000000 +000000000000000000000000000000000000000000000e+00 -1 -> 0,0.00000000000000000000000000000000000000000000000000000000 +00000000000000000000000000000000000000000000e+00 -0.9 -> -0,-0.0000000000000000000000000000000000000000000000000000000 +000000000000000000000000000000000000000000000e+00 -0.5 -> -0,-0.0000000000000000000000000000000000000000000000000000000 +000000000000000000000000000000000000000000000e+00 -0.1 -> -0,-0.0000000000000000000000000000000000000000000000000000000 +000000000000000000000000000000000000000000000e+00 0 -> 0,0.00000000000000000000000000000000000000000000000000000000 +00000000000000000000000000000000000000000000e+00 $ perl -v This is perl, v5.8.8 built for i486-linux-gnu-thread-multi ... $ uname -a Linux fmdev10 2.6.24-etchnhalf.1-686 #1 SMP Tue Dec 2 07:56:33 UTC 200 +8 i686 GNU/Linux
(Debian build)
In reply to Re^3: Negative zero from a multiplication by a zero?
by ikegami
in thread Negative zero from a multiplication by a zero?
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |