     [string]
     (str (char 2) string (char 15)))
 
-(defn reset
-    []
+(def reset
     (str (char 15)))
 
 (defn yes-no-with-caution


(defn preferred-forms
    [w]
    (str (reset)
         (bold "class: ")           (:class w) " "
         (bold "use it: ")          (yes-no-with-caution w :use) " "
         (bold "description: ")     (:description w) " "


(defn incorrect-forms
    [w]
    (str reset
         (bold "class: ")           (:class w) " "
         (bold "use it: ")          (yes-no-with-caution w :use) " "
         (bold "description: ")     (:description w) " "
