GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-24 10:22:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

CompoundCN in Eng

Browse Source
This commit is contained in:
aarne
2006-12-29 16:22:46 +00:00
parent 159381e33a
commit 5aa5005ba8
3 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/resource-1.0/english/ExtraEng.gf
View File

@@ -43,6 +43,8 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
UncNegImpSg imp = {s = imp.s ! neg ! ImpF Sg False} ; UncNegImpSg imp = {s = imp.s ! neg ! ImpF Sg False} ;
UncNegImpPl imp = {s = imp.s ! neg ! ImpF Pl False} ; UncNegImpPl imp = {s = imp.s ! neg ! ImpF Pl False} ;
CompoundCN a b = {s = \\n,c => a.s ! Sg ! Nom ++ b.s ! n ! c} ;
oper oper
neg = CNeg False ; neg = CNeg False ;

4
lib/resource-1.0/english/ExtraEngAbs.gf
View File

@@ -9,4 +9,8 @@ abstract ExtraEngAbs = Extra ** {
UncNegImpSg : Imp -> Utt; -- do not help yourself UncNegImpSg : Imp -> Utt; -- do not help yourself
UncNegImpPl : Imp -> Utt; -- do not help yourselves UncNegImpPl : Imp -> Utt; -- do not help yourselves
-- freely compounded nouns
CompoundCN : CN -> CN -> CN ; -- rock album
} }

2
lib/resource-1.0/english/ParadigmsEng.gf
View File

@@ -89,7 +89,7 @@ oper
--3 Compound nouns --3 Compound nouns
-- --
-- A compound noun ia an uninflected string attached to an inflected noun, -- A compound noun is an uninflected string attached to an inflected noun,
-- such as "baby boom", "chief executive officer". -- such as "baby boom", "chief executive officer".
mkN : Str -> N -> N mkN : Str -> N -> N