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

Quant with variable number

Browse Source
This commit is contained in:
aarne
2006-02-02 15:23:43 +00:00
parent 478d1f4435
commit f5f3ba0e42
19 changed files with 142 additions and 114 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
lib/resource-1.0/scandinavian/CatScand.gf
View File

@@ -66,6 +66,7 @@ incomplete concrete CatScand of Cat =
Det = {s : Bool => Gender => Str ; n : Number ; det : DetSpecies} ;
QuantSg = {s : Bool => Gender => Str ; det : DetSpecies} ;
QuantPl = {s : Bool => Gender => Str ; det : DetSpecies} ;
Quant = {s : Number => Bool => Gender => Str ; det : DetSpecies} ;
Predet = {s : GenNum => Str} ;
Num = {s : Gender => Str ; isDet : Bool} ;
Ord = {s : Str ; isDet : Bool} ;

34
lib/resource-1.0/scandinavian/NounScand.gf
View File

@@ -39,14 +39,19 @@ incomplete concrete NounScand of Noun =
det = quant.det
} ;
PossSg p = {
s = \\_,g => p.s ! NPPoss (gennum g Sg) ;
SgQuant quant = {
s = quant.s ! Sg ;
n = Sg ;
det = DDef Indef
det = quant.det
} ;
PossPl p = {
s = \\_,_ => p.s ! NPPoss Plg ;
PlQuant quant = {
s = quant.s ! Pl ;
n = Pl ;
det = quant.det
} ;
PossPron p = {
s = \\n,_,g => p.s ! NPPoss (gennum g n) ;
det = DDef Indef
} ;
@@ -63,19 +68,18 @@ incomplete concrete NounScand of Noun =
OrdSuperl a = {s = a.s ! AF (ASuperl SupWeak) Nom ; isDet = True} ;
DefSg = {
s = \\b,g => if_then_Str b (artDef (gennum g Sg)) [] ;
n = Sg ;
det = DDef detDef
} ;
DefPl = {
s = \\b,_ => if_then_Str b (artDef Plg) [] ;
n = Pl ;
DefArt = {
s = \\n,b,g => if_then_Str b (artDef (gennum g n)) [] ;
det = DDef detDef
} ;
IndefSg = {s = \\_ => artIndef ; n = Sg ; det = DIndef} ;
IndefPl = {s = \\_,_ => [] ; n = Pl ; det = DIndef} ;
IndefArt = {
s = table {
Sg => \\_ => artIndef ;
Pl => \\_,_ => []
} ;
det = DIndef
} ;
MassDet = {s = \\_,_ => [] ; n = Sg ; det = DIndef} ;