関数型プログラミング言語Haskell Part30 [無断転載禁止]©2ch.net

[156 デフォルトの名無しさん 2017/02/17(金) 13:55:10.09 ID:gJ+iD/w/]

パスカルの三角形を出したいんだけど、
++使ってるのが気に食わないのだがうまく消せなかった
import Data.List (unfoldr)
pastri :: [[Int]]
pastri = unfoldr (\l -> Just (l, body l)) [1]
    where
      body xs = 1 : zipWith (+) xs (tail xs) ++ [1]
main = mapM_ print $ take 15 pastri