Skip to content

Commit 46dae90

Browse files
sanghounsanghoun
committed
style features, etc.
1 parent 5daae40 commit 46dae90

15 files changed

+636
-194
lines changed

‎cmn/hans/ace/config-strict.tdl

Lines changed: 53 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,53 @@
1+
;;; -*- Mode: TDL; -*-
2+
;;; files to load
3+
4+
grammar-top := "../hans-pet-strict.tdl".
5+
variable-property-mapping := "../semi.vpm".
6+
preprocessor := "../repp/vanilla.rpp".
7+
;generation-ignore-signs := "generation.ignore".
8+
generation-trigger-rules := "../trigger.mtr".
9+
version := "../Version.lsp".
10+
parse-node-labels := "../labels.tdl".
11+
12+
quickcheck-code := qc.tdl.
13+
14+
;;; grammar internal properties
15+
orth-path := STEM.
16+
semantics-path := SYNSEM LOCAL CONT.
17+
lex-rels-path := SYNSEM LOCAL CONT RELS.
18+
lex-carg-path := SYNSEM LKEYS KEYREL CARG.
19+
lex-pred-path := SYNSEM LKEYS KEYREL PRED.
20+
rule-rels-path := C-CONT RELS.
21+
label-path := LABEL-NAME.
22+
23+
parsing-roots := root.
24+
generation-roots := root.
25+
26+
semarg-type := semarg.
27+
handle-type := h.
28+
list-type := list.
29+
cons-type := cons.
30+
null-type := null.
31+
diff-list-type := diff-list.
32+
33+
;chart-dependencies := .
34+
35+
deleted-daughters := ARGS HEAD-DTR NON-HEAD-DTR DTR.
36+
37+
parsing-packing-restrictor := STEM RELS HCONS RNAME.
38+
39+
generation-packing-restrictor := STEM RELS HCONS RNAME.
40+
41+
mrs-deleted-roles :=
42+
IDIOMP LNK CFROM CTO --PSV WLINK PARAMS.
43+
44+
; hack for LTOP-GTOP issue
45+
invent-ltop := true.
46+
47+
ortho-max-rules := 20.
48+
49+
enable-icons := yes.
50+
mrs-icons-list := ICONS LIST.
51+
icons-left := CLAUSE.
52+
icons-right := TARGET.
53+

‎cmn/hans/hans-pet-strict.tdl

Lines changed: 56 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,56 @@
1+
;;; -*- Mode: TDL; Package: DISCO -*-
2+
;;;
3+
;;; $Id: pet.tdl,v 1.2 2008-05-23 01:44:21 sfd Exp $
4+
;;;
5+
6+
:begin :type.
7+
8+
;;
9+
;; type hierarchy
10+
;;
11+
12+
:include "head-types".
13+
:include "matrix".
14+
:include "trung".
15+
:include "zhong".
16+
:include "hans".
17+
:include "mtr".
18+
19+
:end :type.
20+
21+
;;
22+
;; lexicon entries (instances of status lex-entry or generic-lex-entry)
23+
;;
24+
25+
:begin :instance :status lex-entry.
26+
:include "lexicon".
27+
:end :instance.
28+
29+
;;
30+
;; grammar rules and lexical rules (instances of status rule)
31+
;;
32+
33+
:begin :instance :status rule.
34+
:include "rules".
35+
:end :instance.
36+
37+
:begin :instance :status lex-rule.
38+
:include "lrules".
39+
:include "irules".
40+
:end :instance.
41+
42+
;;
43+
;; parse-tree labels (instances)
44+
;;
45+
46+
:begin :instance.
47+
:include "labels".
48+
:end :instance.
49+
50+
;;
51+
;; start symbols of the grammar (instances)
52+
;;
53+
54+
:begin :instance.
55+
:include "roots-strict".
56+
:end :instance.

‎cmn/hans/irules.tdl

Lines changed: 10 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,15 +1,19 @@
1+
;;; -*- Mode: TDL; Coding: utf-8 -*-
2+
13
;;_perf_aspect-suffix :=
24
;;%suffix (* 了)
35
;;_perf_aspect-lex-rule.
46

57

6-
dur_aspect-suffix :=
7-
%suffix (* 着)
8-
dur_aspect-lex-rule.
8+
;; SSH 2014-09-02: I changed this into a lexical item (着_dur in lexicon.tdl).
9+
; dur_aspect-suffix :=
10+
; %suffix (* 着)
11+
; dur_aspect-lex-rule.
912

