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

pascal :: [[Integer]]
pascal =
  (1 : [ 0 | _ <- head pascal])
  : [zipWith (+) (0:row) row | row <- pascal]
September Morn Update 2019-09-12 10:33:56 -07:00			`pascal :: [[Integer]]`
			`pascal =`
			`(1 : [ 0 \| _ <- head pascal])`
			`: [zipWith (+) (0:row) row \| row <- pascal]`