%D \module
%D   [       file=regi-grk,
%D        version=2003.03.01,
%D          title=\CONTEXT\ Encoding Macros,
%D       subtitle=Greek,
%D         author=Apostolos Syropoulos,
%D           date=\currentdate,
%D      copyright=PRAGMA-ADE]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.

\startregime[grk]

%
% Uppercase Greek letters
%

\defineactivetoken 193 {\GreekAlpha}
\defineactivetoken 194 {\GreekBeta}
\defineactivetoken 195 {\GreekGamma}
\defineactivetoken 196 {\GreekDelta}
\defineactivetoken 197 {\GreekEpsilon}
\defineactivetoken 198 {\GreekZeta}
\defineactivetoken 199 {\GreekEta}
\defineactivetoken 200 {\GreekTheta}
\defineactivetoken 201 {\GreekIota}
\defineactivetoken 202 {\GreekKappa}
\defineactivetoken 203 {\GreekLamda}
\defineactivetoken 204 {\GreekMu}
\defineactivetoken 205 {\GreekNu}
\defineactivetoken 206 {\GreekXi}
\defineactivetoken 207 {\GreekOmicron}
\defineactivetoken 208 {\GreekPi}
\defineactivetoken 209 {\GreekRho}
\defineactivetoken 211 {\GreekSigma}
\defineactivetoken 212 {\GreekTau}
\defineactivetoken 213 {\GreekUpsilon}
\defineactivetoken 214 {\GreekPhi}
\defineactivetoken 215 {\GreekChi}
\defineactivetoken 216 {\GreekPsi}
\defineactivetoken 217 {\GreekOmega}

%
% Lowercase Greek letters
%

\defineactivetoken 225 {\Greekalpha}
\defineactivetoken 226 {\Greekbeta}
\defineactivetoken 227 {\Greekgamma}
\defineactivetoken 228 {\Greekdelta}
\defineactivetoken 229 {\Greekepsilon}
\defineactivetoken 230 {\Greekzeta}
\defineactivetoken 231 {\Greeketa}
\defineactivetoken 232 {\Greektheta}
\defineactivetoken 233 {\Greekiota}
\defineactivetoken 234 {\Greekkappa}
\defineactivetoken 235 {\Greeklamda}
\defineactivetoken 236 {\Greekmu}
\defineactivetoken 237 {\Greeknu}
\defineactivetoken 238 {\Greekxi}
\defineactivetoken 239 {\Greekomicron}
\defineactivetoken 240 {\Greekpi}
\defineactivetoken 241 {\Greekrho}
\defineactivetoken 242 {\Greekfinalsigma}
\defineactivetoken 243 {\Greeksigma}
\defineactivetoken 244 {\Greektau}
\defineactivetoken 245 {\Greekupsilon}
\defineactivetoken 246 {\Greekphi}
\defineactivetoken 247 {\Greekchi}
\defineactivetoken 248 {\Greekpsi}
\defineactivetoken 249 {\Greekomega}

%
% Accented Uppercase Greek letters
%

\defineactivetoken 182 {\GreekAlphatonos}
\defineactivetoken 184 {\GreekEpsilontonos}
\defineactivetoken 185 {\GreekEtatonos}
\defineactivetoken 186 {\GreekIotatonos}
\defineactivetoken 188 {\GreekOmicrontonos}
\defineactivetoken 190 {\GreekUpsilontonos}
\defineactivetoken 191 {\GreekOmegatonos}
\defineactivetoken 218 {\GreekIotadialytika}
\defineactivetoken 219 {\GreekUpsilondialytika}

%
% Accented Lowercase Greek letters
%

\defineactivetoken 220 {\Greekalphatonos}
\defineactivetoken 221 {\Greekepsilontonos}
\defineactivetoken 222 {\Greeketatonos}
\defineactivetoken 223 {\Greekiotatonos}
\defineactivetoken 252 {\Greekomicrontonos}
\defineactivetoken 253 {\Greekupsilontonos}
\defineactivetoken 254 {\Greekomegatonos}
\defineactivetoken 250 {\Greekiotadialytika}
\defineactivetoken 251 {\Greekupsilondialytika}
\defineactivetoken 192 {\Greekiotadialytikatonos}
\defineactivetoken 224 {\Greekupsilondialytikatonos}

%
% Miscellaneous Greek symbols
%

\defineactivetoken 171 {\Greekleftquot}
\defineactivetoken 187 {\Greekrightquot}
\defineactivetoken 180 {\Greektonos}
\defineactivetoken 181 {\Greekdialytikatonos}
\defineactivetoken 162 {\Greekapostrophos}

\stopregime 

\endinput 
