Basic ACL2 functions supported in Smtlink.
Definition: *smt-basics*
(defconst *smt-basics* (append '(magic-fix) '(rationalp realp booleanp integerp symbolp) '(binary-+ binary-* unary-/ unary-- equal < implies if not lambda)))