> > In the gcl I am using, I get
> >
> > >(sin (* 7.25 pi))
> >
> > -0.70710678118654757
>
> GCL's result above is correct (to many digits).
I think the problem is specific to clisp when using double precision in
some cases:
In clisp:
[1]> (sin (* pi 7.25))
-0.7071066 <- correct
[2]> (sin (* pi 7.25d0))
0.0d0 <- incorrect
[3]> (sin (* pi 7.251d0))
-0.709324729572275d0 <- correct
[4]> (sin (* pi 7.249d0))
-0.7048818539423602d0 <- correct
In cmucl:
* (sin (* pi 7.25))
-0.7071067811865476d0
* (sin (* pi 7.25d0))
-0.7071067811865476d0
* (sin (* pi 7.251d0))
-0.709324729572275d0
* (sin (* pi 7.249d0))
-0.7048818539423602d0
--
Mario Rodriguez Riotorto
www.biomates.net