Port numeric.lisp to Clojure