simply schemeの beatle?例題 (define (beatle? person) (member? person '(john paul george ringo))) gaucheにmember?はないので書いてみた (define (member? x list) (if (null? list) #f (if (equal? x (car list)) #t (member? x (cdr list))))) (beatle? 'paul) #t (beatle? 'elvis) #f とプリントされたのでよしとする。 CS61A: Structure and Interpretation of Computer Programs