iterateパッケージ

lisp

俺はDebian GNU/Linux使いなので apt-get install cl-iterate でインストール。

ITER> (require :iterate)
ITER> (iterate (for xx in '((1 . 1) (2 . 3)))
               (maximizing (+ (car xx)(cdr xx))))
5
ITER> (iterate (for xx in '((1 . 1) (2 . 3)))
               (finding xx maximizing (+ (car xx)(cdr xx))))
(2 . 3)

うはっ、こりゃええ！！
念願だった「○○が最大になるような××」を求めるコード。
しかも拡張もできるんだって？

http://common-lisp.net/project/iterate/doc/index.html

こんなところにマニュアルがあった。