10-
exp_aspect-suffix :=
11-
%suffix (* 过)
12-
exp_aspect-lex-rule.
13+
;; SSH 2014-09-02: The same item is included in lexicon.tdl (过_exp)
14+
; exp_aspect-suffix :=
15+
; %suffix (* 过)
16+
; exp_aspect-lex-rule.
1317

1418

1519
#|

‎cmn/hans/lexicon.tdl

Lines changed: 35 additions & 15 deletions
Original file line numberDiff line numberDiff line change
@@ -1,20 +1,34 @@
11
;;; -*- Mode: TDL; Coding: utf-8 -*-
22

3+
;;; Punctuations
4+
period-marker := punctuation &
5+
[ STEM < "。" >,
6+
SYNSEM.LOCAL.CONT.HOOK.INDEX.SF prop ].
7+
8+
question-marker := punctuation &
9+
[ STEM < "？" >,
10+
SYNSEM.LOCAL.CONT.HOOK.INDEX.SF ques ].
11+
312
;;; Nouns
413
我_n := 1sg-pronoun-noun-lex &
5-
[ STEM < "我" >].
14+
[ STEM < "我" > ].
615

716
你_n := 2sg-pronoun-noun-lex &
8-
[ STEM < "你" >].
17+
[ STEM < "你" > ].
918

1019
他_n := 3sg-pronoun-noun-lex &
11-
[ STEM < "他" >].
20+
[ STEM < "他" >,
21+
SYNSEM.LOCAL.CONT.HOOK.INDEX.PNG [ GENDER masc,
22+
ANIMACY animate ] ].
1223

1324
她_n := 3sg-pronoun-noun-lex &
14-
[ STEM < "她" >].
25+
[ STEM < "她" >,
26+
SYNSEM.LOCAL.CONT.HOOK.INDEX.PNG [ GENDER fem,
27+
ANIMACY animate ] ].
1528

1629
它_n := 3sg-pronoun-noun-lex &
17-
[ STEM < "它" >].
30+
[ STEM < "它" >,
31+
SYNSEM.LOCAL.CONT.HOOK.INDEX.PNG.ANIMACY inanimate ].
1832

1933
我们_n := 1pl-pronoun-incl-noun-lex &
2034
[ STEM < "我们" >].
@@ -26,13 +40,18 @@
2640
[ STEM < "你们" >].
2741

2842
他们_n := 3pl-pronoun-noun-lex &
29-
[ STEM < "他们" >].
43+
[ STEM < "他们" >,
44+
SYNSEM.LOCAL.CONT.HOOK.INDEX.PNG [ GENDER masc,
45+
ANIMACY animate ] ].
3046

3147
她们_n := 3pl-pronoun-noun-lex &
32-
[ STEM < "她们" >].
48+
[ STEM < "她们" >,
49+
SYNSEM.LOCAL.CONT.HOOK.INDEX.PNG [ GENDER fem,
50+
ANIMACY animate ] ].
3351

3452
它们_n := 3pl-pronoun-noun-lex &
35-
[ STEM < "它们" >].
53+
[ STEM < "它们" >,
54+
SYNSEM.LOCAL.CONT.HOOK.INDEX.PNG.ANIMACY inanimate ].
3655

3756
其中_n := 3-pronoun-noun-lex &
3857
[ STEM < "其中" > ].
@@ -151,7 +170,7 @@
151170
SYNSEM.LKEYS.KEYREL.PRED "_zu3cheng2_v_rel"].
152171

153172
被_v := v_bei_type_lex &
154-
[ STEM <"被">].
173+
[ STEM <"被"> ].
155174

156175
把_v1 := v_ba_type_lex &
157176
[ STEM <"把">].
@@ -223,8 +242,7 @@
223242
SYNSEM.LKEYS.KEYREL.PRED "_jiu3_a_rel" ].
224243

225244
以前_r1 := int-adv-s-pre &
226-
[ STEM <"以前">,
227-
SYNSEM.LKEYS.KEYREL.PRED "_yi3qian2_a_rel" ].
245+
[ STEM <"以前"> ].
228246

229247
轻轻_r := int-adv-vp-pre &
230248
[ STEM <"轻轻">,
@@ -263,12 +281,10 @@
263281
SYNSEM.LKEYS.KEYREL.PRED "_yi1ci4_a_rel" ].
264282

