1
0
forked from GitHub/gf-rgl

Pinyin versions of chinese, named Cmn; mostly automatically generated

This commit is contained in:
aarne
2012-10-15 12:51:55 +00:00
parent 8c7d3bb6e0
commit 39b53acb5c
28 changed files with 1812 additions and 2 deletions

View File

@@ -0,0 +1,34 @@
concrete ConjunctionCmn of Conjunction = CatCmn ** open ResCmn, Prelude, Coordination in {
lin
ConjS c = conjunctDistrSS (c.s ! CSent) ;
ConjAdv c as = conjunctDistrSS (c.s ! CSent) as ** {advType = ATPlace} ; ---- ??
ConjNP c = conjunctDistrSS (c.s ! CPhr CNPhrase) ;
ConjAP c as = conjunctDistrSS (c.s ! CPhr CAPhrase) as ** {monoSyl = False} ;
ConjRS c = conjunctDistrSS (c.s ! CSent) ;
-- These fun's are generated from the list cat's.
BaseS = twoSS ;
ConsS = consrSS thcomma ;
BaseAdv = twoSS ;
ConsAdv = consrSS thcomma ;
BaseNP = twoSS ;
ConsNP = consrSS thcomma ;
BaseAP = twoSS ;
ConsAP = consrSS thcomma ;
BaseRS = twoSS ;
ConsRS = consrSS thcomma ;
lincat
[S] = {s1,s2 : Str} ;
[Adv] = {s1,s2 : Str} ;
[NP] = {s1,s2 : Str} ;
[AP] = {s1,s2 : Str} ;
[RS] = {s1,s2 : Str} ;
oper
thcomma : Str = [] ; ---- should be a space
}