vt -o ; Finnish infinitives

This commit is contained in:
aarne
2005-07-01 07:16:31 +00:00
parent 3377aaabdd
commit 0cfbd86af0
10 changed files with 96 additions and 28 deletions

View File

@@ -465,6 +465,7 @@ regV soutaa =
u = ifTok Str a "a" "u" "y" ;
joi = Predef.tk 2 juo + (o + "i")
in case ta of {
"it" => vHarkita soutaa ;
"st" | "nn" | "rr" | "ll" => vJuosta soutaa soudan (juo + o+u+"t") (juo + "t"+u) ;
_ => case aa of {
"aa" | "ää" => vOttaa soutaa (souda + "n") ;