RosettaCodeData/Task/Partition-function-P/Haskell/partition-function-p-3.hs

7 lines
284 B
Haskell

ghci> take 30 part
[1,1,2,3,5,7,11,15,22,30,42,56,77,101,135,176,231,297,385,490,627,792,1002,1255,1575,1958,2436,3010,3718,4565]
ghci> :set +s
ghci> part !! 6666
193655306161707661080005073394486091998480950338405932486880600467114423441282418165863
(4.89 secs, 5,214,048,336 bytes)