    {:unify [common]
     :synsem {:sem {:pred :have-to
                    :subj {:human true}}}})
- 
+
  "désirer" {:synsem {:cat :verb
                      :sem {:pred :desire}}}
- 
+
  "devenir"
  (let [common
          {:synsem {:essere true


 "baisser" {:synsem {:cat :verb
                     :sem {:pred :lower}}}
 
 "boire" {:français {:past-participle "bu"
                     :boot-stem1 "boi"
                     :boot-stem2 "buv"}
          :synsem {:cat :verb
                   :sem {:pred :drink}}}
 
 "changer" {:synsem {:cat :verb
                     :sem {:pred :change}}}
 
 "chanter" {:synsem {:cat :verb
                     :sem {:pred :sing}}}
 
 "commencer" {:synsem {:cat :verb
                       :sem {:pred :begin}}}
 
 "commenter" {:synsem {:cat :verb
                       :sem {:pred :comment}}}
 
 "comprendre" {:synsem {:cat :verb
                        :past-participle "compris"
                        :sem {:pred :understand}}}
 
 "conserver" [{:synsem {:cat :verb
                        :sem {:pred :conserve}}}
              {:synsem {:cat :verb
                        :sem {:pred :preserve}}}]
 
 "considérer" {:synsem {:cat :verb
                        :sem {:pred :consider}}}

 "couper" {:synsem {:cat :verb
                    :sem {:pred :cut}}}
 
 ;; With 'courir', *everything* is an exception:
 ;; TODO: this can probably be done better via
 ;; morphology (francais/morphology/verbs.clj).

{"abandoner" {:synsem {:cat :verb
                       :sem {:pred :abandon}}}

 "abîmer" {:synsem {:cat :verb
                     :sem {:pred :damage}}}

 "accepter" {:synsem {:cat :verb
                      :sem {:pred :accept}}}

 "accompagner" {:synsem {:cat :verb
                         :sem {:pred :accompany}}}

 "acheter" {:synsem {:cat :verb
                     :sem {:subj {:human true}
                           :pred :buy}}}

 "aider" {:synsem {:cat :verb
                   :sem {:pred :help}}}

 "aimer" {:synsem {:cat :verb
                   :sem {:pred :amare
                         :subj {:human true}}}}
 "ajouter" {:synsem {:cat :verb
                     :sem {:pred :add}}}

 "aller" {:français {:future-stem "ir"
                     :present {:1sing "vais"
                               :2sing "vas"
