On 2009 Mar 29, at 16:27, Brandon S. Allbery KF8NH wrote:
> cf2 a = let ai = floor a
>             rai = toRational ai
>          in
>             if a == rai
>             then [ai]
>             else rai : cf2 (1 / (a - ai))

Nope, went a bit too fast there, ignore me

--
brandon s. allbery [solaris,freebsd,perl,pugs,haskell] allb...@kf8nh.com
system administrator [openafs,heimdal,too many hats] allb...@ece.cmu.edu
electrical and computer engineering, carnegie mellon university    KF8NH


Attachment: PGP.sig
Description: This is a digitally signed message part

_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to