この折りたたみと繰り返しのパターンは何ですか？

Question

シーケンスを折りたたみ、範囲に沿ったいくつかの点で中間値も知りたいとします。これは私はこのために使用したものである：

[a,b,c] = map fst . tail $ chain [g i, g j, g k] (zero, sequence) 

g :: Integer -> (a,b) -> (a,b) 

chain (f:fs) x = x : chain fs (f x) 
chain [] x = [x] 

機能gは、いくつかの初期値から開始し、同じ結果を生成する、（等長i、jの）入力シーケンスの特定の部分を消費します次の呼び出しに供給される型。開始と同じ初期値から始まる異なる長さのためにシーケンスを数回消費することはもちろん、時間的にも空間的にも非効率的であろう。

したがって、この一連の整数（シーケンスの中間点）を折りたたみます。一方、この関数を繰り返し実行します（g）。それは何ですか？私はここに何か基本的なものを欠いていますこれは折り返しのレパートリーなどで何とか表現できますか？

EDIT：解決済み ：修正の繰り返しが実際にある修飾子のリストの上に折る方法 上記単に

[a,b,c] = map fst . tail $ scanl (flip g) (zero, sequence) [i, j, k] 

面白いです。

Answer 1

はscanl試し：http://www.haskell.org/hoogle/?hoogle=scanl

scanlはfoldlのと同様であるが、左から連続低下 値のリストを返す：

scanl f z [x1, x2, ...] == [z, z `f` x1, (z `f` x1) `f` x2, ...] 

なお

last (scanl f z xs) == foldl f z xs 

Answer 2

マルチンさんのコメント、あなたは基本的にしたい：

intermediates = scanl step zero sequence 
map (\n -> intermediates !! n) [i, j, k] 

stepはgではなく、リストsequenceの単一の要素を消費gのほんの一部。

また、正解としてMarcin'sを受け入れます。