clojure a day 001 - functions