codepage

git-svn-id: svn://tug.org/texlive/trunk@772 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 704 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/codepage/shapedc.tex b/Master/texmf-dist/tex/latex/codepage/shapedc.tex
new file mode 100644
index 00000000000..08a155b9b48
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/codepage/shapedc.tex
@@ -0,0 +1,704 @@
+%% 
+%% This is file `shapedc.tex', generated 
+%% on <1995/1/2> with the docstrip utility (2.0r).
+%% 
+%% The original source files were:
+%% 
+%% codepage.dtx  (with options: `shapedc')
+%% This package provides some commands to handle different code pages in the same 
+%% document. It works with TeX and LaTeX, but his documentation should be produced 
+%% with the docstrip package. 
+%% 
+%% Disclaimer: 
+%% This package is provided 'as is' without any warranty. 
+%% 
+%% Author: 
+%% Alain Aubord 
+%% Geneva 
+%% Switzerland 
+%% 
+%% E-mail: aubord@uni2a.unige.ch 
+\def\fileversion{1.2}%
+\def\filedate{2 January 1995}%
+\def\docdate{2 January 1995}%
+\def\CheckSum{4615}%
+\chardef\atcatcode=\catcode`\@
+\catcode`\@=11\relax
+\global\chardef\aa="0E5%
+\global\chardef\ae="0E6%
+\global\chardef\l="0AA%
+\global\chardef\oe="0F7%
+\global\chardef\o="0F8%
+\global\chardef\ss="0FF%
+\global\chardef\AA="0C5%
+\global\chardef\AE="0C6%
+\global\chardef\L="8A%
+\global\chardef\OE="0D7%
+\global\chardef\O="0D8%
+\global\chardef\SS="0DF%
+\global\chardef\i="19%
+\global\chardef\j="1A%
+\global\chardef\pounds="0BF%
+\gdef\hbar{{\mathchar'11\mkern-9muh}}%
+\def\@accent@def#1#2#3{\expandafter\gdef
+       \csname @#1@\string#2@#1@\endcsname{#3}}%
+\gdef\@accent@use#1#2#3{%
+  \expandafter\ifx \csname @#1@\string#3@#1@\endcsname \relax
+      {\accent#2 #3}%
+    \else  \csname @#1@\string#3@#1@\endcsname\fi}%
+\gdef\`{\@accent@use{grave}{0}}%
+\let\@accii=\`%
+\@accent@def{grave}{a}{\char"E0{}}%
+\@accent@def{grave}{e}{\char"E8{}}%
+\@accent@def{grave}{\i}{\char"EC{}}%
+\@accent@def{grave}{i}{\char"EC{}}%
+\@accent@def{grave}{o}{\char"F2{}}%
+\@accent@def{grave}{u}{\char"F9{}}%
+\@accent@def{grave}{A}{\char"C0{}}%
+\@accent@def{grave}{E}{\char"C8{}}%
+\@accent@def{grave}{I}{\char"CC{}}%
+\@accent@def{grave}{O}{\char"D2{}}%
+\@accent@def{grave}{U}{\char"D9{}}%
+\gdef\'{\@accent@use{acute}{1}}%
+\let\@acci=\'%
+\@accent@def{acute}{n}{\char"AB{}}%
+\@accent@def{acute}{l}{\char"A8{}}%
+\@accent@def{acute}{r}{\char"AF{}}%
+\@accent@def{acute}{s}{\char"B1{}}%
+\@accent@def{acute}{z}{\char"B9{}}%
+\@accent@def{acute}{a}{\char"E1{}}%
+\@accent@def{acute}{e}{\char"E9{}}%
+\@accent@def{acute}{\i}{\char"ED{}}%
+\@accent@def{acute}{i}{\char"ED{}}%
+\@accent@def{acute}{o}{\char"F3{}}%
+\@accent@def{acute}{u}{\char"FA{}}%
+\@accent@def{acute}{y}{\char"FD{}}%
+\@accent@def{acute}{N}{\char"8B{}}%
+\@accent@def{acute}{L}{\char"88{}}%
+\@accent@def{acute}{R}{\char"8F{}}%
+\@accent@def{acute}{S}{\char"91{}}%
+\@accent@def{acute}{Z}{\char"99{}}%
+\@accent@def{acute}{A}{\char"C1{}}%
+\@accent@def{acute}{E}{\char"C9{}}%
+\@accent@def{acute}{I}{\char"CD{}}%
+\@accent@def{acute}{O}{\char"D3{}}%
+\@accent@def{acute}{U}{\char"DA{}}%
+\@accent@def{acute}{Y}{\char"DD{}}%
+\@accent@def{acute}{c}{\char"A2{}}%
+\@accent@def{acute}{C}{\char"82{}}%
+\gdef\v{\@accent@use{check}{7}}%
+\@accent@def{check}{c}{\char"A3{}}%
+\@accent@def{check}{e}{\char"A5{}}%
+\@accent@def{check}{n}{\char"AC{}}%
+\@accent@def{check}{r}{\char"B0{}}%
+\@accent@def{check}{s}{\char"B2{}}%
+\@accent@def{check}{z}{\char"BA{}}%
+\@accent@def{check}{C}{\char"83{}}%
+\@accent@def{check}{D}{\char"84{}}%
+\@accent@def{check}{E}{\char"85{}}%
+\@accent@def{check}{N}{\char"8C{}}%
+\@accent@def{check}{R}{\char"90{}}%
+\@accent@def{check}{S}{\char"92{}}%
+\@accent@def{check}{T}{\char"94{}}%
+\@accent@def{check}{Z}{\char"9A{}}%
+\gdef\u{\@accent@use{breve}{8}}%
+\@accent@def{breve}{a}{\char"A0{}}%
+\@accent@def{breve}{g}{\char"A7{}}%
+\@accent@def{breve}{A}{\char"80{}}%
+\@accent@def{breve}{G}{\char"87{}}%
+\gdef\=#1{{\accent9 #1}}%
+\let\@acciii=\=%
+\gdef\^{\@accent@use{circflx}{2}}%
+\@accent@def{circflx}{a}{\char"E2{}}%
+\@accent@def{circflx}{e}{\char"EA{}}%
+\@accent@def{circflx}{\i}{\char"EE{}}%
+\@accent@def{circflx}{i}{\char"EE{}}%
+\@accent@def{circflx}{o}{\char"F4{}}%
+\@accent@def{circflx}{u}{\char"FB{}}%
+\@accent@def{circflx}{A}{\char"C2{}}%
+\@accent@def{circflx}{E}{\char"CA{}}%
+\@accent@def{circflx}{I}{\char"CE{}}%
+\@accent@def{circflx}{O}{\char"D4{}}%
+\@accent@def{circflx}{U}{\char"DB{}}%
+\gdef\.{\@accent@use{dot}{10}}%
+\@accent@def{dot}{z}{\char"BB{}}%
+\@accent@def{dot}{Z}{\char"9B{}}%
+\@accent@def{dot}{I}{\char"9D{}}%
+\@accent@def{dot}{i}{i}%
+\gdef\H{\@accent@use{Hung}{5}}%
+\@accent@def{Hung}{o}{\char"AE{}}%
+\@accent@def{Hung}{u}{\char"B6{}}%
+\@accent@def{Hung}{O}{\char"8E{}}%
+\@accent@def{Hung}{U}{\char"96{}}%
+\gdef\~{\@accent@use{tilde}{3}}%
+\@accent@def{tilde}{a}{\char"E3{}}%
+\@accent@def{tilde}{n}{\char"F1{}}%
+\@accent@def{tilde}{o}{\char"F5{}}%
+\@accent@def{tilde}{A}{\char"C3{}}%
+\@accent@def{tilde}{N}{\char"D1{}}%
+\@accent@def{tilde}{O}{\char"D5{}}%
+\gdef\"{\@accent@use{Umlaut}{4}}%
+\@accent@def{Umlaut}{a}{\char"E4{}}%
+\@accent@def{Umlaut}{e}{\char"EB{}}%
+\@accent@def{Umlaut}{\i}{\char"EF{}}%
+\@accent@def{Umlaut}{i}{\char"EF{}}%
+\@accent@def{Umlaut}{o}{\char"F6{}}%
+\@accent@def{Umlaut}{u}{\char"FC{}}%
+\@accent@def{Umlaut}{A}{\char"C4{}}%
+\@accent@def{Umlaut}{E}{\char"CB{}}%
+\@accent@def{Umlaut}{I}{\char"CF{}}%
+\@accent@def{Umlaut}{O}{\char"D6{}}%
+\@accent@def{Umlaut}{U}{\char"DC{}}%
+\gdef\pb#1{\oalign{#1\crcr\hidewidth
+    \vbox to.2ex{\hbox{\char9}\vss}\hidewidth}}%
+\gdef\pc#1{\expandafter\ifx
+    \csname @cedilla@\string#1@cedilla@\endcsname \relax
+    \c@dilla#1\else \csname @cedilla@\string#1@cedilla@\endcsname\fi}%
+\@accent@def{cedilla}{s}{\char"B3{}}%
+\@accent@def{cedilla}{t}{\char"B5{}}%
+\@accent@def{cedilla}{c}{\char"E7{}}%
+\@accent@def{cedilla}{S}{\char"93{}}%
+\@accent@def{cedilla}{T}{\char"95{}}%
+\@accent@def{cedilla}{C}{\char"C7{}}%
+\gdef\c@dilla#1{\setbox\z@\hbox{#1}\ifdim\ht\z@=1ex\accent11 #1%
+  \else{\ooalign{\hidewidth\char11\hidewidth\crcr\unhbox\z@}}\fi}%
+\def\dieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char'004{}\else\string#1\fi}%
+}%
+\def\acute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"01{}\else\string#1\fi}%
+}%
+\def\cedilla#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"0D{}\else\string#1\fi}%
+}%
+\def\Agrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"C0{}\else\string#1\fi}%
+}%
+\def\Aacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"C1{}\else\string#1\fi}%
+}%
+\def\Acircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"C2{}\else\string#1\fi}%
+}%
+\def\Atilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"C3{}\else\string#1\fi}%
+}%
+\def\Adieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"C4{}\else\string#1\fi}%
+}%
+\def\Aring#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"C5{}\else\string#1\fi}%
+}%
+\def\fiLigature#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{fi}\else\string#1\fi}%
+}%
+\def\flLigature#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{fl}\else\string#1\fi}%
+}%
+\def\AE#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"C6{}\else\string#1\fi}%
+}%
+\def\Ccedilla#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"C7{}\else\string#1\fi}%
+}%
+\def\Egrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"C8{}\else\string#1\fi}%
+}%
+\def\Eacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"C9{}\else\string#1\fi}%
+}%
+\def\Ecircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"CA{}\else\string#1\fi}%
+}%
+\def\Edieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"CB{}\else\string#1\fi}%
+}%
+\def\Igrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"CC{}\else\string#1\fi}%
+}%
+\def\Iacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"CD{}\else\string#1\fi}%
+}%
+\def\Icircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"CE{}\else\string#1\fi}%
+}%
+\def\Idieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"CF{}\else\string#1\fi}%
+}%
+\def\DBar#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"D0{}\else\string#1\fi}%
+}%
+\def\Ntilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"D1{}\else\string#1\fi}%
+}%
+\def\Ograve#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"D2{}\else\string#1\fi}%
+}%
+\def\Oacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"D3{}\else\string#1\fi}%
+}%
+\def\Ocircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"D4{}\else\string#1\fi}%
+}%
+\def\Otilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"D5{}\else\string#1\fi}%
+}%
+\def\Odieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"D6{}\else\string#1\fi}%
+}%
+\def\Oslash#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"D8{}\else\string#1\fi}%
+}%
+\def\Ugrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"D9{}\else\string#1\fi}%
+}%
+\def\Uacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"DA{}\else\string#1\fi}%
+}%
+\def\Ucircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"DB{}\else\string#1\fi}%
+}%
+\def\Udieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"DC{}\else\string#1\fi}%
+}%
+\def\Yacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"DD{}\else\string#1\fi}%
+}%
+\def\Thorn#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"DE{}\else\string#1\fi}%
+}%
+\def\germandbls#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"DF{}\else\string#1\fi}%
+}%
+\def\agrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"E0{}\else\string#1\fi}%
+}%
+\def\aacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"E1{}\else\string#1\fi}%
+}%
+\def\acircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"E2{}\else\string#1\fi}%
+}%
+\def\atilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"E3{}\else\string#1\fi}%
+}%
+\def\adieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"E4{}\else\string#1\fi}%
+}%
+\def\aring#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"E5{}\else\string#1\fi}%
+}%
+\def\ae#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"E6{}\else\string#1\fi}%
+}%
+\def\ccedilla#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"E7{}\else\string#1\fi}%
+}%
+\def\egrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"E8{}\else\string#1\fi}%
+}%
+\def\eacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"E9{}\else\string#1\fi}%
+}%
+\def\ecircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"EA{}\else\string#1\fi}%
+}%
+\def\edieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"EB{}\else\string#1\fi}%
+}%
+\def\igrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"EC{}\else\string#1\fi}%
+}%
+\def\iacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"ED{}\else\string#1\fi}%
+}%
+\def\icircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"EE{}\else\string#1\fi}%
+}%
+\def\idieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"EF{}\else\string#1\fi}%
+}%
+\def\dBar#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"F0{}\else\string#1\fi}%
+}%
+\def\ntilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"F1{}\else\string#1\fi}%
+}%
+\def\ograve#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"F2{}\else\string#1\fi}%
+}%
+\def\oacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"F3{}\else\string#1\fi}%
+}%
+\def\ocircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"F4{}\else\string#1\fi}%
+}%
+\def\otilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"F5{}\else\string#1\fi}%
+}%
+\def\odieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"F6{}\else\string#1\fi}%
+}%
+\def\OE#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\OE{}\else\string#1\fi}%
+}%
+\def\oe#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\oe{}\else\string#1\fi}%
+}%
+\def\oslash#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"F8{}\else\string#1\fi}%
+}%
+\def\ugrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"F9{}\else\string#1\fi}%
+}%
+\def\uacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"FA{}\else\string#1\fi}%
+}%
+\def\ucircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"FB{}\else\string#1\fi}%
+}%
+\def\udieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"FC{}\else\string#1\fi}%
+}%
+\def\yacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"FD{}\else\string#1\fi}%
+}%
+\def\thorn#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"FE{}\else\string#1\fi}%
+}%
+\def\ydieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"B8{}\else\string#1\fi}%
+}%
+\def\Ydieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"98{}\else\string#1\fi}%
+}%
+\def\alpha#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{alpha}%
+}%
+\def\approx#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{approx}%
+}%
+\def\beta#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{beta}%
+}%
+\def\bullet#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{bullet}%
+}%
+\def\cap#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{cap}%
+}%
+\def\cent#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+        % no definition in DC
+}%
+\def\guillemeotright#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      % a small space is inserted before the french guillemot
+      % and the pre-existing space is removed
+      \gdef#1{\ifTR\unskip\@InMath{,}\char'024{}\else\string#1\fi}%
+}%
+\def\copyright#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\copyright{}\else\string#1\fi}%
+}%
+\def\currency#1#2#3{% character hex A4 in Iso latin set 1
+      \@UC{#1}{#2}{#3}%
+        % no definition in DC
+}%
+\def\degree#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+}%
+\def\dag#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{dag}%
+}%
+\def\ddag#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{ddag}%
+}%
+\def\delta#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{delta}%
+}%
+\def\div#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{div}%
+}%
+\def\diamond#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{Diamond}%
+}%
+\def\emptysetSign#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{emptyset}%
+}%
+\def\section#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{\S}\else\string#1\fi}%
+}%
+\def\epsilon#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{varepsilon}%
+}%
+\def\equiv#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{equiv}%
+}%
+\def\ellipsis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{...}\else\string#1\fi}%
+}%
+\def\exclamdown#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"BD{}\else\string#1\fi}%
+}%
+\def\ordfeminine#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\@Sup{\b{a}}\else\string#1\fi}%
+}%
+\def\geq#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{geq}%
+}%
+\def\Gamma#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{Gamma}%
+}%
+\def\infty#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{infty}%
+}%
+\def\leq#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{leq}%
+}%
+\def\emdash#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{---}\else\string#1\fi}%
+}%
+\def\ordmasculine#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\@Sup{\b{o}}\else\string#1\fi}%
+}%
+\def\mu#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{mu}%
+}%
+\def\neg#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{neg}%
+}%
+\def\neq#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{neq}%
+}%
+\def\unbreakablespace#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR~\else\string#1\fi}%
+}%
+\def\Omega#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{Omega}%
+}%
+\def\OneHalf#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{\@Fraction{1}{2}}\else\string#1\fi}%
+}%
+\def\OneQuarter#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{\@Fraction{1}{4}}\else\string#1\fi}%
+}%
+\def\guilletmotleft#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      % a small space is added after the opening guillemot
+      % and the pre-existing space is removed
+      \gdef#1{\ifTR\char"13\unskip\@InMath{,}\else\string#1\fi}%
+}%
+\def\Pi#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{Pi}%
+}%
+\def\pi#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{pi}%
+}%
+\def\pm#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{pm}%
+}%
+\def\ParagraphSign#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{\P}\else\string#1\fi}%
+}%
+\def\partial#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{partial}%
+}%
+\def\Phi#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{Phi}%
+}%
+\def\pounds#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"BF{}\else\string#1\fi}%
+}%
+\def\powerone#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{\@Sup{1}}\else\string#1\fi}%
+}%
+\def\powerthree#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{\@Sup{3}}\else\string#1\fi}%
+}%
+\def\powertwo#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{\@Sup{2}}\else\string#1\fi}%
+}%
+\def\questiondown#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"BE{}\else\string#1\fi}%
+}%
+\def\register#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+        % no definition in DC
+}%
+\def\Sigma#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{Sigma}%
+}%
+\def\sigma#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{sigma}%
+}%
+\def\quoteright#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{'}\else\string#1\fi}%
+}%
+\def\quoteleft#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{`}\else\string#1\fi}%
+}%
+\def\splitbar#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+        % no definition in DC
+}%
+\def\tau#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{tau}%
+}%
+\def\ThetaSign#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{Theta}%
+}%
+\def\threequarter#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{\@Fraction{3}{4}}\else\string#1\fi}%
+}%
+\def\times#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \@MathSymbol{#1}{times}%
+}%
+\def\trademark#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\@Sup{TM}\else\string#1\fi}%
+}%
+\def\quotedblright#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{''}\else\string#1\fi}%
+}%
+\def\quotedblleft#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{``}\else\string#1\fi}%
+}%
+\def\yen#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+        % no definition in DC
+}%
+\def\perthousand#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+        % no definition in DC
+}%
+\def\florin#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{\it f}\else\string#1\fi}%
+}%
+\catcode`\@=\atcatcode \let\atcatcode\relax
+
+\endinput
+%% 
+%% End of file `shapedc.tex'.