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

[606 デフォルトの名無しさん 2017/05/29(月) 07:35:56.11 ID:Dokhp7Id]

setAt i x xs = let (ys,_:zs) = splitAt (i-1) xs in ys ++ x : xs
別にこういう定義にすればいい
でこれが遅いのは単にysの部分が2パスになるから