1
0
forked from GitHub/gf-core

add SC category

This commit is contained in:
krasimir
2008-02-21 16:38:24 +00:00
parent caad2dfe02
commit a6291512b6
2 changed files with 5 additions and 0 deletions

View File

@@ -95,4 +95,6 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
s = \\nf => preOrPost ap.isPre (ap.s ! nform2aform nf cn.g) (cn.s ! (indefNForm nf)) ;
g = cn.g
} ;
SentCN cn sc = {s = \\nf => cn.s ! nf ++ sc.s; g=cn.g} ;
}