bfloat and factorials



Ed,

I found your case 2 curious.  Please look at the attached 
pdf file, it is a TeXmacs session.

					Kostas

Edwin Woollett wrote:


> case 2: disagreement with a pattern
> 
> (%i14) e3f(s):=
>    block([ ],local(r4),
>     define( r4(x), x!/(((x/4)!)^4 * 4^x)),
>     [bfloat(r4(s)), r4(bfloat(s))] )$
> 
> (%i15) for i thru 11 do print(i,e3f(i))$
> 
> 1 [8.22424b-17,3.70386b-1] 
> 2 [2.02642b-1,2.02642b-1] 
> 3 [2.91763b-17,1.31398b-1] 
> 4 [9.375b-2,9.375b-2] 
> 5 [1.57905b-17,7.11142b-2] 
> 6 [5.62895b-2,5.62895b-2] 
> 7 [1.02074b-17,4.59703b-2] 
> 8 [3.84521b-2,3.84521b-2] 
> 9 [7.27794b-18,3.27769b-2] 
> 10 [2.83699b-2,2.83699b-2] 
> 11 [5.5217b-18,2.48675b-2] 
> 
> What am I missing??
> 
> Ted Woollett
> 
> _______________________________________________
> Maxima mailing list
> Maxima at math.utexas.edu
> http://www.math.utexas.edu/mailman/listinfo/maxima
-------------- next part --------------
A non-text attachment was scrubbed...
Name: ted.pdf
Type: application/pdf
Size: 24575 bytes
Desc: not available
Url : http://www.math.utexas.edu/pipermail/maxima/attachments/20090313/146bcce0/attachment-0001.pdf