   (:require
    [babel.encyclopedia :as encyc]
    [babel.lexiconfn :refer [compile-lex default
-                            if-then
+                            if-then new-entries
                             map-function-on-map-vals unify
                             verb-pred-defaults]]
    [babel.english.morphology :as morph]

                              intransitivize
                              subject-verb-agreement
                              transitivize]]
   [dag_unify.core :refer [fail? get-in strip-refs unifyc]]))

(declare edn2lexicon)


   "wake up"
   (let [subject-semantics (atom :top)]
     {:synsem {:cat :verb
               :sem {:pred :wake-up
                     :reflexive true}
               :subcat {:2 '()}}
      :english {:participle "waking up"
                :present {:3sing "wakes up"}
