fixes in Finnish passives and pronouns ; pass imperf still missing

This commit is contained in:
aarne
2006-03-06 22:27:23 +00:00
parent 5e70830f3c
commit 21202641a1
8 changed files with 37 additions and 21 deletions

View File

@@ -231,10 +231,11 @@ oper
s : Tense => Anteriority => Polarity => SType => Str
} ;
mkClause : Str -> Agr -> VP -> Clause =
\subj,agr,vp -> {
mkClause : (Polarity -> Str) -> Agr -> VP -> Clause =
\sub,agr,vp -> {
s = \\t,a,b,o =>
let
subj = sub b ;
agrfin = case vp.sc of {
NPCase Nom => <agr,True> ;
_ => <agrP3 Sg,False> -- minun täytyy, minulla on
@@ -248,6 +249,11 @@ oper
}
} ;
-- This is used for subjects of passives: therefore isFin in False.
subjForm : NP -> NPForm -> Polarity -> Str = \np,sc,b ->
appCompl False b {s = [] ; c = sc ; isPre = True} np ;
questPart : Str -> Str = \on -> on ++ BIND ++ "ko" ; ----
infVP : NPForm -> Polarity -> Agr -> VP -> Str =