265283
在_r := int-adv-vp-pre-no-rel &
266-
[ STEM <"在">,
267-
SYNSEM.LKEYS.KEYREL.PRED "_zai4_a_rel" ].
284+
[ STEM <"在"> ].
268285

269286
正在_r := int-adv-vp-pre-no-rel &
270-
[ STEM <"正在">,
271-
SYNSEM.LKEYS.KEYREL.PRED "_zheng4zai4_a_rel" ].
287+
[ STEM <"正在"> ].
272288

273289
了_crs := int-adv-s-post &
274290
[ STEM <"了">,
@@ -286,6 +302,10 @@
286302
过_exp := adv-exp-v-post &
287303
[ STEM <"过">].
288304

305+
;; SSH 2014-09-02: irules.tdl is now an empty file
306+
着_dur := adv-dur-v-post &
307+
[ STEM <"着">].
308+
289309
今天_r := scop-adv-lex &
290310
[ STEM <"今天">,
291311
SYNSEM.LKEYS.KEYREL.PRED "_jin1tian1_a_rel" ].

‎cmn/hans/pet/hans-pet-strict.set

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
;;;; settings for CHEAP -*- Mode: TDL; Coding: utf-8 -*-
2+
include "flop".
3+
include "pet".

‎cmn/hans/roots-strict.tdl

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+
../../roots-strict.tdl

‎cmn/hans/trigger.mtr

Lines changed: 130 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -1,14 +1,135 @@
11
;;; -*- Mode: TDL; Coding: utf-8 -*-
22
;;; Semantically Empty Lexical Entries
33

4-
了_PFV_rule := generator_rule &
5-
[ CONTEXT [ RELS <! [ PRED never_unify_rel ] !> ],
6-
FLAGS.TRIGGER "了_PFV" ].
4+
period-marker_gr := arg0e_gtr &
5+
[ CONTEXT.RELS <! [ ARG0.SF prop ] !>,
6+
FLAGS.TRIGGER "period-marker" ].
77

8-
吗_QP_rule := generator_rule &
9-
[ CONTEXT [ RELS <! [ PRED never_unify_rel ] !> ],
10-
FLAGS.TRIGGER "吗_QP" ].
8+
question-marker_gr := arg0e_gtr &
9+
[ CONTEXT.RELS <! [ ARG0.SF ques ] !>,
10+
FLAGS.TRIGGER "question-marker" ].
1111

12-
在_R_rule := generator_rule &
13-
[ CONTEXT [ RELS <! [ PRED never_unify_rel ] !> ],
14-
FLAGS.TRIGGER "在_R" ].
12+
了_pfv_gr := arg0e_gtr &
13+
[ CONTEXT.RELS <! [ ARG0.E.ASPECT perfective ] !>,
14+
FLAGS.TRIGGER "了_pfv" ].
15+
16+
吗_qp_gr := arg0e_gtr &
17+
[ CONTEXT.RELS <! [ ARG0.SF ques ] !>,
18+
FLAGS.TRIGGER "吗_qp" ].
19+
20+
在_r_gr := arg0e_gtr &
21+
[ CONTEXT.RELS <! [ ARG0.E.ASPECT imperfective ] !>,
22+
FLAGS.TRIGGER "在_r" ].
23+
24+
正在_r_gr := arg0e_gtr &
25+
[ CONTEXT.RELS <! [ ARG0.E.ASPECT imperfective ] !>,
26+
FLAGS.TRIGGER "正在_r" ].
27+
28+
过_exp_gr := arg0e_gtr &
29+
[ CONTEXT.RELS <! [ ARG0.E.ASPECT experiential ] !>,
30+
FLAGS.TRIGGER "过_exp" ].
31+
32+
着_dur_gr := arg0e_gtr &
33+
[ CONTEXT.RELS <! [ ARG0.E.ASPECT durative ] !>,
34+
FLAGS.TRIGGER "着_dur" ].
35+
36+
被_v_gr_1 := arg0e_gtr &
37+
[ CONTEXT.RELS <! [ ARG1 individual & #i ] !>,
38+
FLAGS [ SUBSUME < #i >,
39+
TRIGGER "被_v" ] ].
40+
41+
被_v_gr_2 := arg0e_gtr &
42+
[ CONTEXT.RELS <! [ ARG2 individual & #i ] !>,
43+
FLAGS [ SUBSUME < #i >,
44+
TRIGGER "被_v" ] ].
45+
46+
被_v_gr_3 := arg0e_gtr &
47+
[ CONTEXT.RELS <! [ ARG3 individual & #i ] !>,
48+
FLAGS [ SUBSUME < #i >,
49+
TRIGGER "被_v" ] ].
50+
51+
; 被_v_gr := generator_rule &
52+
; [ CONTEXT [ RELS <! [ PRED "non_existing_rel" ] !> ],
53+
; FLAGS.TRIGGER "被_v" ].
54+
55+
56+
把_v1_gr_1 := arg0e_gtr &
57+
[ CONTEXT.RELS <! [ ARG1 individual & #i ] !>,
58+
FLAGS [ SUBSUME < #i >,
59+
TRIGGER "把_v1" ] ].
60+
61+
把_v1_gr_2 := arg0e_gtr &
62+
[ CONTEXT.RELS <! [ ARG2 individual & #i ] !>,
63+
FLAGS [ SUBSUME < #i >,
64+
TRIGGER "把_v1" ] ].
65+
66+
把_v1_gr_3 := arg0e_gtr &
67+
[ CONTEXT.RELS <! [ ARG3 individual & #i ] !>,
68+
FLAGS [ SUBSUME < #i >,
69+
TRIGGER "把_v1" ] ].
70+
71+
; 把_v1_gr := generator_rule &
72+
; [ CONTEXT [ RELS <! [ PRED "non_existing_rel" ] !> ],
73+
; FLAGS.TRIGGER "把_v1" ].
74+
75+
以前_r1_gr := generator_rule &
76+
[ CONTEXT [ RELS <! [ PRED "non_existing_rel" ] !> ],
77+
FLAGS.TRIGGER "以前_r1" ].
78+
79+
80+
一次_r1_gr := generator_rule &
81+
[ CONTEXT [ RELS <! [ PRED "non_existing_rel" ] !> ],
82+
FLAGS.TRIGGER "一次_r1" ].
83+
84+
85+
好像_r2_gr := generator_rule &
86+
[ CONTEXT [ RELS <! [ PRED "non_existing_rel" ] !> ],
87+
FLAGS.TRIGGER "好像_r2" ].
88+
89+
90+
#|
91+
以前_r1_gr_1 := arg0e_gtr &
92+
[ CONTEXT.RELS <! [ ARG1 individual & #i ] !>,
93+
FLAGS [ SUBSUME < #i >,
94+
TRIGGER "以前_r1" ] ].
95+
96+
以前_r1_gr_2 := arg0e_gtr &
97+
[ CONTEXT.RELS <! [ ARG2 individual & #i ] !>,
98+
FLAGS [ SUBSUME < #i >,
99+
TRIGGER "以前_r1" ] ].
100+
101+
以前_r1_gr_3 := arg0e_gtr &
102+
[ CONTEXT.RELS <! [ ARG3 individual & #i ] !>,
103+
FLAGS [ SUBSUME < #i >,
104+
TRIGGER "以前_r1" ] ].
105+
106+
一次_r1_gr_1 := arg0e_gtr &
107+
[ CONTEXT.RELS <! [ ARG1 individual & #i ] !>,
108+
FLAGS [ SUBSUME < #i >,
109+
TRIGGER "一次_r1" ] ].
110+
111+
一次_r1_gr_2 := arg0e_gtr &
112+
[ CONTEXT.RELS <! [ ARG2 individual & #i ] !>,
113+
FLAGS [ SUBSUME < #i >,
114+
TRIGGER "一次_r1" ] ].
115+
116+
一次_r1_gr_3 := arg0e_gtr &
117+
[ CONTEXT.RELS <! [ ARG3 individual & #i ] !>,
118+
FLAGS [ SUBSUME < #i >,
119+
TRIGGER "一次_r1" ] ].
120+
121+
好像_r2_gr_1 := arg0e_gtr &
122+
[ CONTEXT.RELS <! [ ARG1 individual & #i ] !>,
123+
FLAGS [ SUBSUME < #i >,
124+
TRIGGER "好像_r2" ] ].
125+
126+
好像_r2_gr_2 := arg0e_gtr &
127+
[ CONTEXT.RELS <! [ ARG2 individual & #i ] !>,
128+
FLAGS [ SUBSUME < #i >,
129+
TRIGGER "好像_r2" ] ].
130+
131+
好像_r2_gr_3 := arg0e_gtr &
132+
[ CONTEXT.RELS <! [ ARG3 individual & #i ] !>,
133+
FLAGS [ SUBSUME < #i >,
134+
TRIGGER "好像_r2" ] ].
135+
|#

0 commit comments

Comments
 (0)