msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

Chenpeng's fixes in StructuralChi and AdjectiveChi

Browse Source
This commit is contained in:
aarne
2012-11-26 10:28:21 +00:00
parent 9115d5b216
commit db9d3853f8
2 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/chinese/AdjectiveChi.gf
View File

@@ -11,7 +11,8 @@ concrete AdjectiveChi of Adjective = CatChi ** open ResChi, Prelude in {
AdjOrd ord = complexAP ord.s ; 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) ; ComplA2 a np = complexAP (a.s ++ appPrep a.c2 np.s) ;

6
src/chinese/StructuralChi.gf
View File

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