GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-19 08:02:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

Finnish adverbial existentials

Browse Source
This commit is contained in:
aarne
2006-06-18 20:51:40 +00:00
parent e47076fcec
commit dca9d90d00
2 changed files with 12 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -9,4 +9,12 @@ concrete ExtraFin of ExtraFinAbs = CatFin ** open ResFin, Prelude in {
isDef = True --- "Jussin kolme autoa ovat" ; thus "...on" is missing
} ;
AdvExistNP adv np =
mkClause (\_ -> adv.s) np.a (insertObj
(\\_,b,_ => np.s ! NPCase Nom) (predV (verbOlla ** {sc = NPCase Nom}))) ;
AdvPredNP adv v np =
mkClause (\_ -> adv.s) np.a (insertObj
(\\_,b,_ => np.s ! NPCase Nom) (predV v)) ;
}