(defn reverse-string [s]
  "Returns a string with all characters in reverse"
  (apply str (reduce conj '() s)))