GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-31 13:48:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

fixes in Finnish passives and pronouns ; pass imperf still missing

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

8
lib/resource-1.0/finnish/SentenceFin.gf
View File

@@ -4,9 +4,9 @@ concrete SentenceFin of Sentence = CatFin ** open Prelude, ResFin in {
lin
PredVP np vp = mkClause (np.s ! vp.sc) np.a vp ;
PredVP np vp = mkClause (subjForm np vp.sc) np.a vp ;
PredSCVP sc vp = mkClause sc.s (agrP3 Sg) vp ;
PredSCVP sc vp = mkClause (\_ -> sc.s) (agrP3 Sg) vp ;
ImpVP vp = {
s = \\pol,n =>
@@ -21,7 +21,7 @@ concrete SentenceFin of Sentence = CatFin ** open Prelude, ResFin in {
-- The object case is formed at the use site of $c2$, in $Relative$ and $Question$.
SlashV2 np v2 = {
s = \\t,a,p => (mkClause (np.s ! v2.sc) np.a (predV v2)).s ! t ! a ! p ! SDecl ;
s = \\t,a,p => (mkClause (subjForm np v2.sc) np.a (predV v2)).s ! t ! a ! p ! SDecl ;
c2 = v2.c2
} ;
@@ -34,7 +34,7 @@ concrete SentenceFin of Sentence = CatFin ** open Prelude, ResFin in {
in
{s = \\t,ag,p =>
(mkClause
(np.s ! sc) np.a
(subjForm np sc) np.a
(insertObj
(\\_,b,a => infVP vv.sc b a (predV v2))
(predV vv)