public
Last active

reddit r/codes/

  • Download Gist
ghci_log.txt
1 2 3 4 5
[Prelude] λ> import Data.Char
[Prelude Data.Char] λ> let fibs = [1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, 233]
[Prelude Data.Char] λ> let mystery = [6, 9, 4, 45, 70, 8, 39, 63, 306 ]
[Prelude Data.Char] λ> map (chr . (+64) . fromInteger) $ zipWith (div) mystery fibs
"FIBONACCI"

Please sign in to comment on this gist.

Something went wrong with that request. Please try again.