                    morph/exception-generator
                    morph/phonize)
 
+      apply-unify-key
+      
       ;; <category-independent rules>
 
       (default

                           ;; example of a synonym, where we use the convention of making the
                           ;; :pred (i.e. :student) the more common case (c.f. "student")
                           :pred :student}}}

   "put" {:english {:past "put"
                    :participle "putting"}
          :synsem {:cat :verb
                   :sem {:pred :put}}}

   "radio" {:synsem {:cat :noun
                     :sem {:pred :radio}}}


  (:require
   [babel.encyclopedia :as encyc]
   [babel.english.morphology :as morph]
   [babel.lexiconfn :refer [apply-unify-key compile-lex default new-entries verb-pred-defaults]]
   [dag_unify.core :refer [dissoc-paths fail? get-in strip-refs unify]]))

(def lexicon-source
