obj が手続きであれば #t を返し、そうでなければ #f を返す。
(procedure? car) ⇒ #t (procedure? ’car) ⇒ #f (procedure? (lambda (x) (* x x))) ⇒ #t (procedure? ’(lambda (x) (* x x))) ⇒ #f