1
0
forked from GitHub/gf-core

Jordi's suggestion in Symbol

This commit is contained in:
aarne
2006-11-23 13:12:42 +00:00
parent 84b49624d4
commit a98411e27f
6 changed files with 30 additions and 1 deletions

View File

@@ -12,9 +12,10 @@ fun
SymbPN : Symb -> PN ; -- x
IntPN : Int -> PN ; -- 27
FloatPN : Float -> PN ; -- 3.14159
CNIntNP : CN -> Int -> NP ; -- level 53
CNNumNP : CN -> Num -> NP ; -- level five ; level 5
CNSymbNP : Det -> CN -> [Symb] -> NP ; -- (the) (2) numbers x and y
--2 Sentence consisting of a formula
SymbS : Symb -> S ; -- A
@@ -37,4 +38,8 @@ cat
fun
MkSymb : String -> Symb ;
--2 Obsolescent
CNIntNP : CN -> Int -> NP ; -- level 53 (covered by CNNumNP)
}

View File

@@ -12,6 +12,10 @@ lin
s = \\c => det.s ++ cn.s ! det.n ! c ++ xs.s ;
a = agrP3 det.n
} ;
CNNumNP cn i = {
s = \\c => (cn.s ! Sg ! Nom ++ i.s) ;
a = agrP3 Sg
} ;
SymbS sy = sy ;

View File

@@ -15,6 +15,11 @@ lin
a = detcn.a ;
isPron = False
} ;
CNNumNP cn i = {
s = \\c => cn.s ! NCase Sg (npform2case Sg c) ++ i.s ! Sg ! Nom ;
a = agrP3 Sg ;
isPron = False
} ;
SymbS sy = sy ;

View File

@@ -15,6 +15,12 @@ lin
a = agrP3 det.n ;
isPron = False
} ;
CNNumNP cn i = {
s = \\c => cn.s ! Weak ! Sg ! Nom ++ i.s ;
a = agrP3 Sg ;
isPron = False
} ;
SymbS sy = {s = \\_ => sy.s} ;
SymbNum n = {s = n.s} ;

View File

@@ -16,6 +16,11 @@ lin
a = agrP3 g det.n ;
hasClit = False
} ;
CNNumNP cn i = {
s = \\c => cn.s ! Sg ++ i.s ! Masc ;
a = agrP3 cn.g Sg ;
hasClit = False
} ;
SymbS sy = {s = \\_ => sy.s} ;
SymbNum n = {s = \\_ => n.s ; isNum = True} ;

View File

@@ -13,6 +13,10 @@ lin
s = \\c => det.s ! cn.isMod ! g ++ cn.s ! det.n ! det.det ! caseNP c ++ xs.s ;
a = agrP3 g det.n
} ;
CNNumNP cn i = {
s = \\c => (cn.s ! Sg ! DIndef ! Nom ++ i.s ! neutrum) ;
a = agrP3 cn.g Sg
} ;
SymbS sy = {s = \\_ => sy.s} ;