a couple functions in a clojure script