%%
%% This is file `code437.tex',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% codepage.dtx  (with options: `codepage437')
%%     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
\begingroup
   \catcode`\A=\active
   \catcode`\E=\active
   \catcode`\I=\active
   \catcode`\O=\active
   \catcode`\U=\active
   \catcode`\Y=\active
   \gdef A{\string A}%
   \gdef E{\string E}%
   \gdef I{\string I}%
   \gdef O{\string O}%
   \gdef U{\string U}%
   \gdef Y{\string Y}%
\endgroup
\input initcar %
\begingroup
\ifcase\CurrentEncoding
   \input shapecm %
\or
   \input shapedc %
\fi
\Ccedilla{^^80}{"80}{"87}%
\Adieresis{^^8e}{"8E}{"84}%
\Aring{^^8f}{"8F}{"86}%
\Eacute{^^90}{"90}{"82}%
\AE{^^92}{"92}{"91}%
\Odieresis{^^99}{"99}{"94}%
\Udieresis{^^9a}{"9A}{"81}%
\Ntilde{^^a5}{"A5}{"A4}%
\udieresis{^^81}{"9A}{"81}%
\eacute{^^82}{"90}{"82}%
\acircumflex{^^83}{"41}{"83}%
\adieresis{^^84}{"8E}{"84}%
\agrave{^^85}{"41}{"85}%
\aring{^^86}{"8F}{"86}%
\ccedilla{^^87}{"80}{"87}%
\ecircumflex{^^88}{"45}{"88}%
\edieresis{^^89}{"45}{"89}%
\egrave{^^8a}{"45}{"8A}%
\idieresis{^^8b}{"49}{"8B}%
\icircumflex{^^8c}{"49}{"8C}%
\igrave{^^8d}{"49}{"8D}%
\ae{^^91}{"92}{"91}%
\ocircumflex{^^93}{"4F}{"93}%
\odieresis{^^94}{"99}{"94}%
\ograve{^^95}{"4F}{"95}%
\ucircumflex{^^96}{"55}{"96}%
\ugrave{^^97}{"55}{"97}%
\ydieresis{^^98}{"59}{"98}%
\pounds{^^9c}{"9C}{"9C}%
\florin{^^9f}{"9F}{"9F}%
\aacute{^^a0}{"41}{"A0}%
\iacute{^^a1}{"49}{"A1}%
\oacute{^^a2}{"4F}{"A2}%
\uacute{^^a3}{"55}{"A3}%
\ntilde{^^a4}{"A5}{"A4}%
\questiondown{^^a8}{"A8}{"A8}%
\exclamdown{^^ad}{"AD}{"AD}%
\guilletmotleft{^^ae}{"AE}{"AE}%
\guillemeotright{^^af}{"AF}{"AF}%
\alpha{^^e0}{"E0}{"E0}%
\beta{^^e1}{"E1}{"E1}%
\Gamma{^^e2}{"E2}{"E2}%
\pi{^^e3}{"E3}{"E3}%
\Sigma{^^e4}{"E4}{"E4}%
\sigma{^^e5}{"E5}{"E5}%
\mu{^^e6}{"E6}{"E6}%
\tau{^^e7}{"E7}{"E7}%
\Phi{^^e8}{"E8}{"E8}%
\ThetaSign{^^e9}{"E9}{"E9}%
\Omega{^^ea}{"EA}{"EA}%
\delta{^^eb}{"EB}{"EB}%
\infty{^^ec}{"EC}{"EC}%
\emptysetSign{^^ed}{"ED}{"ED}%
\epsilon{^^ee}{"EE}{"EE}%
\cap{^^ef}{"EF}{"EF}%
\equiv{^^f0}{"F0}{"F0}%
\pm{^^f1}{"F1}{"F1}%
\geq{^^f2}{"F2}{"F2}%
\leq{^^f3}{"F3}{"F3}%
\div{^^f6}{"F6}{"F6}%
\approx{^^f7}{"F7}{"F7}%
\bullet{^^f9}{"F9}{"F9}%
\endgroup
\ifnum\CurrentEncoding=\DC\relax
\def\@MakeHyphenationFourThreeSeven#1{%
  \catcode`#1=12%
  \ifnum`#1="80
     % C cedilla translated in DC encoding to "D7 (which is a semi graphical
     % sign  in code page 437)
     \lccode`#1="D7%
  \else\ifnum`#1="81
     %u dieresis --> "FC
     \lccode`#1="FC%
  \else\ifnum`#1="82
     %e acute --> "E9 (Theta sign)
     \lccode`#1="E9%
  \else\ifnum`#1="83
     %a circumflex --> "E2 (Gamma sign)
     \lccode`#1="E2%
  \else\ifnum`#1="84
     %a dieresis --> "E4 o tilde
     \lccode`#1="E4%
  \else\ifnum`#1="85
     %a grave --> "E0 (alpha sign)
     \lccode`#1="E0%
  \else\ifnum`#1="86
     %a ring --> "E5 (sigma sign)
     \lccode`#1="E5%
  \else\ifnum`#1="87
     %c cedilla --> "E7 (tau sign)
     \lccode`#1="E7%
 \else\ifnum`#1="88
     %e circumflex --> "EA (Omega sign)
     \lccode`#1="EA%
  \else\ifnum`#1="89
     %e dieresis --> "EB (delta sign)
     \lccode`#1="EB%
  \else\ifnum`#1="8A
     %e grave --> "E8 (Phi sign)
     \lccode`#1="E8%
  \else\ifnum`#1="8B
     %i dieresis --> "EF (set intersection sign)
     \lccode`#1="EF%
  \else\ifnum`#1="8C
     %i circumflex --> "EE (epsilon sign)
     \lccode`#1="EE%
  \else\ifnum`#1="8D
     %i grave --> "EC (infinity sign)
     \lccode`#1="EC%
  \else\ifnum`#1="8E
     %A dieresis --> "C4 (semi graphical character)
     \lccode`#1="C4%
  \else\ifnum`#1="8F
     %A ring --> "C5 (semi graphical character)
     \lccode`#1="C5%
  \else\ifnum`#1="90
     %E acute --> "C9 (semi graphical character)
     \lccode`#1="C9%
  \else\ifnum`#1="91
     %ae ligature --> "E6 (mu sign)
     \lccode`#1="E6%
  \else\ifnum`#1="92
     %AE ligature --> "C6 (semi graphical character)
     \lccode`#1="C6%
  \else\ifnum`#1="93
     %o circumflex --> "F4 (upper part of integral sign)
     \lccode`#1="F4%
  \else\ifnum`#1="94
     %o dieresis --> "F6 (divide sign)
     \lccode`#1="F6%
  \else\ifnum`#1="95
     %O grave --> "F2 (greater or equal sign)
     \lccode`#1="F2%
  \else\ifnum`#1="96
     %u circumflex --> "FB (square sign)
     \lccode`#1="FB%
  \else\ifnum`#1="97
     %u grave --> "F9 (big bullet sign)
     \lccode`#1="F9%
  \else\ifnum`#1="98
     %y dieresis --> "B8 (semi graphical character)
     \lccode`#1="B8%
  \else\ifnum`#1="99
     %O dieresis --> "D6 (semi graphical character)
     \lccode`#1="D6%
  \else\ifnum`#1="9A
     %U dieresis --> "DC (semi graphical sign)
     \lccode`#1="DC%
  \else\ifnum`#1="A0
     %a acute --> "E1 (Beta sign)
     \lccode`#1="E1%
  \else\ifnum`#1="A1
     %i acute --> "ED (empty set sign)
     \lccode`#1="ED%
  \else\ifnum`#1="A2
     %o acute --> "F3 (less or equal sign)
     \lccode`#1="F3%
  \else\ifnum`#1="A3
     %u acute --> "FA (Bullet sign)
     \lccode`#1="FA%
  \else\ifnum`#1="A4
     %n tilde --> "F1 (Plus minus sign)
     \lccode`#1="F1%
  \else\ifnum`#1="A5
     %N tilde --> "D1 (semi graphical character)
     \lccode`#1="D1%
  \else
    %we don't have a letter (a character to form word)
    \@BadHyphenCarMsg{#1}
    \catcode`#1=15% make this character invalid
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
  \fi\fi\fi
}%
\fi %\ifx\CurrentEncoding...
\catcode`\@=\atcatcode \let\atcatcode\relax

\endinput
%%
%% End of file `code437.tex'.
