"power of" in Clojure

gistfile1.clj

(defn power-of? [power number]
  "Returns true if a number is a power of another number, eg, 
      (power-of? 5 25) => true
      (power-of? 5 26) => false"
  (= 
    (mod 
       (/ 
	      (Math/log number) 
	      (Math/log power) ) 
       1 ) 
    0 )
)

(def power-of?
   ; memoize power-of to cache results
   (memoize power-of?)	
)

(defn power-of-2? [x]
  "Returns true if a number is a power of 2"
  (power-of? 2 x)
)