%% File: $Id: //TEI/web/Software/passivetex/mlnames.sty#18 $ $Date: 2003/08/19 $  Copyright 1999 Sebastian Rahtz

%%

%% This package may be distributed under the terms of the LaTeX Project Public

%% License, as described in lppl.txt in the base LaTeX distribution.

%% Either version 1.0 or, at your option, any later version.

%%

\ProvidesPackage{mlnames}[2002/07/31, some XSL and Unicode support material, Sebastian Rahtz]

%

\DeclareFontFamily{T1}{pzd}{}  

\DeclareFontShape{T1}{pzd}{m}{n}{<->pzdr}{} 

\def\Family@monospace{pcr}

\def\Family@sansserif{phv}

\expandafter\def\csname Family@sans-serif\endcsname{phv}

\def\Family@serif{ptm}

\def\Family@cursive{uzc}

\def\Family@fantasy{uzc}

\DeclareFontFamily{T1}{uzc}{}

\DeclareFontShape{T1}{uzc}{mb}{it}{<-> uzcmi8t}{}

\DeclareFontShape{T1}{uzc}{m}{it}{<->ssub * uzc/mb/it}{}

\DeclareFontShape{T1}{uzc}{m}{n}{<->ssub * uzc/mb/it}{}

\def\Family@unknown{<unknown>} 

\def\Family@Arial{phv}

\def\Family@Helvetica{phv}

\def\Family@Palatino{ppl}

\def\Family@Bookman{pbk}

\def\Family@BaskervilleMT{mbv}

\def\Family@Courier{pcr}

\def\Family@Symbol{psy}

\def\Family@Wingdings{pzd}

\def\Family@WingDings{pzd}

\def\Family@LucidaSans{hls}

\def\Family@LucidaBright{hlh}

\def\Family@LucidaTypewriter{hlst}

\def\Family@Savoy{usb}

\def\Family@Luxi{ul9}

\def\Family@ACaslon{pca}

\def\Family@Caslon{uca}

\def\Family@Formata{pfa}

\def\Family@FranklinGothic{pfg}

\def\Family@OCRAbyBT{boa}

\def\Family@AGaramond{pad}

\expandafter\def\csname Family@Avant-Garde\endcsname{pag}

\expandafter\def\csname Family@Courier New\endcsname{pcr}

\expandafter\def\csname Family@New-Century-Schoolbook\endcsname{pnc}

\expandafter\def\csname Family@Times-Roman\endcsname{ptm}

\expandafter\def\csname Family@Trade-Gothic\endcsname{ptg}

\expandafter\def\csname Family@Times-New-Roman\endcsname{ptm}

\expandafter\def\csname Family@Times New Roman\endcsname{ptm}

\expandafter\def\csname Family@Times Roman\endcsname{ptm}

\expandafter\def\csname Family@Times-NR-MT\endcsname{mnt}

\expandafter\def\csname Family@Courier-New\endcsname{pcr}

\expandafter\def\csname Family@Zapf-Dingbats\endcsname{pzd}

\expandafter\def\csname Family@Gill-Sans\endcsname{pgs}

\expandafter\def\csname Family@iso-serif\endcsname{ptm}

\expandafter\def\csname Family@sans-serif\endcsname{phv}

\expandafter\def\csname Family@iso-sanserif\endcsname{phv}

\expandafter\def\csname Family@iso-monospace\endcsname{pcr}

\expandafter\def\csname Family@LetterGothic12PitchBT\endcsname{blg}

\expandafter\def\csname Family@NewsGothic\endcsname{bng}

\expandafter\def\csname Family@NewsGothicBT\endcsname{bng}

\expandafter\def\csname Family@Humanist521\endcsname{bgs}

\expandafter\def\csname Family@Humanist521BT\endcsname{bgs}

\expandafter\def\csname Family@Monospace821\endcsname{bhvt}

\expandafter\def\csname Family@Monospace821BT\endcsname{bhvt}

\expandafter\def\csname Family@OCRB10PitchBT\endcsname{bob}

