Chi fixes from René Tobner

This commit is contained in:
tobn2701
2015-11-12 15:45:10 +00:00
parent 47db5b9f03
commit 2a0edb2148
2 changed files with 8 additions and 4 deletions

View File

@@ -10,7 +10,11 @@ concrete NounChi of Noun = CatChi ** open ResChi, Prelude in {
UsePN pn = pn ;
UsePron p = p ;
DetNP det = {s = det.s ++ ge_s} ; ----
DetNP det = {s = case det.detType of {
DTFull Pl => det.s ++ xie_s ;
_ => det.s ++ ge_s
} ;
} ; ----
PredetNP pred np = mkNP (pred.s ++ np.s) ; ---- possessive_s ++ np.s) ;

View File

@@ -608,11 +608,11 @@ that
mkUtt these_NP
these
个 BAD 这
这些 GOOD
mkUtt those_NP
those
个 BAD 那
那些 GOOD
mkUtt (mkNP (mkDet this_Quant (mkCard (mkNumeral n5_Unit))))
these five
@@ -866,7 +866,7 @@ mkUtt (mkCN (mkCN reason_N) (mkVP sleep_V))
reason to sleep
睡道理 BAD 睡的理由
mkUtt (mkCN (mkCN reason_N) (mkVP sleep_V))
mkUtt (mkCN (mkCN reason_N) (mkVP sleep_V)) !DUPLICATE
reason to sleep
睡道理 BAD 睡的理由