blob: 1dbb9b577afa99cfc5c122fed3e19034a66f72ae (
plain)
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
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
|
%D \module
%D [ file=enco-agr,
%D version=2005.02.20,
%D title=\CONTEXT\ \UNICODE\ Macros,
%D subtitle=Ancient Greek,
%D author=Thomas A. Schmitz,
%D date=\currentdate]
\startmapping[agr]
\definecasemaps 13 to 64 lc 0 uc 0
\definecasemaps 65 to 66 lc +32 uc 0
\definecasemaps 67 to 67 lc 0 uc 0
\definecasemaps 68 to 85 lc +32 uc 0
\definecasemaps 86 to 86 lc 0 uc 0
\definecasemaps 87 to 90 lc +32 uc 0
\definecasemaps 91 to 255 lc 0 uc 0
\definecaseself 4 % apostrofe
\stopmapping
\startencoding[agr]
\definecharacter greeksigmalunate 1
\definecharacter endash 2
\definecharacter emdash 3
\definecharacter apostrophe 4
\definecharacter greekaltbeta 5
\definecharacter epih 6
\definecharacter textbraceleft 8
\definecharacter textbraceright 9
\definecharacter textbreve 10
\definecharacter greekSigmalunate 13
\definecharacter greekIotadialytika 14
\definecharacter greekUpsilondialytika 15
\definecharacter greekepsilonperispomeni 18
\definecharacter greekomicronperispomeni 19
\definecharacter greekepsilondasiaperispomeni 20
\definecharacter greekomicrondasiaperispomeni 21
\definecharacter greekepsilonpsiliperispomeni 22
\definecharacter greekomicronpsiliperispomeni 23
\definecharacter greekiotadialytikaperispomeni 24
\definecharacter greekupsilondialytikaperispomeni 25
\definecharacter greekdialytikaperispomeni 26
\definecharacter textbottomdot 33
\definecharacter greeksampi 34
\definecharacter greekdigamma 35
\definecharacter greekstigma 36
\definecharacter greeknumkoppa 37
\definecharacter greekkoppa 38
\definecharacter guilsingleright 39
\definecharacter textdag 43
\definecharacter greekoxia 47
\definecharacter greekanoteleia 59
\definecharacter greekdasia 60
\definecharacter greekpsili 62
\definecharacter greekquestionmark 63
\definecharacter dialytika 64
\definecharacter greekAlpha 65
\definecharacter greekBeta 66
\definecharacter greekomegaiotasub 67
\definecharacter greekDelta 68
\definecharacter greekEpsilon 69
\definecharacter greekPhi 70
\definecharacter greekGamma 71
\definecharacter greekEta 72
\definecharacter greekIota 73
\definecharacter greekTheta 74
\definecharacter greekKappa 75
\definecharacter greekLambda 76
\definecharacter greekMu 77
\definecharacter greekNu 78
\definecharacter greekOmicron 79
\definecharacter greekPi 80
\definecharacter greekChi 81
\definecharacter greekRho 82
\definecharacter greekSigma 83
\definecharacter greekTau 84
\definecharacter greekUpsilon 85
\definecharacter greeketaiotasub 86
\definecharacter greekOmega 87
\definecharacter greekXi 88
\definecharacter greekPsi 89
\definecharacter greekZeta 90
\definecharacter bracketleft 91
\definecharacter greekvaria 92
\definecharacter bracketright 93
\definecharacter greekperispomeni 94
\definecharacter guilsingleleft 96
% the above is a quote character
\definecharacter greekalpha 97
\definecharacter greekbeta 98
\definecharacter greekfinalsigma 99
\definecharacter greekdelta 100
\definecharacter greekepsilon 101
\definecharacter greekphi 102
\definecharacter greekgamma 103
\definecharacter greeketa 104
\definecharacter greekiota 105
\definecharacter greektheta 106
\definecharacter greekkappa 107
\definecharacter greeklambda 108
\definecharacter greekmu 109
\definecharacter greeknu 110
\definecharacter greekomicron 111
\definecharacter greekpi 112
\definecharacter greekchi 113
\definecharacter greekrho 114
\definecharacter greeksigma 115
\definecharacter greektau 116
\definecharacter greekupsilon 117
\definecharacter greekalphaiotasub 118
\definecharacter greekomega 119
\definecharacter greekxi 120
\definecharacter greekpsi 121
\definecharacter greekzeta 122
\definecharacter floorleft 123
\definecharacter textbar 124
\definecharacter floorright 125
\definecharacter greekperispomeni 126
\definecharacter quotedblleft 128
\definecharacter quotedblright 129
\definecharacter exclam 130
\definecharacter greekiotadasia 131
\definecharacter greekiotapsili 132
\definecharacter greekiotaoxia 133
\definecharacter greekiotadasiatonos 134
\definecharacter greekiotapsilitonos 135
\definecharacter greekiotavaria 136
\definecharacter greekiotadasiavaria 137
\definecharacter greekiotapsilivaria 138
\definecharacter greekiotaperispomeni 139
\definecharacter greekiotadasiaperispomeni 140
\definecharacter greekiotapsiliperispomeni 141
\definecharacter greekiotadialytika 142
\definecharacter greekiotadialytikatonos 143
\definecharacter greekiotadialytikavaria 144
\definecharacter greekdasiaperispomeni 145
\definecharacter greekpsiliperispomeni 146
\definecharacter greekdasiatonos 147
\definecharacter greekpsilitonos 148
\definecharacter greekdasiavaria 149
\definecharacter greekpsilivaria 150
\definecharacter greekdialytikatonos 151
\definecharacter greekepsilondasia 152
\definecharacter greekepsilonpsili 153
\definecharacter greekepsilonoxia 154
\definecharacter greekepsilondasiatonos 155
\definecharacter greekepsilonpsilitonos 156
\definecharacter greekepsilonvaria 157
\definecharacter greekepsilondasiavaria 158
\definecharacter greekepsilonpsilivaria 159
\definecharacter greekdialytikavaria 160
\definecharacter greekalphadasia 161
\definecharacter greekalphapsili 162
\definecharacter greekalphaoxia 163
\definecharacter greekalphadasiatonos 164
\definecharacter greekalphapsilitonos 165
\definecharacter greekalphavaria 166
\definecharacter greekalphadasiavaria 167
\definecharacter greekalphapsilivaria 168
\definecharacter greekalphaperispomeni 169
\definecharacter greekalphadasiaperispomeni 170
\definecharacter greekalphapsiliperispomeni 171
\definecharacter greekalphaiotasubdasia 172
\definecharacter greekalphaiotasubpsili 173
\definecharacter greekalphaiotasubtonos 174
\definecharacter greekalphaiotasubdasiatonos 175
\definecharacter greekalphaiotasubpsilitonos 176
\definecharacter greekalphaiotasubvaria 177
\definecharacter greekalphaiotasubdasiavaria 178
\definecharacter greekalphaiotasubpsilivaria 179
\definecharacter greekalphaiotasubperispomeni 180
\definecharacter greekalphaiotasubdasiaperispomeni 181
\definecharacter greekalphaiotasubpsiliperispomeni 182
\definecharacter greekrhodasia 183
\definecharacter greekrhopsili 184
\definecharacter greeketadasia 185
\definecharacter greeketapsili 186
\definecharacter greeketaoxia 187
\definecharacter greeketadasiatonos 188
\definecharacter greeketapsilitonos 189
\definecharacter greeketavaria 190
\definecharacter greeketadasiavaria 191
\definecharacter greeketapsilivaria 192
\definecharacter greeketaperispomeni 193
\definecharacter greeketadasiaperispomeni 194
\definecharacter greeketapsiliperispomeni 195
\definecharacter textslash 196
\definecharacter greeketaiotasubdasia 197
\definecharacter greeketaiotasubpsili 198
\definecharacter greeketaiotasubtonos 199
\definecharacter greeketaiotasubdasiatonos 200
\definecharacter greeketaiotasubpsilitonos 201
\definecharacter greeketaiotasubvaria 202
\definecharacter greeketaiotasubdasiavaria 203
\definecharacter greeketaiotasubpsilivaria 204
\definecharacter greeketaiotasubperispomeni 205
\definecharacter greeketaiotasubdasiaperispomeni 206
\definecharacter greeketaiotasubpsiliperispomeni 207
\definecharacter greekomicrondasia 208
\definecharacter greekomicronpsili 209
\definecharacter greekomicronoxia 210
\definecharacter greekomicrondasiatonos 211
\definecharacter greekomicronpsilitonos 212
\definecharacter greekomicronvaria 213
\definecharacter greekomicrondasiavaria 214
\definecharacter greekomicronpsilivaria 215
\definecharacter greekupsilondasia 216
\definecharacter greekupsilonpsili 217
\definecharacter greekupsilonoxia 218
\definecharacter greekupsilondasiatonos 219
\definecharacter greekupsilonpsilitonos 220
\definecharacter greekupsilonvaria 221
\definecharacter greekupsilondasiavaria 222
\definecharacter greekupsilonpsilivaria 223
\definecharacter greekupsilonperispomeni 224
\definecharacter greekupsilondasiaperispomeni 225
\definecharacter greekupsilonpsiliperispomeni 226
\definecharacter greekupsilondiaeresis 227
\definecharacter greekupsilondialytikatonos 228
\definecharacter greekupsilondialytikavaria 229
\definecharacter greekomegadasia 230
\definecharacter greekomegapsili 231
\definecharacter greekomegaoxia 232
\definecharacter greekomegadasiatonos 233
\definecharacter greekomegapsilitonos 234
\definecharacter greekomegavaria 235
\definecharacter greekomegadasiavaria 236
\definecharacter greekomegapsilivaria 237
\definecharacter greekomegaperispomeni 238
\definecharacter greekomegadasiaperispomeni 239
\definecharacter greekomegapsiliperispomeni 240
\definecharacter greekomegaiotasubdasia 241
\definecharacter greekomegaiotasubpsili 242
\definecharacter greekomegaiotasubtonos 243
\definecharacter greekomegaiotasubdasiatonos 244
\definecharacter greekomegaiotasubpsilitonos 245
\definecharacter greekomegaiotasubvaria 246
\definecharacter greekomegaiotasubdasiavaria 247
\definecharacter greekomegaiotasubpsilivaria 248
\definecharacter greekomegaiotasubperispomeni 249
\definecharacter greekomegaiotasubdasiaperispomeni 250
\definecharacter greekomegaiotasubpsiliperispomeni 251
\definecharacter greeknumeralsign 254
\definecharacter greeknumeralsignlower 255
\stopencoding
\startencoding[default]
\definecharacter greekAlphapsili {\greekpsili \greekAlpha}
\definecharacter greekAlphadasia {\greekdasia \greekAlpha}
\definecharacter greekAlphapsilivaria {\greekpsilivaria \greekAlpha}
\definecharacter greekAlphadasiavaria {\greekdasiavaria \greekAlpha}
\definecharacter greekAlphapsilitonos {\greekpsilitonos \greekAlpha}
\definecharacter greekAlphadasiatonos {\greekdasiatonos \greekAlpha}
\definecharacter greekAlphapsiliperispomeni {\greekpsiliperispomeni \greekAlpha}
\definecharacter greekAlphadasiaperispomeni {\greekdasiaperispomeni \greekAlpha}
\definecharacter greekEpsilonpsili {\greekpsili \greekEpsilon}
\definecharacter greekEpsilondasia {\greekdasia \greekEpsilon}
\definecharacter greekEpsilonpsilivaria {\greekpsilivaria \greekEpsilon}
\definecharacter greekEpsilondasiavaria {\greekdasiavaria \greekEpsilon}
\definecharacter greekEpsilonpsilitonos {\greekpsilitonos \greekEpsilon}
\definecharacter greekEpsilondasiatonos {\greekdasiatonos \greekEpsilon}
\definecharacter greekEtapsili {\greekpsili \greekEta}
\definecharacter greekEtadasia {\greekdasia \greekEta}
\definecharacter greekEtapsilivaria {\greekpsilivaria \greekEta}
\definecharacter greekEtadasiavaria {\greekdasiavaria \greekEta}
\definecharacter greekEtapsilitonos {\greekpsilitonos \greekEta}
\definecharacter greekEtadasiatonos {\greekdasiatonos \greekEta}
\definecharacter greekEtapsiliperispomeni {\greekpsiliperispomeni \greekEta}
\definecharacter greekEtadasiaperispomeni {\greekdasiaperispomeni \greekEta}
\definecharacter greekIotapsili {\greekpsili \greekIota}
\definecharacter greekIotadasia {\greekdasia \greekIota}
\definecharacter greekIotapsilivaria {\greekpsilivaria \greekIota}
\definecharacter greekIotadasiavaria {\greekdasiavaria \greekIota}
\definecharacter greekIotapsilitonos {\greekpsilitonos \greekIota}
\definecharacter greekIotadasiatonos {\greekdasiatonos \greekIota}
\definecharacter greekIotapsiliperispomeni {\greekpsiliperispomeni \greekIota}
\definecharacter greekIotadasiaperispomeni {\greekdasiaperispomeni \greekIota}
\definecharacter greekOmicronpsili {\greekpsili \greekOmicron}
\definecharacter greekOmicrondasia {\greekdasia \greekOmicron}
\definecharacter greekOmicronpsilivaria {\greekpsilivaria \greekOmicron}
\definecharacter greekOmicrondasiavaria {\greekdasiavaria \greekOmicron}
\definecharacter greekOmicronpsilitonos {\greekpsilitonos \greekOmicron}
\definecharacter greekOmicrondasiatonos {\greekdasiatonos \greekOmicron}
\definecharacter greekUpsilondasia {\greekdasia \greekUpsilon}
\definecharacter greekUpsilondasiavaria {\greekdasiavaria \greekUpsilon}
\definecharacter greekUpsilondasiatonos {\greekdasiatonos \greekUpsilon}
\definecharacter greekUpsilondasiaperispomeni {\greekdasiaperispomeni \greekUpsilon}
\definecharacter greekOmegapsili {\greekpsili \greekOmega}
\definecharacter greekOmegadasia {\greekdasia \greekOmega}
\definecharacter greekOmegapsilivaria {\greekpsilivaria \greekOmega}
\definecharacter greekOmegadasiavaria {\greekdasiavaria \greekOmega}
\definecharacter greekOmegapsilitonos {\greekpsilitonos \greekOmega}
\definecharacter greekOmegadasiatonos {\greekdasiatonos \greekOmega}
\definecharacter greekOmegapsiliperispomeni {\greekpsiliperispomeni \greekOmega}
\definecharacter greekOmegadasiaperispomeni {\greekdasiaperispomeni \greekOmega}
\definecharacter greekAlphaiotasubpsili {\greekpsili \greekAlpha \greekiota}
\definecharacter greekAlphaiotasubdasia {\greekdasia \greekAlpha \greekiota}
\definecharacter greekAlphaiotasubpsilivaria {\greekpsilivaria \greekAlpha \greekiota}
\definecharacter greekAlphaiotasubdasiavaria {\greekdasiavaria \greekAlpha \greekiota}
\definecharacter greekAlphaiotasubpsilitonos {\greekpsilitonos \greekAlpha \greekiota}
\definecharacter greekAlphaiotasubdasiatonos {\greekdasiatonos \greekAlpha \greekiota}
\definecharacter greekAlphaiotasubpsiliperispomeni {\greekpsiliperispomeni \greekAlpha \greekiota}
\definecharacter greekAlphaiotasubdasiaperispomeni {\greekdasiaperispomeni \greekAlpha \greekiota}
\definecharacter greekEtaiotasubpsili {\greekpsili \greekEta \greekiota}
\definecharacter greekEtaiotasubdasia {\greekdasia \greekEta \greekiota}
\definecharacter greekEtaiotasubpsilivaria {\greekpsilivaria \greekEta \greekiota}
\definecharacter greekEtaiotasubdasiavaria {\greekdasiavaria \greekEta \greekiota}
\definecharacter greekEtaiotasubpsilitonos {\greekpsilitonos \greekEta \greekiota}
\definecharacter greekEtaiotasubdasiatonos {\greekdasiatonos \greekEta \greekiota}
\definecharacter greekEtaiotasubpsiliperispomeni {\greekpsiliperispomeni \greekEta \greekiota}
\definecharacter greekEtaiotasubdasiaperispomeni {\greekdasiaperispomeni \greekEta \greekiota}
\definecharacter greekOmegaiotasubpsili {\greekpsili \greekOmega \greekiota}
\definecharacter greekOmegaiotasubdasia {\greekdasia \greekOmega \greekiota}
\definecharacter greekOmegaiotasubpsilivaria {\greekpsilivaria \greekOmega \greekiota}
\definecharacter greekOmegaiotasubdasiavaria {\greekdasiavaria \greekOmega \greekiota}
\definecharacter greekOmegaiotasubpsilitonos {\greekpsilitonos \greekOmega \greekiota}
\definecharacter greekOmegaiotasubdasiatonos {\greekdasiatonos \greekOmega \greekiota}
\definecharacter greekOmegaiotasubpsiliperispomeni {\greekpsiliperispomeni \greekOmega \greekiota}
\definecharacter greekOmegaiotasubdasiaperispomeni {\greekdasiaperispomeni \greekOmega \greekiota}
\definecharacter greekAlphavaria {\greekvaria \greekAlpha}
\definecharacter greekAlphaoxia {\greekoxia \greekAlpha}
\definecharacter greekAlphaiotasub {\greekAlpha \greekiota}
\definecharacter greekEpsilonvaria {\greekvaria \greekEpsilon}
\definecharacter greekEpsilonoxia {\greekoxia \greekEpsilon}
\definecharacter greekEtavaria {\greekvaria \greekEta}
\definecharacter greekEtaoxia {\greekoxia \greekEta}
\definecharacter greekEtaiotasub {\greekEta \greekiota}
\definecharacter greekIotavaria {\greekvaria \greekIota}
\definecharacter greekIotaoxia {\greekoxia \greekIota}
\definecharacter greekUpsilonvaria {\greekvaria \greekUpsilon}
\definecharacter greekUpsilonoxia {\greekoxia \greekUpsilon}
\definecharacter greekOmicronvaria {\greekvaria \greekOmicron}
\definecharacter greekOmicronoxia {\greekoxia \greekOmicron}
\definecharacter greekOmegavaria {\greekvaria \greekOmega}
\definecharacter greekOmegaoxia {\greekoxia \greekOmega}
\definecharacter greekOmegaiotasub {\greekOmega \greekiota}
\definecharacter greekRhodasia {\greekdasia \greekRho}
\definecharacter digamma {\greekdigamma}
\definecharacter sampi {\greeksampi}
\definecharacter stigma {\greekstigma}
\definecharacter koppa {\greeknumkoppa}
\definecharacter lunars {\greeksigmalunate}
\definecharacter lunarS {\greekSigmalunate}
\definecharacter halfbraceleft {\floorleft}
\definecharacter halfbraceright {\floorright}
\definecharacter crux {\textdag}
\stopencoding
\endinput
|
