 (ns babel.francais.lexicon
   (:refer-clojure :exclude [get-in])
   (:require
-   [babel.lexiconfn :refer (unify)]
    [babel.francais.morphology :refer [exception-generator phonize]]
    [babel.francais.pos :refer :all]
    [babel.lexiconfn :refer (compile-lex map-function-on-map-vals unify)]

                               :1plur "disons"
                               :2plur "dites"
                               :3plur "disent"}}}]
     [(merge shared-part-of-dire
             {:synsem {:pred :say}})
      (merge shared-part-of-dire
             {:synsem {:pred :tell}})])
   
   "diviser" {:synsem {:cat :verb
                      :sem {:pred :divide}}}

   "dire"
   (let [shared-part-of-dire
         {:synsem {:cat :verb}
          :français {:français "dire"
                     :past-participle "dit"
                     :future-stem "dir"
                     :imperfect-stem "dis"
                     :present {:1sing "dis"
