particle verbs in Finnish, to ease Wordnet translation

This commit is contained in:
aarne
2013-01-26 21:24:53 +00:00
parent d2ca42bed9
commit f7f40e3ec7
7 changed files with 21 additions and 19 deletions
+2 -2
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 ;