                                        :3plur "were"}}}]
           [;; intransitive
            (unify common
-                  {:synsem {:subcat {:1 {:cat :noun}
+                  {:sense 1
+                   :synsem {:subcat {:1 {:cat :noun}
                                      :2 '()}
                             :sem {:pred :be}}})
 

                                :gender gender})] ;; prevents e.g. "Her name is John"
             (unify common
                    subject-verb-agreement
                    {:intransitivize false
                     :transitivize false
                     :synsem {:agr subj-agr
                              :sem {:aspect :progressive

           (let [pred (atom :top)
                 obj (atom :top)]
             (unify common
                    {:sense 3
                     :synsem {:cat :verb
                              :sem {:obj obj
                                    :reflexive false
                                    :pred pred
