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

restest completed, English ready in exper

Browse Source
This commit is contained in:
aarne committed 2008-04-24 06:33:57 +00:00
1 parent 937ddad3cc
commit 0390be7abb
10 files changed
+84 -44
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

resource/exper/english/ExtraEng.gf
+3 -2
View File
@@ -6,7 +6,8 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
ComplBareVS v s = insertObj (\\_ => s.s) (predV v) ;
StrandRelSlash rp slash = {
s = \\t,a,p,_ => rp.s ! RC Acc ++ slash.s ! t ! a ! p ! ODir ++ slash.c2 ;
s = \\t,a,p,ag =>
rp.s ! RC (fromAgr ag).g Acc ++ slash.s ! t ! a ! p ! ODir ++ slash.c2 ;
c = Acc
} ;
EmptyRelSlash rp slash = {
@@ -43,7 +44,7 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
UncNegImpSg imp = {s = imp.s ! neg ! ImpF Sg False} ;
UncNegImpPl imp = {s = imp.s ! neg ! ImpF Pl False} ;
CompoundCN a b = {s = \\n,c => a.s ! Sg ! Nom ++ b.s ! n ! c} ;
CompoundCN a b = {s = \\n,c => a.s ! Sg ! Nom ++ b.s ! n ! c ; g = b.g} ;
oper