とても簡単なスキーム関数です
(define member?
(lambda (a lat)
(cond
((null? lat) #f)
(else (or (eq? (car lat) a)
(member? a (cdr lat))
))
)
)
)
ただし、 vim で,dまたは,Fを押してこの関数を実行すると、エラーが発生します。
/home/oo/tmp/t.scm:64 読み取りエラー: #\F のディスパッチ関数が定義されていません
行: 4、列: 21、ファイル位置: 64
ストリーム: #<SB-SYS:FD-STREAM for "file /home/oo/tmp/t.scm" {AC84DA9}>