codepage

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

1 files changed, 596 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/codepage/shapecm.tex b/Master/texmf-dist/tex/latex/codepage/shapecm.tex
new file mode 100644
index 00000000000..ae406e104a9
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/codepage/shapecm.tex
@@ -0,0 +1,596 @@
+%% 
+%% This is file `shapecm.tex', generated 
+%% on <1995/1/2> with the docstrip utility (2.0r).
+%% 
+%% The original source files were:
+%% 
+%% codepage.dtx  (with options: `shapecm')
+%% 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
+  \gdef\@StartNewWord{\penalty\@M\hskip\z@skip}%
+  \gdef\@TreatDotLessCar#1#2{%
+               \@StartNewWord
+               \ifx#1i%
+                   \csname#2\endcsname \i
+                 \else
+                   \ifx#1j%
+                     \csname#2\endcsname \j
+                   \else
+                     \csname#2\endcsname #1%
+                   \fi
+                 \fi
+                 \@StartNewWord}%
+  \gdef\`#1{{\@TreatDotLessCar{#1}{Grave}}}%
+  \gdef\^#1{{\@TreatDotLessCar{#1}{Circumflex}}}%
+  \gdef\~#1{{\@TreatDotLessCar{#1}{Tilda}}}%
+  \gdef\=#1{{\@TreatDotLessCar{#1}{OverBar}}}%
+  \gdef\b#1{{\underbar #1\@StartNewWord}}%
+  \gdef\t#1{{\@TreatDotLessCar{#1}{Join}}}%
+  \gdef\H#1{{\@TreatDotLessCar{#1}{HungarUmlaut}}}%
+  \gdef\'#1{{\@TreatDotLessCar{#1}{Acute}}}%
+  \gdef\"#1{{\@TreatDotLessCar{#1}{Diaresis}}}%
+  \gdef\u#1{{\@TreatDotLessCar{#1}{Breve}}}%
+  \gdef\.#1{{\@TreatDotLessCar{#1}{OverDot}}}%
+  \gdef\d#1{{\UnderDot #1\@StartNewWord}}%
+  \gdef\v#1{{\@TreatDotLessCar{#1}{Tcheche}}}%
+  \gdef\c#1{{\Cedille #1\@StartNewWord}}%
+  \gdef\og{\leavevmode\raise.3ex\hbox{$\scriptscriptstyle\langle\!\langle\,$}}%
+  \gdef\fg{\leavevmode\raise.3ex\hbox{$\scriptscriptstyle\,\rangle\!\rangle$}}%
+  \ifTeX\gdef\pounds{{\it\$}}\fi
+\def\dieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"7F{}\else\string#1\fi}%
+}%
+\def\acute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"13{}\else\string#1\fi}%
+}%
+\def\cedilla#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\char"18{}\else\string#1\fi}%
+}%
+\def\Agrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\grave{A}\else\@Grave{A}\fi\else\string#1\fi}%
+}%
+\def\Aacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{A}\else\@Aigu{A}\fi\else\string#1\fi}%
+}%
+\def\Acircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\hat{A}\else\^{A}\fi\else\string#1\fi}%
+}%
+\def\Atilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\tilde{A}\else\~{A}\fi\else\string#1\fi}%
+}%
+\def\Adieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{A}\else\"{A}\fi\else\string#1\fi}%
+}%
+\def\Aring#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\AA{}\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\AE{}\else\string#1\fi}%
+}%
+\def\Ccedilla#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\c {C}\else\string#1\fi}%
+}%
+\def\Egrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\grave{E}\else\@Grave{E}\fi\else\string#1\fi}%
+}%
+\def\Eacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{E}\else\@Aigu{E}\fi\else\string#1\fi}%
+}%
+\def\Ecircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\hat{E}\else\^{E}\fi\else\string#1\fi}%
+}%
+\def\Edieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{E}\else\"{E}\fi\else\string#1\fi}%
+}%
+\def\Igrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\grave{I}\else\@Grave{I}\fi\else\string#1\fi}%
+}%
+\def\Iacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{I}\else\@Aigu{I}\fi\else\string#1\fi}%
+}%
+\def\Icircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\hat{I}\else\^{I}\fi\else\string#1\fi}%
+}%
+\def\Idieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{I}\else\"{I}\fi\else\string#1\fi}%
+}%
+\def\DBar#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+         % nothing to do we use the default value
+}%
+\def\Ntilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\tilde{N}\else\~{N}\fi\else\string#1\fi}%
+}%
+\def\Ograve#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\grave{O}\else\@Grave{O}\fi\else\string#1\fi}%
+}%
+\def\Oacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{O}\else\@Aigu{O}\fi\else\string#1\fi}%
+}%
+\def\Ocircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\hat{O}\else\^{O}\fi\else\string#1\fi}%
+}%
+\def\Otilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\tilde{O}\else\~{O}\fi\else\string#1\fi}%
+}%
+\def\Odieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{O}\else\"{O}\fi\else\string#1\fi}%
+}%
+\def\Oslash#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\O{}\else\string#1\fi}%
+}%
+\def\Ugrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\grave{U}\else\@Grave{U}\fi\else\string#1\fi}%
+}%
+\def\Uacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{U}\else\@Aigu{U}\fi\else\string#1\fi}%
+}%
+\def\Ucircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\hat{U}\else\^{U}\fi\else\string#1\fi}%
+}%
+\def\Udieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{U}\else\"{U}\fi\else\string#1\fi}%
+}%
+\def\Yacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{Y}\else\@Aigu{Y}\fi\else\string#1\fi}%
+}%
+\def\Thorn#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+         % no definition in CM
+}%
+\def\germandbls#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR{SS}\else\string#1\fi}%
+}%
+\def\agrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\grave{a}\else\@Grave{a}\fi\else\string#1\fi}%
+}%
+\def\aacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{a}\else\@Aigu{a}\fi\else\string#1\fi}%
+}%
+\def\acircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\hat{a}\else\^{a}\fi\else\string#1\fi}%
+}%
+\def\atilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\tilde{a}\else\~{a}\fi\else\string#1\fi}%
+}%
+\def\adieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{a}\else\"{a}\fi\else\string#1\fi}%
+}%
+\def\aring#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\aa{}\else\string#1\fi}%
+}%
+\def\ae#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ae{}\else\string#1\fi}%
+}%
+\def\ccedilla#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\c {c}\else\string#1\fi}%
+}%
+\def\egrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\grave{e}\else\@Grave{e}\fi\else\string#1\fi}%
+}%
+\def\eacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{e}\else\@Aigu{e}\fi\else\string#1\fi}%
+}%
+\def\ecircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\hat{e}\else\^{e}\fi\else\string#1\fi}%
+}%
+\def\edieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{e}\else\"{e}\fi\else\string#1\fi}%
+}%
+\def\igrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\grave{i}\else\@Grave{i}\fi\else\string#1\fi}%
+}%
+\def\iacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{i}\else\@Aigu{i}\fi\else\string#1\fi}%
+}%
+\def\icircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\hat{i}\else\^{i}\fi\else\string#1\fi}%
+}%
+\def\idieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{i}\else\"{i}\fi\else\string#1\fi}%
+}%
+\def\dBar#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+         % no definition in CM
+}%
+\def\ntilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\tilde{n}\else\~{n}\fi\else\string#1\fi}%
+}%
+\def\ograve#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\grave{o}\else\@Grave{o}\fi\else\string#1\fi}%
+}%
+\def\oacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{o}\else\@Aigu{o}\fi\else\string#1\fi}%
+}%
+\def\ocircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\hat{o}\else\^{o}\fi\else\string#1\fi}%
+}%
+\def\otilde#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\tilde{o}\else\~{o}\fi\else\string#1\fi}%
+}%
+\def\odieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{o}\else\"{o}\fi\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\o{}\else\string#1\fi}%
+}%
+\def\ugrave#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\grave{u}\else\@Grave{u}\fi\else\string#1\fi}%
+}%
+\def\uacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{u}\else\@Aigu{u}\fi\else\string#1\fi}%
+}%
+\def\ucircumflex#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\hat{u}\else\^{u}\fi\else\string#1\fi}%
+}%
+\def\udieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{u}\else\"{u}\fi\else\string#1\fi}%
+}%
+\def\yacute#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\acute{y}\else\@Aigu{y}\fi\else\string#1\fi}%
+}%
+\def\thorn#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+         % no definition in CM
+}%
+\def\ydieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{y}\else\"{y}\fi\else\string#1\fi}%
+}%
+\def\Ydieresis#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\ifmmode\ddot{Y}\else\"{Y}\fi\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 CM
+        % no definition in DC
+}%
+\def\guillemeotright#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+      \gdef#1{\ifTR\fg{}\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 CM
+}%
+\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}% is nicer than epsilon
+}%
+\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}% is nicer than epsilon
+}%
+\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{!`}\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}%
+      \gdef#1{\ifTR\og{}\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\pounds{}\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{?`}\else\string#1\fi}%
+}%
+\def\register#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+         % no definition in CM
+        % 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 CM
+}%
+\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 CM
+        % no definition in DC
+}%
+\def\perthousand#1#2#3{%
+      \@UC{#1}{#2}{#3}%
+         % no definition in CM
+        % 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 `shapecm.tex'.