                   {:synsem {:sem {:pred :be}}})
            (let [subject-semantics (ref {:spec {:def :possessive}
                                          :pred :name})
-                 object-semantics (ref {:propernoun true})]
+                 object-semantics (ref :top)]
              (merge common
                     {:intransitivize false
                      :synsem {:sem {:pred :be-called

  {
   "Antonia"
   {:synsem {:sem {:pred :antonia
                   :propernoun true
                   :human true}
             :agr {:number :sing
                   :person :3rd
                   :gender :fem}}}

   "Antonio"
   {:synsem {:agr {:number :sing
                   :person :3rd
                   :gender :masc}
             :sem {:pred :antonio
                   :propernoun true
                   :human true}}}
   "a"
   {:synsem {:cat :det
             :def :indef

                    {:synsem {:sem {:pred :hurt
                                    :obj {:animate true}}}})])
   "Juan" {:synsem {:sem {:pred :Juan
                          :human true}
                    :propernoun true
                    :agr {:number :sing
                          :person :3rd
                          :gender :masc}}}
