Schemeで等価述語以外の述語の例
(pair? '(1)) ; => #t
(null? '()) ; => #t
(list? (list)) ; => #t
(boolean? #f) ; => #t
(symbol? 'example) ; => #t
(number? 1) ; => #t
(char? #\a) ; => #t
(string? "string") ; => #t
(odd? 1) ; => #t
(even? 2) ; => #t
(zero? 0) ; => #t
(char-alphabetic? #\a) ; => #t
(proper-list? '(1 2)) ; => #t
(proper-list? '(1 . 2)) ; => #f
(any odd? '(1 2)) ; => #t
(any odd? '(2 4)) ; => #f