Hello!
On Wed, Mar 21, 2001 at 04:56:21PM +0900, Satoru Takabayashi wrote:
> Hi,
> I got an unexpected result with division with huge numbers.
> % hugs
> Prelude> :version
> -- Hugs Version February 2001
> Prelude> 21099067259124990080755354669061414400 /
>708801874985091845381344307009569161216
> 0.0
> Is it a bug or just a limitation? I think it should be something like:
> % guile # a scheme interpreter
> guile> (/ 21099067259124990080755354669061414400
>708801874985091845381344307009569161216)
> 0.0297672283380582
I just tested it. At least my installation of hugs seems to treat
Double equally as Float (single precision IEEE).
And in single precision float, your divisor is already too large and
thus is converted to infinity.
The scheme interpreter you tested seems to treat both numbers as bigint,
divides them and *then* converts the result to double float.
You can do this in Haskell, too:
let a = 21099067259124990080755354669061414400
b = 708801874985091845381344307009569161216
in fromRational (a/b :: Rational) :: Double
However, scheme48 yields:
> (define a 21099067259124990080755354669061414400)
> (define b 708801874985091845381344307009569161216)
> (/ a b)
169584838438183112145988897481525/5697031531194475351894806994354176
And clisp (a Common Lisp implementation):
[1]> (defconstant *a* 21099067259124990080755354669061414400)
*A*
[2]> (defconstant *b* 708801874985091845381344307009569161216)
*B*
[3]> (/ *a* *b*)
169584838438183112145988897481525/5697031531194475351894806994354176
Kind regards,
Hannah.
_______________________________________________
Hugs-Bugs mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/hugs-bugs
