forked from GitHub/gf-rgl
Add some prepositions, merge with pronouns (TODO: merge with articles too)
This commit is contained in:
@@ -9,6 +9,7 @@ concrete NounGla of Noun = CatGla ** open ResGla, Prelude in {
|
||||
-- : Det -> CN -> NP
|
||||
DetCN det cn = emptyNP ** {
|
||||
s = \\c => det.s ! cn.g ! c ++ cn.s ! getNForm det.n det.d c ;
|
||||
a = NotPron det.n ;
|
||||
d = det.d
|
||||
} ;
|
||||
{-
|
||||
|
||||
Reference in New Issue
Block a user