Chenpeng's fixes in StructuralChi and AdjectiveChi

This commit is contained in:
aarne
2012-11-26 10:28:21 +00:00
parent 7f1be627ae
commit 4ed5333d1a
2 changed files with 5 additions and 4 deletions

View File

@@ -11,7 +11,8 @@ concrete AdjectiveChi of Adjective = CatChi ** open ResChi, Prelude in {
AdjOrd ord = complexAP ord.s ;
CAdvAP ad ap np = complexAP (ap.s ++ ad.s ++ ad.p ++ np.s) ;
-- CAdvAP ad ap np = complexAP (ap.s ++ ad.s ++ ad.p ++ np.s) ;
CAdvAP ad ap np = complexAP (ad.s++ np.s++ad.p++ap.s ) ; --modified by ChenPeng 11.24
ComplA2 a np = complexAP (a.s ++ appPrep a.c2 np.s) ;

View File

@@ -114,7 +114,7 @@ lin
lin
almost_AdA = ssword "几乎" ;
almost_AdN = ssword "几乎" ;
as_CAdv = {s,p = word "如同"} ; -- modified by chenpeng 11.17
as_CAdv = {s = word "和" ; p = word "一样" } ; -- modified by chenpeng 11.24
at_least_AdN = ssword "最少" ; -- at least five
at_most_AdN = ssword "最多" ;
behind_Prep = mkPrep "后面" "在";
@@ -150,8 +150,8 @@ here7to_Adv = mkAdv "到这里" ; -- to here
how8many_IDet = ssword "多少" ;
how8much_IAdv = ssword "多少" ;
if_Subj = mkSubj "如果" [] ; --"就" ; -- [mark] "就" often comes between NP and VP
less_CAdv = {s = word "少于" ; p = than_s} ; -- modified by chenpeng 11.17
more_CAdv = {s = word "更加" ; p = than_s} ; -- modified by chenpeng 11.17
less_CAdv = {s = than_s ; p = word "没更"} ; -- modified by chenpeng 11.24
more_CAdv = {s = than_s ; p = word "更"} ; -- modified by chenpeng 11.24
most_Predet = ssword "大多数" ;
if_then_Conj = {s = table { -- added by chenpeng 11.19
CPhr CNPhrase => mkConjForm [] ;