mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/Bell-numbers/Haskell/bell-numbers-2.hs

5 lines
119 B
Haskell
Raw Permalink Blame History

import Control.Arrow
bellTri :: [[Integer]]
bellTri = map snd (iterate ((last &&& id) . uncurry (scanl (+))) (1,[1]))
Reference in New Issue View Git Blame Copy Permalink