    (let [subject-semantics (atom {:animate true})]
      {:synsem {:cat :verb
                :sem {:pred :get-angry
+                     :reflexive true
                      :subj subject-semantics
                      :obj subject-semantics}
                :subcat {:1 {:sem subject-semantics}


   "change clothes" {:synsem {:cat :verb
                              :sem {:pred :change-clothes
                                    :subj {:human true}}}
                     :english {:present {:3sing "changes clothes"}
                               :participle "changing clothes"

   (let [subject-semantics (atom {:animate true})]
     {:synsem {:cat :verb
               :sem {:pred :get-up
                     :reflexive true
                     :subj subject-semantics
                     :obj subject-semantics}
               :subcat {:1 {:sem subject-semantics}
