関数型言語の勉強にSICPを読もう - (75) 4章 - 超言語的抽象(266-267ページ)
問題4.56
a. Ben Bididdleが監督している人全ての名前と住所
(and (supervisor ?x (Bitdiddle Ben)) (address ?x . ?y))
b.給料がBen bitdiddleのそれより少ない人のすべてと、その人たちの給料と、Ben Bittdiddleの給料
(or (salary (Bitdiddle Ben) ?amount) (and (salary ?x ?y) (lisp-value < ?y ?amount)))
どうでも良いんですが、こんなもの悲しいQueryは嫌いです(ぉ
c.計算機部門にいない人が監督している人全てとその監督者の名前と担当
(and (not (job ?who (computer ?type))) (and (supervisor ?w ?t) (lisp-value eq ?who ?w)))
計算機プログラムの構造と解釈
posted with amazlet on 06.05.31