initial import -- translated example from Stanford's website to Clojure