[4clojure] squares squared solution