particle verbs in Finnish, to ease Wordnet translation

This commit is contained in:
aarne
2013-01-26 21:24:53 +00:00
parent 827c46a03c
commit e14f6a5488
7 changed files with 21 additions and 19 deletions

View File

@@ -198,7 +198,7 @@ oper
qp : Bool -- True = back vowel
} ;
predV : (Verb ** {sc : NPForm ; qp : Bool}) -> VP = \verb -> {
predV : (Verb ** {sc : NPForm ; qp : Bool ; p : Str}) -> VP = \verb -> {
s = \\vi,ant,b,agr0 =>
let
@@ -256,7 +256,7 @@ oper
} ;
s2 = \\_,_,_ => [] ;
adv = \\_ => [] ;
adv = \\_ => verb.p ; -- the particle of the verb
ext = [] ;
sc = verb.sc ;
qp = verb.qp ;