1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151
|
%%
%% This is file `amsbooka.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% amsbooka.dtx
%%
%%% ====================================================================
%%% @LaTeX-file{
%%% filename = "amsbooka.dtx",
%%% version = "2.01",
%%% date = "2003/02/28",
%%% time = "14:12:49 EST",
%%% author = "American Mathematical Society",
%%% copyright = "Copyright 1995, 1999 American Mathematical Society,
%%% all rights reserved. Copying of this file is
%%% authorized only if either:
%%% (1) you make absolutely no changes to your copy,
%%% including name; OR
%%% (2) if you do make changes, you first rename it
%%% to some other name.",
%%% address = "American Mathematical Society,
%%% Technical Support,
%%% Electronic Products and Services,
%%% P. O. Box 6248,
%%% Providence, RI 02940,
%%% USA",
%%% telephone = "401-455-4080 or (in the USA and Canada)
%%% 800-321-4AMS (321-4267)",
%%% FAX = "401-331-3842",
%%% checksum = "63139 257 945 8723",
%%% email = "tech-support@ams.org (Internet)",
%%% codetable = "ISO/ASCII",
%%% keywords = "latex, amslatex, ams-latex, monograph",
%%% supported = "yes",
%%% abstract = "This is part of the AMS-\LaTeX{} distribution.
%%% It contains code to augment the AMS-LaTeX{}
%%% monograph document classes, providing the ability
%%% to include an author's name along with a chapter
%%% title, and to pass the author information along
%%% for inclusion in the table of contents",
%%% docstring = "The checksum field above contains a CRC-16
%%% checksum as the first value, followed by the
%%% equivalent of the standard UNIX wc (word
%%% count) utility output of lines, words, and
%%% characters. This is produced by Robert
%%% Solovay's checksum utility.",
%%% }
%%% ====================================================================
\NeedsTeXFormat{LaTeX2e}% LaTeX 2.09 can't be used (nor non-LaTeX)
[1994/12/01]% LaTeX date must December 1994 or later
\ProvidesPackage{amsbooka}[2003/02/28 v2.01 monograph chapter authors]
\def\@gsm{gsm-l}
\def\@stml{stml-l}
\def\@makechapterhead#1{%
\ifx\@classname\@gsm \@makegsmchapterhead{#1}%
\else \ifx\@classname\@stml \@makestmlchapterhead{#1}%
\else \@makeplainchapterhead{#1}%
\fi \fi
}
\def\@makeplainchapterhead#1{%
\global\topskip 7.5pc\relax
\begingroup
\def\title{}%
\def\author##1{\vskip1pc\fontsize{\@xiipt}{14}\mdseries\textsc{##1}}%
\fontsize{\@xivpt}{18}\bfseries\centering
\ifnum\c@secnumdepth>\m@ne
\leavevmode \hskip-\leftskip
\rlap{\vbox to\z@{\vss
\centerline{\normalsize\mdseries
\uppercase\@xp{\chaptername}\enspace\thechapter}
\vskip 3pc}}\hskip\leftskip\fi
#1\par \endgroup
\skip@34\p@ \advance\skip@-\normalbaselineskip
\vskip\skip@ }
\def\@makeruledchapterhead#1{%
\global\topskip\normaltopskip
\begingroup
\def\author##1{\\ \hfil \\ \@chapauthorstyle ##1}%
\vbox to\topskip{%
\chapter@number
\vss
}\penalty\@M
\@chapheadstyle \raggedright
\noindent #1\par \endgroup
\if@index
\@indexstyle
\else
\@dropfolio
\@noindexstyle
\fi
\@afterheading
}
\def\@makegsmchapterhead#1{%
\def\@chapheadstyle{\Huge\bfseries \hsize24pc
\top@space{11pc}}%
\def\@chapauthorstyle{\LARGE\bfseries}%
\def\@indexstyle{%
\ifx\@empty\indexintro
\bb@space{7.5pc}%
\else
\vspace{3pc}%
\begingroup \small
\parbox[t]{27pc}{\leftskip3pc\normalfont\indexintro\par}%
\endgroup
\bb@space{3pc}%
\fi
}%
\def\@noindexstyle{\bb@space{7.5pc}}%
\@makeruledchapterhead{#1}%
}
\def\@makestmlchapterhead#1{%
\def\@chapheadstyle{\fontsize\@xxpt{22}\selectfont\bfseries\hsize 21pc
\top@par@space{9pc}}%
\def\@chapauthorstyle{\LARGE\mdseries}%
\def\@indexstyle{%
\ifx\@empty\indexintro
\bb@par@space{6.5pc}%
\else
\vspace{2.5pc}%
\begingroup \small
\parbox[t]{22.5pc}{\leftskip2.5pc\normalfont\indexintro\par}%
\endgroup
\bb@par@space{2.5pc}%
\fi
}%
\def\@noindexstyle{\bb@par@space{6.5pc}}%
\@makeruledchapterhead{#1}%
}
\def\@tocline#1#2#3#4#5#6#7{\relax
\ifnum #1>\c@tocdepth % then omit
\else
\def\author##1{\newline\textsc{##1}}%
\par \addpenalty\@secpenalty\addvspace{#2}%
\begingroup \hyphenpenalty\@M
\@ifempty{#4}{%
\@tempdima\csname r@tocindent\number#1\endcsname\relax
}{%
\@tempdima#4\relax
}%
\parindent\z@ \leftskip#3\relax \advance\leftskip\@tempdima\relax
\rightskip\@pnumwidth plus4em \parfillskip-\@pnumwidth
#5\leavevmode\hskip-\@tempdima #6\nobreak\relax
\hfil\hbox to\@pnumwidth{\@tocpagenum{#7}}\par
\nobreak
\endgroup
\fi}
\endinput
%%
%% End of file `amsbooka.sty'.
|