convert have dinner & fun to :nominal-verb-with form

ekoontz · Aug 1, 2024 · 9f3f9ac · 9f3f9ac
1 parent e2bda96
commit 9f3f9ac
Showing 1 changed file with 22 additions and 43 deletions.
diff --git a/resources/english/lexicon/verbs.edn b/resources/english/lexicon/verbs.edn
@@ -433,7 +433,7 @@
             :sem {:tense :past
                   :aspect :perfect}
             :exceptions aux-exceptions}
-                  
+
            {:sense 3
             :aux? true
             :infl :past-simple
@@ -444,48 +444,27 @@
                   :aspect :pluperfect}
             :exceptions aux-exceptions}
 
-           (let [subj (atom :top)]
-             {:aux? false
-              :reflexive? false
-              :sense 4
-              :nominal-verb-with "dinner"
-              :sem {:subj subj
-                    :pred :have-dinner
-                    :obj :none}
-              :subcat {:1 {:sem subj}
-                       :2 {:cat :noun
-                           :reflexive? false
-                           :agr {:number :sing}
-                           :sem {:pred :dinner
-                                 :existential? false}
-                           :subcat []}}
-              :exceptions non-aux-exceptions})
-
-           (let [subj (atom :top)]
-             {:aux? false
-              :reflexive? false
-              :sense 5
-              :nominal-verb-with "fun"           
-              :sem {:subj subj
-                    :pred :have-fun
-                    :obj :none}
-              :subcat {:1 {:sem subj}
-                       :2 {:cat :noun
-                           :phrasal? false
-                           :reflexive? false
-                           :agr {:number :sing}
-                           :sem {:pred :fun
-                                 :existential? false}
-                           :subcat []}}
-              :exceptions non-aux-exceptions})
-
-             {:aux? false
-              :reflexive? false
-              :sense 6
-              :nominal-verb-with "lunch"
-              :sem {:pred :have-lunch}
-              :exceptions non-aux-exceptions}])
-
+           {:sense 4
+            :aux? false
+            :reflexive? false
+            :nominal-verb-with "dinner"
+            :sem {:pred :have-dinner}
+            :exceptions non-aux-exceptions}
+
+           {:sense 5
+            :aux? false
+            :reflexive? false
+            :nominal-verb-with "fun"
+            :sem {:pred :have-fun}
+            :exceptions non-aux-exceptions}
+
+           {:sense 6
+            :aux? false
+            :reflexive? false
+            :nominal-verb-with "lunch"
+            :sem {:pred :have-lunch}
+            :exceptions non-aux-exceptions}])
+
  "heal" [{ :sem {:pred :heal}}]
  "hear" (let [exceptions [{:infl :past-simple :surface "heard"}
                           {:infl :past-participle :surface "heard"}]]