improving gfcc generation

This commit is contained in:
aarne
2006-09-26 10:23:50 +00:00
parent 95a1000f97
commit 0a45dc90cd
5 changed files with 33 additions and 26 deletions

View File

@@ -30,7 +30,7 @@ concrete RelativeGer of Relative = CatGer ** open ResGer in {
FunRP p np rp = {
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} ;