mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-29 04:46:30 -06:00
(Pes) Support relative pronoun contraction
This commit is contained in:
@@ -10,15 +10,15 @@ concrete SymbolPes of Symbol = CatPes ** open Prelude, ResPes in {
|
||||
IntPN i = {s = i.s ; animacy = Inanimate} ;
|
||||
FloatPN i = {s = i.s ; animacy = Inanimate} ;
|
||||
NumPN i = {s = i.s ; animacy = Inanimate} ;
|
||||
CNIntNP cn i = cn ** {
|
||||
CNIntNP cn i = emptyNP ** cn ** {
|
||||
s = \\ez => cn.s ! Sg ! Ezafe ++ i.s ++ cn.compl ! Sg ;
|
||||
a = agrP3 Sg
|
||||
} ;
|
||||
CNSymbNP det cn xs = cn ** {
|
||||
CNSymbNP det cn xs = emptyNP ** cn ** {
|
||||
s = \\ez => det.s ++ cn.s ! det.n ! Ezafe ++ xs.s ++ cn.compl ! det.n ;
|
||||
a = agrP3 det.n
|
||||
} ;
|
||||
CNNumNP cn i = cn ** {
|
||||
CNNumNP cn i = emptyNP ** cn ** {
|
||||
s = \\ez => cn.s ! Sg ! Ezafe ++ i.s ++ cn.compl ! Sg ;
|
||||
a = agrP3 Sg ;
|
||||
} ;
|
||||
|
||||
Reference in New Issue
Block a user