-
Notifications
You must be signed in to change notification settings - Fork 5
/
semi.vpm
133 lines (112 loc) · 2.36 KB
/
semi.vpm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
;;; -*- Mode: TDL; -*-
;;;
;;; SEM-I mapping
;;;
;;; (FCB 2006-06-23) for Japanese
;;; using logon/lingo/erg/erg.smi as inspiration for the target mappings
;;; order most specific mappings first
;;; variable type correspondences
event <> e
ref-ind <> x
individual <> i
handle <> h
non_event <> p
* >> u
semarg << u
PNG.PN : PERS NUM
onesg <> 1 sg
onepl <> 1 pl
one >> 1 !
one << 1 *
twosg <> 2 sg
twopl <> 2 pl
two >> 2 !
two << 2 *
threesg <> 3 sg
threepl <> 3 pl
three >> 3 !
three << 3 *
* >> ! !
! << * *
;; one-or-two := person.
;; two-or-three := person.
PNG.GEN : GEND
masc <> m
fem <> f
neut <> n
m-or-f <> m-or-f
* >> !
! << *
; * << !
; ! >> *
;;; Things not listed disappear
;DIV : DIV
; + <> +
; - <> -
; ! << *
;;; confused ?
E.TENSE : TENSE
present <> pres
fut <> fut
past <> past
no_tense <> untensed
tensed <> tense
te >> tense
tense >> tense
* <> *
; non-past
; not sure about te
;;;
;;; Mood
;;;
E.MOOD : MOOD
indicative <> indicative
consultative <> consultative
* >> indicative
! << *
;;;
;;; Aspect
;;;
E.ASPECT : PROG PERF ASPECT
perfect_progressive <> + + default_aspect
progressive >> + - default_aspect
progressive << + * default_aspect
perfective >> - + default_aspect
perfective << * + default_aspect
terminative <> - - terminative
prospective <> - - prospective
modal <> - - modal
inceptive <> - - inceptive
* >> - - default_aspect
default_aspect << * * *
E.PASS : PASS
+ <> +
- <> -
* >> -
- << *
; E.ASPECT : ASPECT
; terminative <> terminative
; * >> !
; ! << *
; terminative :< aspect.
; prospective :< aspect.
; perfective :< aspect.
; progressive :< aspect.
; inceptive :< aspect.
; perfect_progressive :< aspect.
; modal :< aspect.
; ;;; the value for sentences with no special marking
; default_aspect :< aspect.
SF : SF
comm <> comm
ques <> ques
prop <> prop
iforce >> prop
prop << iforce
PRONTYPE : PRONTYPE
std_pron <> std_pron
zero_pron <> zero_pron
refl <> refl
* >> !
! << *
;;; make a semi (mt::construct-semi)