This is the mail archive of the guile@cygnus.com mailing list for the guile project.
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |
*-Keith Wright <kwright@tiac.net> | | Did you try it? I used the following program. | (define (fact n) | (let mul ((k 1)(p 1)) | (if (> k n) p (mul (+ k 1)(* k p))))) | after testing with (fact 4) and (fact 5), I tried | (fact 10000) and got something ending in | 000000000000000000000000000000000000000004617333575079170156 FWIW; elk seems to get it right, with heaps of 0's in the end. -- The only way tcsh "rocks" is when the rocks are attached to its feet in the deepest part of a very deep lake. (Linus Torvalds) olet@ifi.uio.no [-: .elOle. :-] olet@debian.org