   
 (defn symbol-named?
   "Is the thing a symbol with the name given by the string?"
-  [thing string]
-  (and (symbol? thing)
-       (= (name thing) string)))
+  [x string]
+  (and (symbol? x)
+       (= (name x) string)))
 
 (defn first-named?
   "Is the form's first element a symbol whose name is the desired string?"

  [f x]
  (cons (f (first x)) (rest x)))

(defn named? [thing]
  (instance? clojure.lang.Named thing))
        [utilize.seq :only (first-truthy-fn)])
  (:require [clojure.zip :as zip]))

(defn regex? [x]
  (= (class x) java.util.regex.Pattern))

(defn classic-map? [x]
  (.isInstance clojure.lang.APersistentMap x))
