SICP 問題 3.33

入力として三つのコネクタa,b,cをとり，cの値がaとbの値の平均であるような制約を達成する手続きaverager.
adderとmultiplierを繋ぐコネクタをp.
定数2に繋がるコネクタをxとした．

(define (averager a b c)
  (let ((x (make-connector))
        (p (make-connector)))
    (adder a b p)
    (multiplier c x p)
    (constant 2 x)
    'ok))