mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-31 02:38:55 -06:00
improving gfcc generation
This commit is contained in:
@@ -30,7 +30,7 @@ concrete RelativeGer of Relative = CatGer ** open ResGer in {
|
|||||||
|
|
||||||
FunRP p np rp = {
|
FunRP p np rp = {
|
||||||
s = \\gn,c => np.s ! c ++ appPrep p (rp.s ! gn) ;
|
s = \\gn,c => np.s ! c ++ appPrep p (rp.s ! gn) ;
|
||||||
a = RAg np.a
|
a = RAg {n = np.a.n ; p = np.a.p}
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
IdRP = {s = relPron ; a = RNoAg} ;
|
IdRP = {s = relPron ; a = RNoAg} ;
|
||||||
|
|||||||
Reference in New Issue
Block a user