       :english {:participle "getting angry"
                 :present {:3sing "gets angry"}
                 :past "got angry"}})
-
-   "get bored"
-   (let [subject-semantics (ref {:human true})]
-     {:synsem {:cat :verb
-               :sem {:pred :get-bored
-                     :subj subject-semantics
-                     :obj subject-semantics}
-               :subcat {:1 {:sem subject-semantics}
-                        :2 '()}}
-      :english {:participle "getting bored"
-                :present {:3sing "gets bored"}
-                :past "got bored"}})
-
+   
    "get dressed"
    (let [subject-semantics (ref {:human true})]
      {:synsem {:cat :verb

   "fold" {:synsem {:cat :verb
                    :sem {:pred :fold}}}
   
   "forget" {:synsem {:cat :verb
                      :sem {:pred :forget}}
             :english {:past "forgot"}}

    :english {:past "hugged"
              :participle "hugging"}}
            
   "hurt" (let [common {:english {:past "hurt"}
                        :synsem {:cat :verb}}]
            [(let [subject-semantics (ref {:human true})
                   subject-agr (ref :top)]
               (merge common
                      {:synsem {:sem {:pred :hurt-oneself
                                      :subj subject-semantics
                                      :obj subject-semantics}
                                :subcat {:1 {:agr subject-agr
                                             :sem subject-semantics}
                                         :2 {:agr subject-agr
                                             :pronoun true
                                             :reflexive true
                                             :sem subject-semantics}}}}))
             (merge common
                    {:synsem {:sem {:pred :hurt
                                    :obj {:animate true}}}})])

