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

brought derived resources up to date wrt Quant

Browse Source
This commit is contained in:
aarne
2007-12-18 10:46:41 +00:00
parent f85ead01b3
commit 90a84d1dcd
14 changed files with 78 additions and 68 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/resource/mathematical/PredicationI.gf
View File

@@ -22,7 +22,7 @@ lin
predN2 n x y =
PredVP x (UseComp (CompNP (DetCN (DetSg (SgQuant IndefArt) NoOrd) (ComplN2 n y)))) ;
predNColl n x y = PredVP (ConjNP and_Conj (BaseNP x y))
(UseComp (CompNP (DetCN (DetPl (PlQuant IndefArt) NoNum NoOrd) (UseN n)))) ;
(UseComp (CompNP (DetCN (DetPl (IndefArt) NoNum NoOrd) (UseN n)))) ;
predAdv a x = PredVP x (UseComp (CompAdv a)) ;
predPrep p x y = PredVP x (UseComp (CompAdv (PrepNP p y))) ;
@@ -50,6 +50,8 @@ lin
-- This is similar to a family except that the argument is a type.
typN2 f n = ComplN2 f (DetCN (DetPl (PlQuant IndefArt) NoNum NoOrd) n) ;
typN2 f n = ComplN2 f (DetCN (DetPl (IndefArt) NoNum NoOrd) n) ;
--.
oper SgQuant : Quant -> Quant = \q -> q ; ---- for BWC with DEPREC
}

2
lib/resource/mathematical/SymbolEng.gf
View File

@@ -20,7 +20,7 @@ lin
SymbS sy = sy ;
SymbNum sy = {s = sy.s ; n = Sg} ;
SymbNum sy = {s = sy.s ; n = Pl} ;
SymbOrd sy = {s = sy.s ++ "th"} ;
lincat

2
lib/resource/mathematical/SymbolFin.gf
View File

@@ -24,7 +24,7 @@ lin
SymbS sy = sy ;
SymbNum n = {s = \\_,_ => n.s ; isNum = True} ;
SymbNum n = {s = \\_,_ => n.s ; isNum = True ; n = Pl} ;
SymbOrd n = {s = \\_,_ => n.s ++ "."} ;
lincat

2
lib/resource/mathematical/SymbolRomance.gf
View File

@@ -24,7 +24,7 @@ lin
} ;
SymbS sy = {s = \\_ => sy.s} ;
SymbNum n = {s = \\_ => n.s ; isNum = True} ;
SymbNum n = {s = \\_ => n.s ; isNum = True ; n = Pl} ;
SymbOrd n = {s = \\_ => n.s ++ "."} ; ---
lincat

2
lib/resource/mathematical/SymbolScand.gf
View File

@@ -21,7 +21,7 @@ lin
SymbS sy = {s = \\_ => sy.s} ;
SymbNum n = {s = \\_ => n.s ; isDet = True} ;
SymbNum n = {s = \\_ => n.s ; isDet = True ; n = Pl} ;
SymbOrd n = {s = n.s ++ ":te" ; isDet = True} ; ---
lincat