summaryrefslogtreecommitdiff
path: root/tex/context/base/mkii/unic-003.mkii
blob: 91512ea546d25e9d9fd8422125e13011eaadde40 (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
%D \module
%D   [       file=unic-003,
%D        version=2005.01.26,
%D          title=\CONTEXT\ \UNICODE\ Macros,
%D       subtitle=Vector 3,
%D         author=Hans Hagen,
%D           date=\currentdate,
%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.

\unprotect

\startunicodevector 3
  \ifcase\numexpr#1-126\relax
     % special greek
    \strippedcsname \greekquestionmark       \or
    \strippedcsname \unknownchar             \or
    \strippedcsname \unknownchar             \or
    \strippedcsname \unknownchar             \or
    \strippedcsname \unknownchar             \or
    \strippedcsname \unknownchar             \or
    \strippedcsname \greektonos              \or
    \strippedcsname \greekdialytikatonos     \or
    \strippedcsname \greekAlphatonos         \or
    \strippedcsname \greekanoteleia          \or
    \strippedcsname \greekEpsilontonos       \or
    \strippedcsname \greekEtatonos           \or
    \strippedcsname \greekIotatonos          \or
    \strippedcsname \unknownchar             \or
    \strippedcsname \greekOmicrontonos       \or
    \strippedcsname \unknownchar             \or
    \strippedcsname \greekUpsilontonos       \or
    \strippedcsname \greekOmegatonos         \or
    \strippedcsname \greekiotadialytikatonos \or
    % normal greek
    \strippedcsname \greekAlpha     \or
    \strippedcsname \greekBeta      \or
    \strippedcsname \greekGamma     \or
    \strippedcsname \greekDelta     \or
    \strippedcsname \greekEpsilon   \or
    \strippedcsname \greekZeta      \or
    \strippedcsname \greekEta       \or
    \strippedcsname \greekTheta     \or
    \strippedcsname \greekIota      \or
    \strippedcsname \greekKappa     \or
    \strippedcsname \greekLambda    \or
    \strippedcsname \greekMu        \or
    \strippedcsname \greekNu        \or
    \strippedcsname \greekXi        \or
    \strippedcsname \greekOmicron   \or
    \strippedcsname \greekPi        \or
    \strippedcsname \greekRho       \or
    \strippedcsname \unknownchar    \or
    \strippedcsname \greekSigma     \or
    \strippedcsname \greekTau       \or
    \strippedcsname \greekUpsilon   \or
    \strippedcsname \greekPhi       \or
    \strippedcsname \greekChi       \or
    \strippedcsname \greekPsi       \or
    \strippedcsname \greekOmega     \or
    % special greek
    \strippedcsname \greekIotadialytika         \or
    \strippedcsname \greekUpsilondialytika      \or
    \strippedcsname \greekalphatonos            \or
    \strippedcsname \greekepsilontonos          \or
    \strippedcsname \greeketatonos              \or
    \strippedcsname \greekiotatonos             \or
    \strippedcsname \greekupsilondialytikatonos \or
    % normal greek
    \strippedcsname \greekalpha      \or
    \strippedcsname \greekbeta       \or
    \strippedcsname \greekgamma      \or
    \strippedcsname \greekdelta      \or
    \strippedcsname \greekepsilon    \or
    \strippedcsname \greekzeta       \or
    \strippedcsname \greeketa        \or
    \strippedcsname \greektheta      \or
    \strippedcsname \greekiota       \or
    \strippedcsname \greekkappa      \or
    \strippedcsname \greeklambda     \or
    \strippedcsname \greekmu         \or
    \strippedcsname \greeknu         \or
    \strippedcsname \greekxi         \or
    \strippedcsname \greekomicron    \or
    \strippedcsname \greekpi         \or
    \strippedcsname \greekrho        \or
    \strippedcsname \greekfinalsigma \or
    \strippedcsname \greeksigma      \or
    \strippedcsname \greektau        \or
    \strippedcsname \greekupsilon    \or
    \strippedcsname \greekphi        \or
    \strippedcsname \greekchi        \or
    \strippedcsname \greekpsi        \or
    \strippedcsname \greekomega      \or
    % special greek
    \strippedcsname \greekiotadialytika    \or
    \strippedcsname \greekupsilondialytika \or
    \strippedcsname \greekomicrontonos     \or
    \strippedcsname \greekupsilontonos     \or
    \strippedcsname \greekomegatonos       \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \greekbetaalt          \or
    \strippedcsname \greekthetaalt         \or
    \strippedcsname \unknownchar           \or % upsilon hook
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \greekphialt           \or
    \strippedcsname \greekpialt            \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or % Sampi
    \strippedcsname \unknownchar           \or % sampi
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or % kappa alt
    \strippedcsname \greekrhoalt           \or
    \strippedcsname \greeksigmalunate      \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \unknownchar           \or
    \strippedcsname \greekepsilonalt       \else
    \strippedcsname \unknownchar
    \fi
\stopunicodevector

\protect \endinput