                      
                      :sem {:pred :put}}}
   "nous"
-  (let [common {:synsem {:case :nom
+  (let [common {:synsem {:case :top
                          :agr {:person :1st
                                :number :plur}
                          :sem {:human true

  "répondre" {:synsem {:cat :verb
                       :sem {:pred :answer}}}

  "se amuser" (let [subject-semantics (ref {:human true})
                    subject-agr (ref :top)]
                {:synsem {:cat :verb
                          :essere true

            common
            {:synsem {:agr {:gender :masc}}})])
  "vous"
  (let [common {:synsem {:case :top
                         :agr {:person :2nd
                               :number :plur}
                         :sem {:human true
