    (let [common
          {:synsem {:essere false
                    :cat :verb}
-          :français {:futuro-stem "aur"
+          :français {:future-stem "aur"
                      :drop-e true
                      :past-participle "eu"
                      :imperfect-stem "av"


   "se blesser" (let [subject-semantics (ref {:human true})
                      subject-agr (ref :top)]
                  {:synsem {:cat :verb
                            :essere true
                            :sem {:pred :hurt-oneself
                                  :reflexive true

                    subject-agr (ref :top)]
                {:synsem {:cat :verb
                          :essere true
                          :français {:future-stem "ennui"
                                     :boot-stem "ennui"}
                          :sem {:pred :get-bored
                                :reflexive true
