RosettaCodeData/Task/Pascals-triangle/Haskell/pascals-triangle-7.hs

*Pascal> take 5 <$> (take 5 $ triangle)
[[1,0,0,0,0],[1,1,0,0,0],[1,2,1,0,0],[1,3,3,1,0],[1,4,6,4,1]]