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

API documentation and slight change in Det syntax

Browse Source
This commit is contained in:
aarne
2006-01-10 15:39:20 +00:00
parent d2dc0e82e8
commit da26bfb246
38 changed files with 4254 additions and 130 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
lib/resource-1.0/english/NounEng.gf
View File

@@ -10,16 +10,23 @@ concrete NounEng of Noun = CatEng ** open ResEng, Prelude in {
UsePN pn = pn ** {a = agrP3 Sg} ;
UsePron p = p ;
MkDet pred quant num ord = {
s = pred.s ++ quant.s ++ num.s ++ ord.s ;
n = quant.n
DetSg pred quant ord = {
s = pred.s ++ quant.s ++ ord.s ;
n = Sg
} ;
PossPronSg p = {s = p.s ! Gen ; n = Sg} ;
PossPronPl p = {s = p.s ! Gen ; n = Pl} ;
DetPl pred quant num ord = {
s = pred.s ++ quant.s ++ num.s ++ ord.s ;
n = Pl
} ;
PossSg p = {s = p.s ! Gen} ;
PossPl p = {s = p.s ! Gen} ;
NoPredet, NoNum, NoOrd = {s = []} ;
NumInt n = n ;
OrdInt n = {s = n.s ++ "th"} ; ---
NumNumeral numeral = {s = numeral.s ! NCard} ;
OrdNumeral numeral = {s = numeral.s ! NOrd} ;
@@ -32,7 +39,13 @@ concrete NounEng of Noun = CatEng ** open ResEng, Prelude in {
DefPl = {s = artDef ; n = Pl} ;
IndefSg = {s = artIndef ; n = Sg} ;
IndefPl = {s = [] ; n = Pl} ;
IndefPl = {s = [] ; n = Pl} ;
MassDet = {s = [] ; n = Sg} ;
UseN n = n ;
UseN2 n = n ;
UseN3 n = n ;
ComplN2 f x = {s = \\n,c => f.s ! n ! Nom ++ f.c2 ++ x.s ! c} ;
ComplN3 f x = {s = \\n,c => f.s ! n ! Nom ++ f.c2 ++ x.s ! c ; c2 = f.c3} ;
@@ -45,6 +58,4 @@ concrete NounEng of Noun = CatEng ** open ResEng, Prelude in {
SentCN cn s = {s = \\n,c => cn.s ! n ! c ++ conjThat ++ s.s} ;
QuestCN cn qs = {s = \\n,c => cn.s ! n ! c ++ qs.s ! QIndir} ;
UseN n = n ;
}