mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-30 10:28:53 -06:00
- add missing linearizations for DetDAP and AdjDAP
- indentation
This commit is contained in:
@@ -75,6 +75,7 @@ incomplete concrete CatRomance of Cat = CommonX - [SC,Pol]
|
|||||||
sp : Number => Gender => Case => Str ;
|
sp : Number => Gender => Case => Str ;
|
||||||
isNeg : Bool -- negative element, e.g. aucun
|
isNeg : Bool -- negative element, e.g. aucun
|
||||||
} ;
|
} ;
|
||||||
|
DAP = {s : Gender => Str ; n : Number} ;
|
||||||
Predet = {
|
Predet = {
|
||||||
s : AAgr => Case => Str ;
|
s : AAgr => Case => Str ;
|
||||||
c : Case ; -- c : la plupart de
|
c : Case ; -- c : la plupart de
|
||||||
|
|||||||
@@ -179,4 +179,14 @@ incomplete concrete NounRomance of Noun =
|
|||||||
s = \\n => cn.s ! n ++ appCompl {s = [] ; c = genitive ; isDir = False} np ;
|
s = \\n => cn.s ! n ++ appCompl {s = [] ; c = genitive ; isDir = False} np ;
|
||||||
g = cn.g ;
|
g = cn.g ;
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
|
-- PartNP and CounNP missing: how to define 'of' in the functor?
|
||||||
|
|
||||||
|
AdjDAP det ap = {
|
||||||
|
s = \\g => det.s ! g ++ ap.s ! AF g det.n ;
|
||||||
|
n = det.n ;
|
||||||
|
} ;
|
||||||
|
|
||||||
|
DetDAP det = {s = \\g => det.s ! g ! Nom ; n = det.n } ;
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user