% \iffalse meta-comment
%
% Copyright (C) 2003 by Scott Pakin <pakin@uiuc.edu>
% --------------------------------------------------
% 
% This file may be distributed and/or modified under the
% conditions of the LaTeX Project Public License, either version 1.2
% of this license or (at your option) any later version.
% The latest version of this license is in:
%
%    http://www.latex-project.org/lppl.txt
%
% and version 1.2 or later is part of all distributions of LaTeX 
% version 1999/12/01 or later.
%
% \fi
%
% \iffalse
%<package>\NeedsTeXFormat{LaTeX2e}[1999/12/01]
%<package>\ProvidesPackage{mlastyle}
%<package>   [2003/10/21 v1.0 .dtx mlastyle file] 
%
%<*driver>
\documentclass{ltxdoc}
\usepackage[compat]{mlastyle}
\EnableCrossrefs
\CodelineIndex
\RecordChanges
%\OnlyDescription
\begin{document}
  \DocInput{mlastyle.dtx}
\end{document}
%</driver>
% \fi
%
% \CheckSum{0}
%
% \CharacterTable
%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
%   Digits        \0\1\2\3\4\5\6\7\8\9
%   Exclamation   \!     Double quote  \"     Hash (number) \#
%   Dollar        \$     Percent       \%     Ampersand     \&
%   Acute accent  \'     Left paren    \(     Right paren   \)
%   Asterisk      \*     Plus          \+     Comma         \,
%   Minus         \-     Point         \.     Solidus       \/
%   Colon         \:     Semicolon     \;     Less than     \<
%   Equals        \=     Greater than  \>     Question mark \?
%   Commercial at \@     Left bracket  \[     Backslash     \\
%   Right bracket \]     Circumflex    \^     Underscore    \_
%   Grave accent  \`     Left brace    \{     Vertical bar  \|
%   Right brace   \}     Tilde         \~}
%
%
% \changes{v1.0}{2003/09/25}{Initial version}
%
% \GetFileInfo{mlastyle.sty}
%
% \DoNotIndex{\the,\edef,\gdef,\voffset,\@undefined}
% \DoNotIndex{\@centercr,\@for,\@date,\do,\@startsection}
% \DoNotIndex{\@citea,\@citeb}
% \DoNotIndex{\@empty,\@ignoretrue}
% \DoNotIndex{\@ixpt}
% \DoNotIndex{\@M,\@minus,\@ne,\@plus}
% \DoNotIndex{\.,\ ,\\}
% \DoNotIndex{\addtolength,\advance}
% \DoNotIndex{\ast,\begin,\begingroup,\bfseries,\bgroup,\box}
% \DoNotIndex{\bullet}
% \DoNotIndex{\cdot,\cr,\day,\DeclareOption}
% \DoNotIndex{\def,\DocInput,\documentclass}
% \DoNotIndex{\DoNotIndex,\egroup,\ifx,\else,\fi,\endtrivlist}
% \DoNotIndex{\EnableCrossrefs,\end,\end@dblfloat,\end@float,\endgroup}
% \DoNotIndex{\endlist,\everycr,\ExecuteOptions,\expandafter}
% \DoNotIndex{\filedate,\filename,\fileversion,\futurelet}
% \DoNotIndex{\global,\halign,\hangindent,\hbox,\hfil,\hfill,\hrule}
% \DoNotIndex{\hsize,\hskip,\hspace,\hss,\ifcase,\or,\fi}
% \DoNotIndex{\ifvmode,\fi,\ifnum,\fi,\input}
% \DoNotIndex{\kern,\leavevmode,\let,\leftmark}
% \DoNotIndex{\list,\llap,\long,\m@ne,\m@th,\mark}
% \DoNotIndex{\mbox,\month,\newcommand,\newcounter,\newenvironment}
% \DoNotIndex{\mlastyle@bibstyletrue,\mlastyle@bibstylefalse}
% \DoNotIndex{\mlastyle@formattrue,\mlastyle@formatfalse}
% \DoNotIndex{\mlastyle@papersizetrue,\mlastyle@papersizefalse}
% \DoNotIndex{\mlastyle@styletrue,\mlastyle@stylefalse}
% \DoNotIndex{\mlastyle@timestrue,\mlastyle@timesfalse}
% \DoNotIndex{\mlastyle@underlinetrue,\mlastyle@underlinefalse}
% \DoNotIndex{\mlastyle@bibstyletrue,\mlastyle@bibstylefalse}
% \DoNotIndex{\mlastyle@slashnext,\mlastyle@slashx}
% \DoNotIndex{}
% \DoNotIndex{\NeedsTeXFormat,\newdimen}
% \DoNotIndex{\newpage,\nobreak,\noindent,\number}
% \DoNotIndex{\or,\p@}
% \DoNotIndex{\pagestyle,\par}
% \DoNotIndex{\penalty,\PrintChanges,\PrintIndex,\ProcessOptions}
% \DoNotIndex{\protect,\ProvidesClass,\raggedbottom,\raggedright}
% \DoNotIndex{\refstepcounter,\relax,\renewcommand,\renewenvironment}
% \DoNotIndex{\reset@font}
% \DoNotIndex{\rightmargin,\rlap,\rmfamily}
% \DoNotIndex{\setbox,\setcounter,\setlength}
% \DoNotIndex{\skip,\slshape,\space}
% \DoNotIndex{\trivlist,\typeout,\tw@}
% \DoNotIndex{\voffset,\vskip,\vspace,\year,\z@}
%
% \newcommand*{\Lopt}[1]{\textsf {#1}}
% \newcommand*{\file}[1]{\texttt {#1}}
% \newcommand*{\package}[1]{\textsf {#1}}
% \newcommand*{\Lcount}[1]{\textsl {\small#1}}
% \newcommand*{\pstyle}[1]{\textsl {#1}}
%
% \title{The \package{mlastyle} package\thanks{This document
%   corresponds to \package{mlastyle}~\fileversion, dated \filedate.}}
% \author{Tim Pope \\ \texttt{latex@rebelongto.us}}
%
% \maketitle
%
% \section{Introduction}
%
% MLA style is ugly.  Nevertheless, it is often required, particularly in
% the humanities.
%
% \section{Usage}
%
% A sample document follows.
% \begin{verbatim}
%\documentclass[12pt]{article}
%\usepackage{mlastyle}
%
%\author{John Doe}
%\professor{Professor Smith}
%\classname{English 101}
%\date{1~Jan.\ 1970}
%\title{The Futility of Compulsory English Classes}
%
%\begin{document}
%\maketitle
%'Nuff said.
%\end{document}\end{verbatim}
% \subsection{Initiation Macros}
% \DescribeMacro{\maketitle}
% \DescribeMacro{\professor}
% \DescribeMacro{\classname}
% The mandatory heading\index{heading|usage} is generated with
% |\maketitle|.  Use the standard macros |\author|, |\title|, and |\date|
% to specify the relevant information.  To define the professor and name
% of the class, use the aptly named |\professor|\marg{name} and
% |\classname|\marg{class} macros.
%
% \DescribeMacro{\lastname}
% The last name for use in the header\index{header|usage} is derived from
% |\author|.  If this does not produce the desired result, use
% |\lastname|\marg{last name} to override it.
%
% \DescribeMacro{\date}
% \DescribeMacro{\today}
% MLA style recommends the DD~Mon.~YYYY format for specifying dates;
% |\today| has been conveniently redefined to this.  However, other
% formats can be used as long as done so consistantly throughout the
% document.  Also note that the date in the header should be the due date
% of the assignment, so be sure to explictly call |\date|\marg{due date}
% if you actually finish your assignments early.
%
% \subsection{Environments}
% \DescribeEnv{verse}
% \DescribeEnv{quote}
% \DescribeEnv{quotation}
% Three environments have been modified from standard \LaTeX to better
% suit MLA format.  To typeset poetry\index{poetry|usage} and
% drama\index{drama|usage}, use the |verse| environment.
% Quotations\index{quotations|usage} of a single paragraph or less always
% use the |quote| environment.  For longer passages, use the |quotation|
% environment if the beginning of the passage marks the beginning of a
% paragraph.  Otherwise, use the |quote| environment.
%
% Be sure to follow MLA guidelines when using these environments.  Short
% quotes should be enclosed in quotation marks and included directly in
% the text.
%
% \subsection{Documentating Sources}
%
% Coupled with \BibTeX, \package{mlastyle} provides a experimental
% implementation of MLA documentation style.  Load the bibliography style
% by putting |\bibliographystyle{mlastyle}| in the document preamble.
%
% \StopEventually{\PrintChanges\PrintIndex}
% \iffalse
%<*package>
% \fi
% \section{Implementation}
%
% \subsection{Options}
%
% First, the options.
%    \begin{macrocode}
\newif\ifmlastyle@bibstyle
\DeclareOption{bibstyle}{\mlastyle@bibstyletrue}
\DeclareOption{nobibstyle}{\mlastyle@bibstylefalse}
%    \end{macrocode}
%    \begin{macrocode}
\newif\ifmlastyle@papersize
\DeclareOption{papersize}{\mlastyle@papersizetrue}
\DeclareOption{nopapersize}{\mlastyle@papersizefalse}
\newif\ifmlastyle@underline
\DeclareOption{underline}{\mlastyle@underlinetrue}
\DeclareOption{italics}{\mlastyle@underlinefalse}
\newif\ifmlastyle@times
\DeclareOption{times}{\mlastyle@timestrue}
\DeclareOption{cm}{\mlastyle@timesfalse}
\newif\ifmlastyle@style
\DeclareOption{compat}{\mlastyle@stylefalse
	\mlastyle@formatfalse
	\mlastyle@underlinefalse}
\DeclareOption{mla}{\mlastyle@styletrue
	\mlastyle@formattrue
	\mlastyle@underlinetrue}
\newif\ifmlastyle@format
\DeclareOption{format}{\mlastyle@stylefalse
	\mlastyle@formattrue
	\mlastyle@underlinetrue}
\DeclareOption{style}{\mlastyle@styletrue
	\mlastyle@formatfalse
	\mlastyle@underlinefalse}
\DeclareOption{singlespacequotes}{
  \def\mlastyle@qspread{\linespread{1}\normalsize\vskip\baselineskip}}
\DeclareOption{doublespacequotes}{\let\mlastyle@qspread\relax}
\ExecuteOptions{nobibstyle,nopapersize,mla,cm,doublespacequotes}
\ProcessOptions
%    \end{macrocode}
% If the \Lopt{papersize} option is set, add the appropriate
% \textsc{PostScript} special, or adjust |\pdfpagewidth| and
% |\pdfpageheight| if pdf\LaTeX{} is in use.
%    \begin{macrocode}
\ifmlastyle@papersize
  \ifx\@undefined\pdfpagewidth
    \special{papersize=\the\paperwidth,\the\paperheight}
  \else
    \setlength{\pdfpagewidth}{\paperwidth}
    \setlength{\pdfpageheight}{\paperheight}
  \fi
\fi % \ifmlastyle@papersize
%    \end{macrocode}
% If the \Lopt{bibstyle} option is set, specify the bibliography style.
%    \begin{macrocode}
\ifmlastyle@bibstyle
  \ifmlastyle@style
    \bibliographystyle{mlastyle}
  \else
    \bibliographystyle{plain}
  \fi
\fi % \ifmlastyle@bibstyle
%    \end{macrocode}
% Load the \package{ulem} package if the \Lopt{underline} option is set.
%    \begin{macrocode}
\ifmlastyle@underline
  \RequirePackage{ulem}
\fi % \ifmlastyle@underline
%    \end{macrocode}
% Load the \package{times} package if the \Lopt{times} option is set.
%    \begin{macrocode}
\ifmlastyle@times
  \RequirePackage{times}
\fi % \ifmlastyle@times
%    \end{macrocode}
% \subsection{Macros}
% \begin{macro}{\professor}
% Define the professor.
%    \begin{macrocode}
\def\professor#1{\gdef\theprofessor{#1}}
%    \end{macrocode}
% \end{macro}
% \begin{macro}{\classname}
% Define the class.
%    \begin{macrocode}
\def\classname#1{\gdef\theclassname{#1}}
%    \end{macrocode}
% \end{macro}
% \begin{macro}{\lastname}
% Define the last name.
%    \begin{macrocode}
\def\lastname#1{\gdef\thelastname{#1}}
%    \end{macrocode}
% \end{macro}
% \subsection{Formatting}
% Formatting is only done if the \Lopt{format} option is set.  This is the
% default.
%    \begin{macrocode}
\ifmlastyle@format
%    \end{macrocode}
% \subsubsection{Macros}
% \begin{macro}{\maketitle}
% Redefined |\maketitle| generate a heading in MLA format.
%    \begin{macrocode}
  \renewcommand{\maketitle}{\begin{flushleft}
    \@author\par
    \@ifundefined{theprofessor}{}{\theprofessor}\par
    \@ifundefined{theclassname}{}{\theclassname}\par
    \@date\end{flushleft}
    \begin{center}\@title\end{center}\par
  }
%    \end{macrocode}
% \end{macro}
% \begin{macro}{\today}
% |\today| is redefined to DD~Mon.~YYYY format.
%    \begin{macrocode}
\def\today{\number\day~\ifcase\month\or
  Jan.\or Feb.\or Mar.\or Apr.\or May\or June\or July\or 
  Aug.\or Sept.\or Oct.\or Nov.\or Dec.\fi\ \number\year}
%    \end{macrocode}
% \end{macro}
% \begin{macro}{\slash}
% No penalty for |\slash|, and plain /'s permit line breaks if necessary.
%    \begin{macrocode}
  \def\slash{/\penalty\z@}
  %\let\mlastyle@sl@sh=/
  \def\mlastyle@slash{/\futurelet\mlastyle@slashnext\mlastyle@slashx}
  \def\mlastyle@slashx{\ifx\mlastyle@slashnext/\else
    \penalty\exhyphenpenalty\fi}
%    \end{macrocode}
% \end{macro}
% \begin{macro}{\section}
% Sections are formatted by centering the section name and beginning a new
% page.  Subsections simply center the section name.
%    \begin{macrocode}
  \renewcommand{\section}{\clearpage\@startsection{section}{1}{\z@
    }{0pt}{1sp}{\centering}}
  \renewcommand{\subsection}{\@startsection{subsection}{2}{\z@
    }{0pt}{1sp}{\centering}}
%    \end{macrocode}
% \end{macro}
% \subsubsection{Environments}
% ^^A%\newenvironment{blocks}{\begin{quote} \linespread{1} \small \normalsize}{\end{quote} \linespread{2} \small \normalsize}
% ^^A%\newenvironment{blockm}{\begin{quotation} \linespread{1} \small \normalsize}{\end{quotation} \linespread{2} \small \normalsize}
% \begin{environment}{verse}
% Indented 1 inch, with an additional .25 inch hanging indent.
%    \begin{macrocode}
  \renewenvironment{verse}{\list{}{\mlastyle@qspread
    \advance\leftmargin.75in\itemindent-.25in
    \listparindent\itemindent}\item\relax}{\endlist}
%    \end{macrocode}
% \end{environment}
% \begin{environment}{quotation}
% Indented 1 inch, with a paragraph indent of an additional .25 inches.
%    \begin{macrocode}
  \renewenvironment{quotation}{\list{}{\mlastyle@qspread
    \advance\leftmargin.5in\itemindent.25in
    \listparindent\itemindent}\item\relax}{\endlist}
%    \end{macrocode}
% \end{environment}
% \begin{environment}{quote}
% Identical to the |quotation| environment, except the first paragraph is not
% indented.
%    \begin{macrocode}
  \renewenvironment{quote}{\list{}{\mlastyle@qspread
    \advance\leftmargin.5in
    \listparindent.25in}\item\relax}{\endlist}
%    \end{macrocode}
% \end{environment}
% \begin{environment}{workscited}
% Works Cited environment, for compatibility with \package{mla-paper}.
%    \begin{macrocode}
  \newenvironment{workscited}%
    {\newpage{\centerline{Works Cited}}}{\newpage}
  \newcommand{\bibent}{\noindent \hangindent .5in}
%    \end{macrocode}
% \end{environment}
% \subsubsection{Margins}
% Top and bottom margins are 1 inch each.  The header is flush with the
% right margin at .5 inches from the top of the page.
% ^^A%\settoheight{\headheight}{\llap{\parbox[b]{\textwidth}{\large\raggedleft Pope}}}
%    \begin{macrocode}
  \setlength{\voffset}{-0.5in}
  \setlength{\textheight}{\paperheight}
  \addtolength{\textheight}{-2in}
  \setlength{\topmargin}{0in}
  \addtolength{\headheight}{-1pt}
  \setlength{\headheight}{1.4\headheight}% kludge
  \setlength{\headsep}{0.5in}
  \addtolength{\headsep}{-\headheight}
  \setlength{\footskip}{0.25in}
  \raggedbottom
%    \end{macrocode}
% Left and right margins in MLA format are each 1 inch wide.
%    \begin{macrocode}
  \setlength{\hoffset}{-0.5in}
  \setlength{\textwidth}{\paperwidth}
  \addtolength{\textwidth}{-2in}
  \setlength{\oddsidemargin}{0.5in}
  \setlength{\evensidemargin}{0.5in}
  \setlength{\marginparwidth}{0.5in}
%    \end{macrocode}
% \subsubsection{Paragraphs}
% Paragraphs should be left justified, with the first line indented .5
% inches.
%    \begin{macrocode}
  \raggedright
  \setlength{\parindent}{.5in}
%    \end{macrocode}
% MLA format specifies that all paragraphs should be indented, even those
% beginning a new section.  This snippet from \package{indentfirst} changes
% \LaTeX{} to meet that requirement.
%    \begin{macrocode}
  \let\@afterindentfalse\@afterindenttrue
  \@afterindenttrue
%    \end{macrocode}
% Double space {\em everywhere}.
% ^^A\RequirePackage{doublespace}
%    \begin{macrocode}
  \linespread{2.0}
  \leftmargini\parindent
  \def\@listi{\leftmargin\leftmargini
  \parsep\z@\itemsep\z@\topsep -3\p@\relax}
  \let\@listI\@listi
  \@listi
  \def\@listii{\leftmargin\leftmarginii
  \parsep\z@\itemsep\z@\topsep -3\p@\relax}
  \def\@listiii{\leftmargin\leftmarginiii
  \parsep\z@\itemsep\z@\topsep -3\p@\relax}
  \def\@listiv{\leftmargin\leftmarginiv
  \parsep\z@\itemsep\z@\topsep -3\p@\relax}
  \def\@listv{\leftmargin\leftmarginv
  \parsep\z@\itemsep\z@\topsep -3\p@\relax}
  \def\@listvi{\leftmargin\leftmarginvi
  \parsep\z@\itemsep\z@\topsep -3\p@\relax}
%    \end{macrocode}
% \subsubsection{Header}
% The last name and page number appear on every page, including the first.
%    \begin{macrocode}
  \RequirePackage{fancyhdr}
  \fancypagestyle{plain}{\fancyhf{}}
  \fancypagestyle{mlastyle}{
    \fancyhf{}
    \def\sw@llow##1 {}
    \rhead{\@ifundefined{thelastname}%
      {\expandafter\sw@llow\@author}{\thelastname} \thepage}
    \renewcommand{\headrulewidth}{0pt}
    \renewcommand{\footrulewidth}{0pt}
  }
  \pagestyle{mlastyle}
%    \end{macrocode}
% \subsubsection{Notes}
% Footnotes should be indented .5 inches; however .56 inches is used
% in a crude attempt to compensate for
% the alignment provided by the \package{footmisc} package.  Endnotes are
% preferred in MLA style anyway, so this should not be a problem in most
% circumstances.
%    \begin{macrocode}
  \RequirePackage[ragged,norule]{footmisc}
  \def\footnotelayout{\linespread{1}\footnotesize\raggedright{} }
  \footnotemargin .56in
  \skip\footins=2\baselineskip
  \footnotesep 1.2\footnotesep
  \addtolength\footnotesep{\baselineskip}
  \def\footnotesize{\normalsize}
%    \end{macrocode}
% ^^A\let\footnoterule\relax
% Endnotes are supported, but only if the \package{endnotes} package is
% loaded {\em before\/} this package.
%    \begin{macrocode}
  \ifx\@undefined\endnote\else
    \def\enoteheading{\newpage\section*{\notesname}}
    \def\enoteformat{\leavevmode\makeenmark{} }
    \def\enotesize{\normalsize}
  \fi
%    \end{macrocode}
% \subsubsection{Miscellaneous}
% With all packages loaded, we can now redefine |/|.
%    \begin{macrocode}
  \catcode`/=13
  \let/=\mlastyle@slash
