mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-24 02:31:10 -06:00
38 lines
1.2 KiB
Plaintext
38 lines
1.2 KiB
Plaintext
concrete IdiomChi of Idiom = CatChi ** open Prelude, ResChi in {
|
|
flags coding=utf8;
|
|
lin
|
|
---- formal subject, e.g. it is hot ?? now empty subject
|
|
ImpersCl vp = mkClause [] vp ;
|
|
--can be empty, or ImpersCl vp = mkClause "天" vp ; but "天" only used to describe weather(e.g. it's raining)
|
|
|
|
---- one wants to learn Chinese ?? now empty subject
|
|
GenericCl vp = mkClause [] vp ;
|
|
-- GenericCl vp = mkClause "有人" vp ; (meaning: there is a person)
|
|
|
|
---- it is John who did it
|
|
CleftNP np rs = mkClause rs.s copula np.s ; -- did it + de + is I
|
|
|
|
CleftAdv ad s = mkClause (linS s ++ possessive_s) copula ad.s ; -- she sleeps + de + is here
|
|
|
|
ExistNP np = mkClause [] (regVerb you_s) np.s ; ---- infl of you
|
|
|
|
ExistIP ip = {s = \\_ => (mkClause [] (regVerb you_s) ip.s).s} ; ---- infl of you
|
|
|
|
ProgrVP vp = {
|
|
verb = regVerb zai_s ;
|
|
compl = vp.prePart ++ vp.verb.s ++ vp.compl ;
|
|
prePart, topic = [] ;
|
|
isAdj = False ;
|
|
} ;
|
|
|
|
|
|
ImpPl1 vp = ss (zan_s ++ men_s ++ infVP vp ++ ba0_s) ;
|
|
|
|
SelfAdvVP vp = insertAdv (ss reflPron) vp ;
|
|
SelfAdVVP vp = insertAdv (ss reflPron) vp ;
|
|
SelfNP np = {s = np.s ++ reflPron} ;
|
|
|
|
}
|
|
|
|
|