Schemeで等価述語以外の述語の例

gistfile1.scm

(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