brettrowberry

(System/getProperty "user.dir")

brettrowberry

(defn isogram?
  "An isogram is a word in which no letters occur more than once.
   Empty string is considered an isogram in this implementation."
  [^String s]
  (boolean
   (when (string? s)
     (loop [letters (sort (seq s))]
       (let [[current next & _] letters]
         (cond
           (nil? next) true