Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

Fibonacci

Name: Anonymous 2007-07-24 19:07 ID:DzKI9Xsx



fibs :: [Int]

fibs = 0 : 1 : [ a + b | (a, b) <- zip fibs (tail fibs)]

Fibonacci

Name: Anonymous 2007-07-25 19:16 ID:moFgDKky

Although, to be fair, the Perl version isn't using Binet's formula, which the Factor version is: http://mathworld.wolfram.com/BinetsFibonacciNumberFormula.html

Newer Posts