[ruby-dev:11595] accumulator, Enumerable#{foldr,foldl}

立石です．

eachなどのブロックにおいて，

[1,2,3].each{|x|r=0| r -= x |r|}
=> -6

の'r'のようなブロック内で一度だけ最初/最後に実行される文を指定で
きるといいなと思ったのですが，どうでしょうか?
あるいは，Enumerable#{foldl,foldr}のようなものが標準で欲しいので
すがユーザが定義するべきでしょうか? 個人的には結構使えそうな気が
するのですが．．．

module Enumerable
  def foldl(initval)
    a = initval
    each{|x| a = yield(a,x)}
    a
  end

  def foldr(initval)
    a = initval
    reverse.each{|x| a = yield(x,a)}  # reverseが定義されないとダメ．
    a
  end
end

結果としては，次のようになります．

[a1,a2,...,an].foldl(a0){|x,y| f(x,y)}
=> f(f(...(f(a0,a1),a2)...))

[a1,a2,...,an].foldr(a0){|x,y| f(x,y)}
=> f(a1,f(a2,f(...,f(an,a0))))

例えば，こんな感じになります．

[1,2,3].foldl(0){|x,y| x - y}
=> -6

[1,2,3].foldr(0){|x,y| x - y}
=> 2

# ruby-mathの方が良いかな．．．?
-- 
Takaaki Tateishi <[e-mail]>
http://kt-www.jaist.ac.jp:8000/~ttate/