%    \end{macrocode}
% The definition of |\thebibliography| varies depending on the document
% class.
%    \begin{macrocode}
  \@ifundefined{chapter}
%    \end{macrocode}
% Article class.
%    \begin{macrocode}
  {
    \def\thebibliography#1{\newpage\section*{\refname}
      \list{\@biblabel{\@arabic\c@enumiv}}%
      {\settowidth\labelwidth{\@biblabel{#1}}}
      \leftmargin\labelwidth
      \advance\leftmargin\labelsep
      \itemindent-\leftmargin
      \def\newblock{}
      \usecounter{enumiv}
      \sloppy%\sfcode`\.=1000\relax
      }}
%    \end{macrocode}
% Report/book class.
%    \begin{macrocode}
  {
    \def\thebibliography#1{\chapter*{\bibname}
      \list{\@biblabel{\@arabic\c@enumiv}}%
      {\settowidth\labelwidth{\@biblabel{#1}}}
      \leftmargin\labelwidth
      \advance\leftmargin\labelsep
      \itemindent-\leftmargin
      \def\newblock{}
      \usecounter{enumiv}
      \sloppy%\sfcode`\.=1000\relax
      }}
%    \end{macrocode}
% We're done formatting!
%    \begin{macrocode}
\fi % \ifmlastyle@format
%    \end{macrocode}
% \subsection{Works Cited}
% \begin{macro}{\cite}
% The following macros, combined with \file{mlastyle.bst}, provide
% for a bibliography in MLA style.  Note that the definition of |\cite|,
% |\citeN|, etc.\ vary depending on the options passed to
% \package{mlastyle}.
%
% \begin{macro}{\mlastyle@intcite}
% Since the original |\cite| is needed after it is overridden, it is stored
% in |\mlastyle@intcite|.
%    \begin{macrocode}
\let\mlastyle@intcite\cite
%    \end{macrocode}
% \end{macro}
% \begin{macro}{\mlastyle@relax}
% This macro does nothing.  Depending on the options, ither |\citeC| or
% |\citeM| and its ilk will utilize it.
%    \begin{macrocode}
\newcommand{\mlastyle@relax}[2][]{}
%    \end{macrocode}
% \end{macro}
% \subsubsection{MLA Style}
% \begin{macro}{\citeM}
% If the \Lopt{compat} option is {\em not\/} used, the following is
% executed.
%    \begin{macrocode}
\ifmlastyle@style
  \def\@cite#1#2{(#1\if@tempswa{} #2\fi)}
  \def\cite{\def\@cite##1##2{(##1\if@tempswa{} ##2\fi)}\mlastyle@intcite}
  \def\citeN{\def\@cite##1##2{##1\if@tempswa{} ##2\fi}\mlastyle@intcite}
  \def\citeM{\def\@cite##1##2{ (##1\if@tempswa{} ##2\fi)}\mlastyle@intcite}
  \def\citepage{\def\@cite##1##2{\if@tempswa(##2)\fi}\mlastyle@intcite}
  \def\citepageM{\def\@cite##1##2{\if@tempswa{} (##2)\fi}\mlastyle@intcite}
  \def\citeindirect{\def\@cite##1##2%
  {(qtd. in ##1\if@tempswa{} ##2\fi)}\mlastyle@intcite}
  \def\citeindirectM{\def\@cite##1##2%
  { (qtd. in ##1\if@tempswa{} ##2\fi)}\mlastyle@intcite}
  \let\citeC\mlastyle@relax
%    \end{macrocode}
% \end{macro}
% \iffalse
% Place commas in-between citations in the same |\citeyear|, |\citeyearNP|,
% |\citeN|, or |\shortciteN| command.
% Use something like |\citeN{ref1,ref2,ref3}| and |\citeN{ref4}| for a list.
%
% \@citedata and \@citedatax:
%  \def\@citedata{%
%    \@ifnextchar [{\@tempswatrue\@citedatax}%
%                {\@tempswafalse\@citedatax[]}%
%  }
%  \def\@citedatax[#1]#2{%
%  \let\@citea\@empty
%  \if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi%
%    \def\@citea{}\@cite{\@for\@citeb:=#2\do%
%      {\@citea\def\@citea{; }\@ifundefined% by Young
%        {b@\@citeb}{{\bf ?}%
%        \@warning{Citation `\@citeb' on page \thepage \space undefined}}%
%  {\csname b@\@citeb\endcsname}}}{#1}}%
% \fi
% \begin{macro}{\@citex}
% This is the original |\@citex| from \LaTeX{} modified to use semicolons.
%    \begin{macrocode}
\def\@citex[#1]#2{%
  \let\@citea\@empty
  \@cite{\@for\@citeb:=#2\do
    {\@citea\def\@citea{;\penalty-1\ }%
     \edef\@citeb{\expandafter\@firstofone\@citeb\@empty}%
     \if@filesw\immediate\write\@auxout{\string\citation{\@citeb}}\fi
     \@ifundefined{b@\@citeb}{\mbox{\reset@font\bfseries ?}%
       \G@refundefinedtrue
       \@latex@warning
         {Citation `\@citeb' on page \thepage \space undefined}}%
       {{\csname b@\@citeb\endcsname}}}}{#1}}
%    \end{macrocode}
% \end{macro}
% \begin{macro}{\@biblabel}
% No labels in the bibliography.
%    \begin{macrocode}
  \def\@biblabel#1{#1}
  \labelsep\z@
  \let\mlastyle@intbib\thebibliography
  \def\thebibliography#1{\mlastyle@intbib{#1}
    \itemindent-\leftmargin\def\@biblabel##1{}}
%    \end{macrocode}
% \end{macro}
% Title the either the bibliography or the references ``Works Cited,''
% depending on the document class.
%    \begin{macrocode}
  \@ifundefined{chapter}
  {\renewcommand\refname{Works Cited}}
  {\renewcommand\bibname{Works Cited}}
%    \end{macrocode}
%
% ^^A% Define the command \workscited{bib}{style}{nocite}
% ^^A%\newcommand{\workscited}[3]{%
% ^^A%  \ifx\chapter\@undefined%
% ^^A%    \addcontentsline{toc}{chapter}{\bfseries\bibname}% report style
% ^^A%  \else
% ^^A%    \addcontentsline{toc}{section}{\bfseries\refname}% article style
% ^^A%  \fi
% ^^A%  \bibliography{#1}\bibliographystyle{#2}\nocite{#3}}
% ^^A% \fi
% ^^A\newcommand{\annote}[1]{\begin{list}{}{%
% ^^A                \setlength{\labelwidth}{0pt}
% ^^A                \addtolength{\leftmargin}{\parindent}
% ^^A                \setlength{\labelsep}{0pt}}%
% ^^A                \item #1 \end{list}}
% \subsubsection{Plain Style}
% \begin{macro}{\citeC}
% This next block is used only if the \Lopt{compat} option is set.
%    \begin{macrocode}
\else
  \newcommand{\mlastyle@cite}[2][]{\@tempswafalse\@citex[]{#2}}
  \let\cite\mlastyle@cite
  \let\citepage\mlastyle@cite
  \let\citeindirect\mlastyle@cite
  \newcommand{\citeC}[2][]{ \@tempswafalse\@citex[]{#2}}
  \let\citeM\mlastyle@relax
  \let\citepageM\mlastyle@relax
  \let\citeindirectM\mlastyle@relax
\fi
%    \end{macrocode}
% \end{macro}
% \end{macro}
% \iffalse
%</package>
% \fi
%
% \Finale
\endinput