1
0
forked from GitHub/gf-rgl

working towards tram in 4 langs

This commit is contained in:
aarne
2006-01-20 23:03:50 +00:00
parent 0da563c788
commit 5e1439255a
23 changed files with 136 additions and 92 deletions

View File

@@ -1,9 +1,11 @@
incomplete concrete MathRomance of Math =
CatRomance ** open Prelude, ResRomance, DiffRomance in {
CatRomance ** open Prelude, CommonRomance, ResRomance in {
lin
SymbPN i = {s = \\c => i.s ; g = Neutr} ; --- c
IntPN i = {s = \\c => i.s ; g = Neutr} ; --- c
SymbPN i = {s = i.s ; g = Masc} ;
IntPN i = {s = i.s ; g = Masc} ;
{-
CNIntNP cn i = {
s = \\c => (cn.s ! Sg ! DIndef ! Nom ++ i.s) ;
a = agrP3 cn.g Sg
@@ -12,6 +14,7 @@ lin
s = \\c => det.s ! g ++ cn.s ! det.n ! det.det ! caseNP c ++ xs.s ;
a = agrP3 g det.n
} ;
-}
lincat
@@ -21,7 +24,7 @@ lin
MkSymb s = s ;
BaseSymb = infixSS conjAnd ;
BaseSymb = infixSS "et" ; ----
ConsSymb = infixSS "," ;
}