(simple-ident? x)
Return true if x is a symbol or keyword without a namespace
(defn simple-ident? [x] (and (ident? x) (nil? (namespace x))))