\expandafter\def\csname Family@OCR-A\endcsname{boa}

\expandafter\def\csname Family@OCR-B-10PitchBT\endcsname{bob}

%    \end{macrocode}

% Matthias Clasen asked for the special code to be able

% to access Computer Modern caps and small caps as a font family.

%    \begin{macrocode}

\expandafter\def\csname Family@Computer-Modern-Typewriter\endcsname{aett}

\expandafter\def\csname Family@Computer-Modern-Sans\endcsname{aess}

\expandafter\def\csname Family@Computer-Modern\endcsname{aer}

\DeclareFontFamily{T1}{aett}{}

\DeclareFontShape{T1}{aett}{bx}{m}{<-> aebx10}{}

\DeclareFontShape{T1}{aett}{m}{n}{ <-9> aett8 <9-10> aett9 <10-12> aett10

   <12-> aett12

}{}

\DeclareFontShape{T1}{aett}{m}{it}{ <-> aeitt10 }{}

\DeclareFontShape{T1}{aett}{m}{sl}{ <-> aesltt10 }{}

\DeclareFontShape{T1}{aett}{m}{sc}{ <-> aetcsc10 }{}

\DeclareFontShape{T1}{aett}{l}{n}{<->ssub * aett/m/n}{}

\DeclareFontShape{T1}{aett}{l}{it}{<->ssub * aett/m/it}{}

\DeclareFontShape{T1}{aett}{l}{sl}{<->ssub * aett/m/sl}{}

\DeclareFontShape{T1}{aett}{l}{sc}{<->ssub * aett/m/sc}{}

