#!/usr/bin/clojure
(use '[clojure.string :exclude [replace reverse]])
(let [var (range 10)]
(reduce (fn [x] (if ( == 0 (mod x 2)) (println x) )   )var ))