Experimental code to do a haar wavelet transform in clojure