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

pascal :: [[Integer]]
pascal =
  (1 : [ 0 | _ <- head pascal])
  : [zipWith (+) (0:row) row | row <- pascal]
Data update 2024-11-04 20:28:54 -08:00			`pascal :: [[Integer]]`
			`pascal =`
			`(1 : [ 0 \| _ <- head pascal])`
			`: [zipWith (+) (0:row) row \| row <- pascal]`