diff options
Diffstat (limited to 'macros/inrstex/inrstex/compatib.tex')
-rw-r--r-- | macros/inrstex/inrstex/compatib.tex | 53 |
1 files changed, 0 insertions, 53 deletions
diff --git a/macros/inrstex/inrstex/compatib.tex b/macros/inrstex/inrstex/compatib.tex deleted file mode 100644 index c451240143..0000000000 --- a/macros/inrstex/inrstex/compatib.tex +++ /dev/null @@ -1,53 +0,0 @@ -% compatability macros for multilingual and extened TeX 2.992 plus -% assumes the existence of \charsublist - -% #1 -- extended character to be exchanged -% #2 -- accent macro invocation letter -% #3 -- base character for this code - -\def\csubinverse #1#2#3{\expandafter\def\csname #2#3\endcsname{#1}} - -\catcode`\@=11 -\def\i{^^P} -\def\j{^^Q} - -% ... test case - -\def\'#1{{\expandafter\ifx\csname @ac@#1\endcsname\relax - {\accent19 #1}\else\csname @ac@#1\endcsname\fi}} -\def\`#1{{\expandafter\ifx\csname @gr@#1\endcsname\relax - {\accent18 #1}\else\csname @gr@#1\endcsname\fi}} -\def\v#1{{\expandafter\ifx\csname @v@#1\endcsname\relax - {\accent20 #1}\else\csname @v@#1\endcsname\fi}} -\let\^^_=\v - -\def\u#1{{\expandafter\ifx\csname @u@#1\endcsname\relax - {\accent21 #1}\else\csname @u@#1\endcsname\fi}} -\let\^^S=\u - -\def\=#1{{\expandafter\ifx\csname @eq@#1\endcsname\relax - {\accent22 #1}\else\csname @eq@#1\endcsname\fi}} -\def\^#1{{\expandafter\ifx\csname @hat@#1\endcsname\relax - {\accent94 #1}\else\csname @hat@#1\endcsname\fi}} -\let\^^D=\^ -\def\.#1{{\expandafter\ifx\csname @dot@#1\endcsname\relax - {\accent95 #1}\else\csname @dot@#1\endcsname\fi}} -\def\H#1{{\expandafter\ifx\csname @H@#1\endcsname\relax - {\accent'175 #1}\else\csname @H@#1\endcsname\fi}} -\def\~#1{{\expandafter\ifx\csname @til@#1\endcsname\relax - {\accent'176 #1}\else\csname @til@#1\endcsname\fi}} -\def\"#1{{\expandafter\ifx\csname @um@#1\endcsname\relax - {\accent'177 #1}\else\csname @um@#1\endcsname\fi}} - - -\let\c@@=\c -\def\c#1{{\expandafter\ifx\csname c@#1\endcsname\relax - \c@@\else\csname c@#1\endcsname\fi}} - - - - -% test form for accents ... -\def\aa{\accent23a} - - |