Emacs Lispback 気ままに書き散らかした小片。 リンク: Gauche ユーザリファレンス GNU Emacs Lisp Reference Manual CL manual fold (リストの畳み込み) Scheme の高階関数 fold を再帰で実装してみよう。kons は2引数の関数とし、knil は初期値、ls はリストである。 リストの各要素を e1,e2,e3...en とすると、左端の要素 e1 を初期値 knil に kons し、更に左から順にとられた要素を累積的に kons して行く(畳み込んで行く)。fold は次の結果を返す。 (kons en (kons … (kons e3 (kons e2 (kons e1 knil))) … )) fold-right は、右端の要素 en を初期値 knil に kons し、更に右から順にとられた要素を累積的に kons して
