先日アップした。収録からンヶ月もたってしまいました。遅れたのは私が編集さぼってたのが原因。しかも手抜き…。反省します。

condとcaseについて。 (define (make-color r g b a) (lambda (cmd) (cond ((eqv? cmd 'r) r) ((eqv? cmd 'g) g) ((eqv? cmd 'b) b) ((eqv? cmd 'a) a)))) condの部分をcaseで置き換えるにはこうする。 (define (make-color r g b a) (lambda (cmd) (case cm…