added Noun.ApposCN

2006-03-17 11:01:09 +00:00
parent f294828600
commit 3628ee2960
6 changed files with 31 additions and 5 deletions
--- a/lib/resource-1.0/english/NounEng.gf
+++ b/lib/resource-1.0/english/NounEng.gf
@@ -68,4 +68,6 @@ concrete NounEng of Noun = CatEng ** open ResEng, Prelude in {

    SentCN cn sc = {s = \\n,c => cn.s ! n ! c ++ sc.s} ;

+    ApposCN cn np = {s = \\n,c => cn.s ! n ! Nom ++ np.s ! c} ;
+
 }