(module atom mzscheme (require "require.ss") (require-contracts) (require-etc) (define atom? (disjoin boolean? char? number? symbol? string? null? void?)) (provide/contract [atom? predicate/c]))