GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-30 19:18:34 -06:00
Code Issues Packages Projects Releases Wiki Activity

some more functions added to Slv by guessing and using Morgan Nilsson's grammar book

Browse Source
This commit is contained in:
aarne
2016-10-04 16:17:07 +00:00
parent d2d349c93d
commit 1d62281dea
7 changed files with 33 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/slovenian/QuestionSlv.gf
+4
View File
@@ -4,7 +4,11 @@ concrete QuestionSlv of Question = CatSlv ** open ResSlv,Prelude in {
lin
QuestVP ip vp = mkClause (ip.s ! Nom) ip.a False vp ;
QuestCl cl = {s = \\t,a,p => "ali" ++ cl.s ! t ! a ! p} ;
QuestSlash ip cls = {s = \\t,a,p => cls.c2.s ++ ip.s ! cls.c2.c ++ cls.s ! t ! a ! p} ;
QuestIAdv iadv cl = {s = \\t,a,p => iadv.s ++ cl.s ! t ! a ! p} ;
QuestIComp icomp np = mkClause icomp.s np.a np.isPron {s = copula ; s2 = \\_ => [] ; isCop = True} ;
CompIAdv a = a ;
CompIP p = ss (p.s ! Nom) ;
------AR END