\providecommand{\EC@family}[5]{%

  \DeclareFontShape{#1}{#2}{#3}{#4}%

  {<5><6><7><8><9><10><10.95><12><14.4>%

   <17.28><20.74><24.88>genb*#5}{}}

\DeclareFontFamily{T1}{cmcsc}{}

\EC@family{T1}{cmcsc}{m}{n}{eccc}

\EC@family{T1}{cmcsc}{bx}{n}{ecxc}

\EC@family{T1}{cmcsc}{m}{sl}{ecsc}

\EC@family{T1}{cmcsc}{bx}{sl}{ecoc}

\expandafter\def\csname Family@Computer-Modern-Caps-And-Small-Caps\endcsname{cmcsc}

\def\Family@cmr{cmr}

\def\Family@cmss{cmss}

\def\Family@cmtt{cmtt}

\def\Family@cmcsc{cmcsc}

\def\Family@ectt{ectt}

% Fonts used by Mandrakesoft configuration

\def\Family@Utopia{put}

\def\Family@ZapfChancery{pzc}

\def\Family@Fibonacci{cmfib}

\def\Family@Funny{cmfr}

\def\Family@Dunhill{cmdh}

\def\Family@Concrete{ccr}

\def\Family@Charter{bch}

\def\Family@Fontpxr{pxr}

\def\Family@Fontaer{aer}

\def\Family@Fontaess{aess}

\def\Family@Fontaett{aett}

\def\Family@Fontlcmss{lcmss}

\def\Family@Fontlcmtt{lcmtt}

\def\Family@Fontcmvtt{cmvtt}

\def\Family@Fontcmbr{cmbr}

\def\Family@Fontcmtl{cmtl}

\def\Family@Fontpxss{pxss}

\def\Family@Fonttxss{txss}

\def\Family@Fonttxr{txr}

%

\def\Posture@upright{n}

\def\Posture@normal{n}

\def\Posture@math{it}

\def\Posture@oblique{sl}

\def\Posture@backslantedoblique{ui}

\def\Posture@italic{it}

\def\Posture@backslanteditalic{ui}

%

\def\Weight@ultralight{ul}

\def\Weight@extralight{el}

\def\Weight@light{l}

\def\Weight@semilight{sl}

\def\Weight@medium{}

\def\Weight@normal{}

\def\Weight@semibold{sb}

\def\Weight@bold{b}

\def\Weight@extrabold{eb}

\def\Weight@ultrabold{ub}

\def\Weight@false{}

%

\expandafter\def\csname Width@ultra-condensed\endcsname{uc}

\expandafter\def\csname Width@extra-condensed\endcsname{ec}

\expandafter\def\csname Width@condensed\endcsname{c}

\expandafter\def\csname Width@semi-condensed\endcsname{sc}

\expandafter\def\csname Width@normal\endcsname{}

\expandafter\def\csname Width@semi-expanded\endcsname{sx}

\expandafter\def\csname Width@expanded\endcsname{x}

\expandafter\def\csname Width@extra-expanded\endcsname{ex}

\expandafter\def\csname Width@ultra-expanded\endcsname{ux}

\def\Width@ultracondensed{uc}

\def\Width@extracondensed{ec}

\def\Width@condensed{c}

\def\Width@semicondensed{sc}

\def\Width@medium{}

\def\Width@semiexpanded{sx}

\def\Width@expanded{x}

\def\Width@extraexpanded{ex}

\def\Width@ultraexpanded{ux}

%

%    \end{macrocode}

% \subsection{Languages}

% This needs the TeX format to have these 

% languages selected, of course. That is up to the users.

% Make sure shorthands are disabled.

%    \begin{macrocode}

%

% Mimic Babel for hyphenation. 

% read language.dat, using code from Johannes Braams' package,

% to get the list of known languages

%

\def\selectlanguage#1{%

\@ifundefined{l@#1}{\typeout{WARNING!! patterns for #1 not in

    format file^^JWARNING!!  - add them in language.dat and rebuild}}

{\language=\csname l@#1\endcsname

\@ifundefined{hyphenmins@#1}

 {\lefthyphenmin2\righthyphenmin2}

 {\edef\this{\csname hyphenmins@#1\endcsname}\expandafter\setmins\this\relax}

}}

\def\setmins#1#2\relax{\lefthyphenmin#1\righthyphenmin#2}

\def\process@line#1#2 #3/{%

  \ifx=#1

    \process@synonym#2 /

  \else

    \process@language#1#2 #3/%

  \fi

  }

\def\process@synonym#1 /{%

  \ifnum\last@language=\m@ne

    \expandafter\chardef\csname l@#1\endcsname0\relax

    \wlog{\string\l@#1=\string\language0}

  \else

    \expandafter\chardef\csname l@#1\endcsname\last@language

    \wlog{\string\l@#1=\string\language\the\last@language}

  \fi

  }

\def\process@language#1 #2 #3/{%

  \expandafter\addlanguage\csname l@#1\endcsname

  \expandafter\language\csname l@#1\endcsname

  }

\catcode`\^^I=10\relax

\openin1 = language.dat

\ifeof1

  \message{I couldn't find the file language.dat. No hyphenation!!!}

\else

  \last@language\m@ne

  \loop

    \endlinechar\m@ne

    \read1 to \fo@line

    \endlinechar`\^^M

    \ifx\fo@line\@empty

    \else

      \edef\fo@line{\fo@line\space/}%

      \expandafter\process@line\fo@line

    \fi

    \iftrue \csname fi\endcsname

    \csname if\ifeof1 false\else true\fi\endcsname

  \repeat

  \language=0

\fi

\closein1

\def\L@{}

\def\hyphenmins@welsh{23}

\def\hyphenmins@greek{11}

\def\hyphenmins@ukenglish{23}

\def\hyphenmins@dutch{23}

\def\hyphenmins@english{23}

\def\L@BR{\selectlanguage{brazil}}

\def\L@CA{\selectlanguage{catalan}}

\def\L@CY{\selectlanguage{welsh}}

\def\L@CZ{\selectlanguage{czech}}

\def\L@DE{\selectlanguage{german}}

\def\L@DK{\selectlanguage{danish}}

\def\L@EL{\selectlanguage{greek}}

\def\L@ES{\selectlanguage{spanish}}

\def\L@ET{\selectlanguage{estonian}}

\def\L@FI{\selectlanguage{finnish}}

\def\L@FR{\selectlanguage{french}}

\def\L@GB{\selectlanguage{ukenglish}}

\def\L@HR{\selectlanguage{croatian}}

\def\L@HU{\selectlanguage{hungarian}}

\def\L@IT{\selectlanguage{italian}}

\def\L@NE{\selectlanguage{dutch}}

\def\L@NO{\selectlanguage{norsk}}

\def\L@PL{\selectlanguage{polish}}

\def\L@PT{\selectlanguage{portuguese}}

\def\L@RO{\selectlanguage{romanian}}

\def\L@RU{\relax}

\def\L@SH{\selectlanguage{serbocroat}}

\def\L@SI{\selectlanguage{slovene}}

\def\L@SK{\selectlanguage{slovak}}

\expandafter\def\csname L@en_GB\endcsname{\selectlanguage{ukenglish}}

\expandafter\def\csname L@en_US\endcsname{\selectlanguage{english}}

\def\L@US{\selectlanguage{english}}

\def\L@none{\selectlanguage{english}}

\def\L@br{\selectlanguage{portuguese}}

\def\L@ca{\selectlanguage{catalan}}

\def\L@cy{\selectlanguage{welsh}}

\def\L@cs{\selectlanguage{czech}}

\def\L@de{\selectlanguage{german}}

\def\L@da{\selectlanguage{danish}}

\def\L@el{\selectlanguage{greek}}

\def\L@es{\selectlanguage{spanish}}

\def\L@et{\selectlanguage{estonian}}

\def\L@fi{\selectlanguage{finnish}}

\def\L@fr{\selectlanguage{french}}

\def\L@gb{\selectlanguage{ukenglish}}

\def\L@hr{\selectlanguage{croatian}}

\def\L@hu{\selectlanguage{hungarian}}

\def\L@it{\selectlanguage{italian}}

\def\L@nl{\selectlanguage{dutch}}

\def\L@no{\selectlanguage{norsk}}

\def\L@pl{\selectlanguage{polish}}

\def\L@pt{\selectlanguage{portuguese}}

\def\L@ro{\selectlanguage{romanian}}

\def\L@ru{\selectlanguage{russian}}

\def\L@sh{\selectlanguage{serbocroat}}

\def\L@si{\selectlanguage{slovene}}

\def\L@sk{\selectlanguage{slovak}}

\def\L@us{\selectlanguage{english}}

\def\L@en{\selectlanguage{english}}

\def\L@id{\selectlanguage{indonesian}}

\def\L@ja{\selectlanguage{japanese}}

\def\L@ko{\selectlanguage{korean}}

\def\L@sl{\selectlanguage{slovenian}}

\def\L@sv{\selectlanguage{swedish}}

\expandafter\def\csname L@pt_br\endcsname{\selectlanguage{portuguese}}

\expandafter\def\csname L@zh_cn\endcsname{\selectlanguage{chinese}}

\expandafter\def\csname L@zh_tw\endcsname{\selectlanguage{chinese-taiwan}}

%

%    \end{macrocode}

% \subsection{Paragraphs}

%    \begin{macrocode}

\def\italicOver{\ifhmode\@@italiccorr\fi}

%

\def\startQ@justify{}

\def\endQ@justify{}

\def\startQ@center{\hskip\z@ plus 1filll}

\def\endQ@center{\hskip\z@ plus 1filll}

%

\def\startQ@justified{%

  \leftskip\StartIndent

  \rightskip\EndIndent

  \@rightskip\rightskip

}

\def\endQ@justified{}

%

\def\startQ@pageoutside{\hfill}

\def\endQ@pageoutside{}

%

\def\startQ@pageinside{}

\def\endQ@pageinside{\hfill}

%

\def\startQ@start{}

\def\endQ@start{\hfill}

\def\startQ@left{}

\def\endQ@left{\hfill}

%

\def\startQ@end{\hfill}

\def\endQ@end{}

\def\startQ@right{\hfill}

\def\endQ@right{}

\def\Listjustified{%

  \gdef\makelabel##1{##1}}

\def\Liststart{% raggedright, I hope

  \gdef\makelabel##1{##1\hfil}}

\def\Listend{% raggedleft, I hope

  \gdef\makelabel##1{\hfil##1}}

\def\Listcentered{% centered

  \gdef\makelabel##1{\hfil##1\hfil}}

\def\Listcenter{% centered

  \gdef\makelabel##1{\hfil##1\hfil}}

%

\def\Q@start{% raggedright, I hope

  \let\newline\@centercr

  \rightskip\EndIndent plus 1fil

  \@rightskip\rightskip

  \leftskip\StartIndent

  \parfillskip\z@skip

}

\def\Q@justified{%

% \let\\\@normalcr

  \parfillskip\@flushglue

  \leftskip\StartIndent

  \rightskip\EndIndent

  \@rightskip\rightskip

}

\let\Q@\Q@justified

\let\Q@justify\Q@justified

\let\startQ@\startQ@justified

\let\endQ@\endQ@justified

\def\Q@end{% raggedleft, I hope

%  \let\newline\@centercr

%  \leftskip\StartIndent plus 1fill%

%  \parfillskip\z@skip

%

  \let\newline\@centercr

  \leftskip\StartIndent plus 1fill %

  \rightskip\EndIndent

  \@rightskip\rightskip

  \parfillskip\z@skip

}

\def\Q@centered{%

  \let\newline\@centercr

  \rightskip-\StartIndent plus 1fil%

  \@rightskip\rightskip

  \leftskip-\EndIndent plus 1fil%

  \parfillskip\z@skip

}

\def\Q@center{%

  \let\newline\@centercr

  \rightskip-\StartIndent plus 1fill%

  \@rightskip\rightskip

  \leftskip-\EndIndent plus 1fill%

  \parfillskip\z@skip

}

\let\Q@left\Q@start

\let\Q@right\Q@end

% for JadeTeX

\def\JQ@justify{%

  \let\\\@normalcr

  \parfillskip\@flushglue

  \parindent\z@

}

\def\JQ@start{% raggedright, I hope

  \let\\\@centercr

  \rightskip\EndIndent plus 1fil

  \@rightskip\rightskip

  \parfillskip\z@skip

  \parindent\z@

}

\def\JQ@end{% raggedleft, I hope

  \let\\\@centercr

  \leftskip\StartIndent plus 1fil%

  \parfillskip\z@skip

}

\def\JQ@center{%

  \let\\\@centercr

  \rightskip\EndIndent plus 1fil%

  \@rightskip\rightskip

  \leftskip\StartIndent plus 1fil%

  \parfillskip\z@skip\parindent\z@

}

\def\Q@pageoutside{%

  \let\\\@centercr

  \leftskip\StartIndent plus 1fil%

  \parfillskip\z@skip

}

\def\Q@pageinside{%

  \let\\\@centercr

  \rightskip\EndIndent plus 1fil%

  \@rightskip\rightskip

  \parfillskip\z@skip

}

\def\JObeylines{%

  \@tempswafalse

  \def\par{%

    \if@tempswa

      \leavevmode \null \@@par\penalty\interlinepenalty

    \else

      \@tempswatrue

      \ifhmode\@@par\penalty\interlinepenalty\fi

    \fi}%

  \obeylines\everypar \expandafter{\the\everypar \ifvmode\else\unpenalty\fi}%

}

\newif\if@obeylines

\@obeylinesfalse

\def\Lines@asis{\pretolerance=-1\tolerance=-1\JObeylines\@obeylinestrue}

\def\Lines@wrap{\@obeylinesfalse}

\expandafter\def\csname Lines@asis-truncate\endcsname{%

  \JObeylines\@obeylinestrue}

\expandafter\def\csname Lines@asis-wrap\endcsname{\@obeylinesfalse}

%

\def\Fld@start{l}

\def\Fld@center{c}

\def\Fld@end{r}

%

\def\White@preserve{\catcode`\ =\active\@vobeyspaces}

%

\def\Break@page{\newpage}

\def\Break@{}

\endinput