Skip to content

Commit

Permalink
add some more verbs
Browse files Browse the repository at this point in the history
  • Loading branch information
ekoontz committed Jul 13, 2024
1 parent 75d72d8 commit acc8e58
Show file tree
Hide file tree
Showing 2 changed files with 15 additions and 1 deletion.
6 changes: 6 additions & 0 deletions resources/english/lexicon/verbs.edn
Original file line number Diff line number Diff line change
@@ -1,4 +1,7 @@
{
"abandon" [{:sem {:pred :abandon}}]
"accept" [{:sem {:pred :accept}}]
"accompany" [{:sem {:pred :accompany}}]
"achieve" [{:sem {:pred :achieve}}]
"announce" [{ :sem {:pred :announce}}]
"ask" [{ :sem {:pred :ask}}]
Expand Down Expand Up @@ -254,6 +257,7 @@
"find" (let [exceptions [{:infl :past-simple :surface "found"}
{:infl :past-participle :surface "found"}]]
[{:exceptions exceptions :sem {:pred :find}}])
"finish" [{:sem {:pred :finish}}]
"forget" (let [exceptions [{:infl :past-simple :surface "forgot"}
{:infl :past-participle :surface "forgotten"}]]
[{:exceptions exceptions :sem {:pred :forget}}])
Expand All @@ -280,6 +284,7 @@
:subcat {:2 {:cat :prep
:sem {:pred :to}}
:3 []}}])
"guess" [{:sem {:pred :guess}}]
"have" (let [;; TODO: factor out commonalities in agreement into a new variable called 'agr-exceptions' and then
;; multiply by aux-exceptions and non-aux-exceptions.
aux-exceptions [{:agr {:person :1st} :surface "have" :infl :present
Expand Down Expand Up @@ -367,6 +372,7 @@
:sem {:pred :hope}
:subcat {:2 {:cat :comp
:rule "comp2"}}}]
"hug" [{:sem {:pred :hug}}]
"increase" [{:sem {:pred :increase}}]
"inhibit" [{ :sem {:pred :inhibit}}]

Expand Down
10 changes: 9 additions & 1 deletion resources/español/lexicon/verbs.edn
Original file line number Diff line number Diff line change
@@ -1,7 +1,14 @@
{
"abandonar" [{:sem {:pred :abandon}}]
"abrazar" [{:sem {:pred :hug}}]
"acabar" [{:sem {:pred :finish}}]
"aceptar" [{:sem {:pred :accept}}]
"acertar" [{:stems {:boot "aciert"}
:sem {:pred :guess}}]
"acompañar" [{:sem {:pred :accompany}}]
"cambiar" [{:sem {:pred :change}}]
"hablar" [{:sem {:pred :speak
:subj {:human true}}}
:subj {:human true}}}
{:sem {:pred :talk
:subj {:human true}}}]
"limpiar" [{:sem {:pred :clean}}]
Expand All @@ -14,3 +21,4 @@
:sem {:pred :love}}])
"romper" [{:sem {:pred :break}}]
}

0 comments on commit acc8e58

Please sign in to comment.