%
% HYPHEN.MULTI: Multi lingual hyphenation for TeX. There are pattern for
%
%   \language\czech       : czhyphen.tex   25,943 B
%   \language\dansk       : dkhyphen.tex    6,978 B
%   \language\spain       : eshyphen.tex    3,421 B
%   \language\french      : f8hyph.tex     61,236 B
%                           fhyph.tex      41,229 B
%                           fhyphen.tex     3,670 B
%                           fr8hyph.dc      9,019 B
%   \language\german      : ghyph31.tex    48,658 B
%   \language\polish      : hyphen.polish  34,586 B
%   \language\icelandic   : ihyphen.tex    28,039 B
%   \language\italian     : italat.tex      4,587 B
%                           ithyphen.tex    4,705 B
%   \language\netherland  : nehyph1.tex    38,777 B
%                           nehyph2.tex    51,749 B
%                           nehyph3.tex     2,465 B
%   \language\portugese   : porhyphen.tex   1,502 B
%   \language\turkish     : tkhypha.tex     9,799 B
%   \language\english     : ukhyphen.tex   55,860 B
%   \language\usenglish   : ushyph1.tex    27,667 B
%                           ushyph2.tex     3,750 B
%
% Implement desired languages with a new \language counter as described
% in the TeXbook on version 3.x
%
\ifx\undefined\inputlineno \else
  \ifnum\inputlineno=-1 \else

%
% Language counters, miscellaneous macros, and initial values.
% German.sty 2.4a assumes that the language counts have the form
% `\l@<language>', so we double these definitions.
%
% save current category code of `@'
\chardef\atcode=\catcode`\@
\catcode`\@=11 % \makeatletter

\newlanguage\USenglish  \chardef\l@USenglish=\USenglish
\newlanguage\german     \chardef\l@german=\german
\newlanguage\austrian   \chardef\l@austrian=\austrian
\newlanguage\french     \chardef\l@french=\french
\newlanguage\english    \chardef\l@english=\english
\newlanguage\greek      \chardef\l@greek=\greek
\newlanguage\portugese  \chardef\l@portugese=\portugese
\newlanguage\netherland \chardef\l@netherland=\netherland
\newlanguage\czech      \chardef\l@czech=\czech
\newlanguage\spain      \chardef\l@spain=\spain
\newlanguage\polish     \chardef\l@polish=\polish
\newlanguage\icelandic  \chardef\l@icelandic=\icelandic
\newlanguage\italian    \chardef\l@italian=\italian
\newlanguage\turkish    \chardef\l@turkish=\turkish

\catcode`\@=\atcode % return to previous catcode

\immediate\write16{Loading multi language hyphenation patterns.}
%
% Include US-English hyphens.
%
\immediate\write16{US-English pattern -> language=USenglish.}
\language=\USenglish
\lefthyphenmin=2 \righthyphenmin=3
\input ushyph1.tex
%
% Include German hyphens.
%
\immediate\write16{German pattern -> language=german.}
\language=\german
\lefthyphenmin=2 \righthyphenmin=3
\input ghyph31.tex
%
% Include French hyphens.
%
\immediate\write16{French pattern -> language=french.}
\language=\french
\lefthyphenmin=2 \righthyphenmin=3
\input fhyphen.tex
%
% Include British English hyphens.
%
\immediate\write16{British English pattern -> language=english.}
\language=\english
\lefthyphenmin=2 \righthyphenmin=3
\input ukhyphen.tex
%
% Set your default lanugage here. I choose `deutsch'.
%
\language=\german

\endinput \fi\fi % The 2 \fi and \endinput have to be at the same line !

\end % of HYPHEN.TEX
