1 files changed, 265 insertions, 0 deletions
diff --git a/Master/texmf-dist/omega/otp/antomega/uppercase-dflt.otp b/Master/texmf-dist/omega/otp/antomega/uppercase-dflt.otp
new file mode 100644
index 00000000000..66dd4452f9c
--- /dev/null
+++ b/Master/texmf-dist/omega/otp/antomega/uppercase-dflt.otp
@@ -0,0 +1,265 @@
+%% This file is part of the ANTOMEGA project version 0.8
+%% -----------------------------------------------------
+%% 
+%% It may be distributed under the terms of the LaTeX Project Public
+%% License, as described in lppl.txt in the base LaTeX distribution.
+%% Either version 1.0 or, at your option, any later version.
+%% Copyright (C) 2005 by Alexej Kryukov
+%% Please report errors to: A.M. Kryukov <basileia@yandex.ru>
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% 
+% This file belongs to an alpha-release of Omega-Babel, 
+% which is part of the
+% 
+%   ####   #    #  ######   ####     ##
+%  #    #  ##  ##  #       #    #   #  #
+%  #    #  # ## #  #####   #       #    #
+%  #    #  #    #  #       #  ###  ######
+%  #    #  #    #  #       #    #  #    #
+%   ####   #    #  ######   ####   #    # Project,
+% 
+% (c) John Plaice and Yannis Haralambous, 1994-95
+% 
+% plaice@ift.ulaval.ca
+% haralambous@univ-lille1.fr, http://www.ens.fr/~yannis
+% 
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% 
+% Date of the release: 1995-11-27
+% 
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+input: 2;
+
+output: 2;
+
+expressions:
+
+% Latin
+
+@"0020 - @"0060 => \1 ;
+@"0061 - @"007a => #(\1 - 32) ;
+@"007b - @"00de => \1 ;
+% uppercase German sz
+@"00df => "SS" ;
+@"00e0 - @"00f6 => #(\1 - 32) ;
+@"00f7 => \1 ;
+@"00f8 - @"00fe => #(\1 - 32) ;
+% \"y
+@"00ff => @"0178 ;
+% dotless j
+@"F6BE => "J" ;
+@"0100 - @"012f => #(\1 - (\1 mod: 2)) ;
+@"0130 => \1 ;
+%uppercase Turkish dotless i
+@"0131 => "I" ;
+@"0132 - @"0137 => #(\1 - (\1 mod: 2)) ;
+% uppercase kra
+@"0138 => "K" ;
+@"0139 - @"0148 => #(\1 - 1 + (\1 mod: 2)) ;
+%uppercase Afrikaans 'n
+@"0149 => "'N" ;
+@"014a - @"0177 => #(\1 - (\1 mod: 2)) ;
+% \"Y
+@"0178 => \1 ;
+@"0179 - @"017e => #(\1 - 1 + (\1 mod: 2)) ;
+% uppercase long s
+@"017f => "S" ;
+@"0180 - @"01c3 => \1 ; %to be treated later on (African stuff)
+@"01c4 - @"01c6 => @"01c4 ;
+@"01c7 - @"01c9 => @"01c7 ;
+@"01ca - @"01cc => @"01ca ;
+@"01cd - @"01dc => #(\1 - 1 + (\1 mod: 2)) ;
+@"01dd => @"018e ;
+@"01de - @"01ef => #(\1 - (\1 mod: 2)) ;
+@"01f0 => @"e18f ;
+@"01f1 - @"01f3 => @"01f1 ;
+@"01f4 - @"0217 => #(\1 - (\1 mod: 2)) ;
+@"0250 - @"0385 => \1 ; %Phonetic and other stuff
+
+% Greek!
+
+@"0386 => @"0391 ;
+@"0388 => @"0395 ;
+@"0389 => @"0397 ;
+@"038a => @"0399 ;
+@"038c => @"039f ;
+@"038e => @"03a5 ;
+@"038f => @"03a9 ;
+% kefalaio iota me dialutika kai toniko shmeio
+@"0390 => @"03aa ;
+@"0391 - @"03ab => \1 ;
+% 'ai -> A"I
+@"03ac @"03b9 => @"0391 @"03aa ;
+% 'au -> A"U
+@"03ac @"03c5 => @"0391 @"03ab ;
+% 'ai -> A"I
+@"1f71 @"03b9 => @"0391 @"03aa ;
+% 'au -> A"U
+@"1f71 @"03c5 => @"0391 @"03ab ;
+@"03ac => @"0391 ;
+% 'ei -> E"I
+@"03ad @"03b9 => @"0395 @"03aa ;
+% 'eu -> E"U
+@"03ad @"03c5 => @"0395 @"03ab ;
+% 'ei -> E"I
+@"1f73 @"03b9 => @"0395 @"03aa ;
+% 'eu -> E"U
+@"1f73 @"03c5 => @"0395 @"03ab ;
+@"03ad => @"0395 ;
+% 'hu -> H"U
+@"03ae @"03c5 => @"0397 @"03ab ;
+% 'hu -> H"U
+@"1f75 @"03c5 => @"0397 @"03ab ;
+@"03ae => @"0397 ;
+@"03af => @"0399 ;
+% kefalaio uyilon me dialutika kai toniko shmeio
+@"03b0 => @"03ab ;
+@"03b1 - @"03c1 => #(\1 - 32) ;
+% kefalaio teliko sigma
+@"03c2 => @"03a3 ;
+@"03c3 - @"03cb => #(\1 - 32) ;
+% 'oi -> O"I
+@"03cc @"03b9 => @"039f @"03aa ;
+% 'ou -> O"U
+@"03cc @"03c5 => @"039f @"03ab ;
+% 'oi -> O"I
+@"1f79 @"03b9 => @"039f @"03aa ;
+% 'ou -> O"U
+@"1f79 @"03c5 => @"039f @"03ab ;
+@"03cc => @"039f ;
+@"03cd => @"03a5 ;
+@"03ce => @"03a9 ;
+% kefalaio arqiko bhta
+@"03d0 => @"0392 ;
+% kefalaio anoikto jhta
+@"03d1 => @"0398 ;
+@"03d2 => @"03d2 ;
+@"03d3 => @"03d3 ;
+@"03d4 => @"03d4 ;
+% kefalaio anoikto fi
+@"03d5 => @"03a6 ;
+% kefalaio stroggulo pi (opws to majainame sto dhmotiko)
+@"03d6 => @"03a0 ;
+% kai
+@"03d7 => @"039a @"0391 @"0399 ;
+@"03da - @"03ef => #(\1 - (\1 mod: 2)) ;
+% kefalaio kalligrafiko kappa
+@"03f0 => @"039a ;
+% kefalaio ro me kampulh oura
+@"03f1 => @"03a1 ;
+% kefalaio sigma pou moiazei me c
+@"03f2 => @"03F9 ;
+% kefalaio jot
+@"03f3 => "J" ;
+
+% Cyrillic!
+
+@"0401 - @"042f => \1 ;
+@"0430 - @"044f => #(\1 - 32) ;
+@"0451 - @"045f => #(\1 - 80) ;
+@"0460 - @"04bf => #(\1 - (\1 mod: 2)) ;
+@"04c0 => \1 ;
+@"04c1 - @"04cc => #(\1 - 1 + (\1 mod: 2)) ;
+@"04d0 - @"04f9 => #(\1 - (\1 mod: 2)) ;
+% Serbian alternate forms
+@"F6C4 => @"0413 ;
+@"F6C5 => @"0411 ;
+@"F6C6 => @"0414 ;
+@"F6C7 => @"041F ;
+@"F6C8 => @"0422 ;
+
+% Armenian!
+
+@"0531 - @"0556 => \1 ;
+@"0561 - @"0586 => #(\1 - 48) ;
+%uppercase ligature ech yiwn
+@"0587 => @"e1cb ;
+
+% Additional Latin
+
+@"1e00 - @"1e95 => #(\1 - (\1 mod: 2)) ;
+@"1e96 - @"1e9a => #(\1 + @"c1f2) ;
+@"1ea0 - @"1ef9 => #(\1 - (\1 mod: 2)) ;
+
+% Real Greek! (the one with accents and spirits)
+
+@"1f00 - @"1f0f => @"0391 ;
+@"1f10 - @"1f1f => @"0395 ;
+@"1f20 - @"1f2f => @"0397 ;
+@"1f30 - @"1f3f => @"0399 ;
+@"1f40 - @"1f4f => @"039f ;
+@"1f50 - @"1f5f => @"03a5 ;
+@"1f60 - @"1f6f => @"03a9 ;
+@"1f70 => @"0391 ;
+@"1f71 => @"0391 ;
+@"1f72 => @"0395 ;
+@"1f73 => @"0395 ;
+@"1f74 => @"0397 ;
+@"1f75 => @"0397 ;
+@"1f76 => @"0399 ;
+@"1f77 => @"0399 ;
+@"1f78 => @"039f ;
+@"1f79 => @"039f ;
+@"1f7a => @"03a5 ;
+@"1f7b => @"03a5 ;
+@"1f7c => @"03a9 ;
+@"1f7d => @"03a9 ;
+@"1f80 - @"1f8f => @"1fbc ;
+@"1f90 - @"1f9f => @"1fcc ;
+@"1fa0 - @"1faf => @"1ffc ;
+@"1fb0 => @"1fb8 ;
+@"1fb1 => @"1fb9 ;
+@"1fb2 - @"1fb4 => @"1fbc ;
+@"1fb6 => @"03a1;
+@"1fb7 => @"1fbc;
+@"1fba - @"1fbb => @"0391 ;
+@"1fc2 - @"1fc4 => @"1fcc ;
+@"1fc6 => @"0397;
+@"1fc7 => @"1fcc;
+@"1fc8 => @"0395 ;
+@"1fc9 => @"0395 ;
+@"1fca - @"1fcb => @"0397 ;
+@"1fd0 => @"1fd8 ;
+@"1fd1 => @"1fd9 ;
+@"1fd2 => @"03aa ;
+@"1fd3 => @"03aa ;
+@"1fd6 => @"0399 ;
+@"1fd7 => @"03aa ;
+@"1fda => @"0399 ;
+@"1fdb => @"0399 ;
+@"1fe0 => @"1fe8 ;
+@"1fe1 => @"1fe9 ;
+@"1fe2 => @"03ab ;
+@"1fe3 => @"03ab ;
+@"1fe4 => @"03a1 ;
+@"1fe5 => @"03a1 ;
+@"1fe6 => @"03a5 ;
+@"1fe7 => @"03ab ;
+@"1fea => @"03a5 ;
+@"1feb => @"03a5 ;
+@"1fec => @"03a1 ;
+@"1ff2 - @"1ff4 => @"1ffc ;
+@"1ff6 => @"03a9;
+@"1ff7 => @"1ffc;
+@"1ff8 => @"039f ;
+@"1ff9 => @"039f ;
+@"1ffa - @"1ffb => @"03a9 ;
+
+% Roman numerals
+
+@"2170 - @"217f => #(\1 - 16) ;
+
+% Alphabetic presentation forms
+
+@"fb00 => "FF" ;
+@"fb01 => "FI" ;
+@"fb02 => "FL" ;
+@"fb03 => "FFI" ;
+@"fb04 => "FFL" ;
+@"fb05 => "ST" ;
+@"fb06 => "ST" ;
+
+% All others (wow, they are many of them!)
+
+. => \1 ;