       (string? (get-in word '(:english)))
       (get-in word '(:english))
 
-      :else (str root )))
+      :else (str root)))
 
    (and
     (get-in word '(:plur))

         last-stem-char-is-vowel (re-find #"[aeiou]$" stem)]
     (log/debug "+else")
     (log/debug (str "(english):word: " word))
     (cond
      (and (= person :1st) (= number :sing)
           (string? (get-in word '(:present :1sing))))
      (get-in word '(:present :1sing))

             used-to-form

             true
       (cond ;; imperfect exception-handling: check for :participle

        ;; TODO: add support for per-agreement (by number or person) irregular participle;
        ;; for now, only support for a single participle irregular form for all agreements.
