1 % extra.sty : Isabelle Manual extra macros for non-Springer version
3 \typeout{Document Style extra. Released 17 February 1994}
5 %%Euro-style date: 20 September 1955
6 \def\today{\number\day\space\ifcase\month\or
7 January\or February\or March\or April\or May\or June\or
8 July\or August\or September\or October\or November\or December\fi
11 %%Borrowed from alltt.sty, but leaves % as the comment character
12 \def\docspecials{\do\ \do\$\do\&%
13 \do\#\do\^\do\^^K\do\_\do\^^A\do\~}
15 \def\alltt{\trivlist \item[]\if@minipage\else\vskip\parskip\fi
16 \leftskip\@totalleftmargin\rightskip\z@
17 \parindent\z@\parfillskip\@flushglue\parskip\z@
18 \@tempswafalse \def\par{\if@tempswa\hbox{}\fi\@tempswatrue\@@par}
19 \obeylines \tt \catcode``=13 \@noligs \let\do\@makeother \docspecials
20 \frenchspacing\@vobeyspaces}
22 \let\endalltt=\endtrivlist
24 %Indented, boxed alltt environment; uses \small\tt font
25 %\leftmargini is LaTeX's first-level indentation for items (2.5em)
26 %@endparenv is LaTeX's trick for preventing indentation of next paragraph
27 %redefines \{ and \} to be in \tt font
28 \newenvironment{ttbox}{\par\nobreak\vskip-2pt
29 \vbox\bgroup\footnotesize\begin{alltt}\chardef\{=`\{\chardef\}=`\}%
30 \leftskip\leftmargini}%
31 {\end{alltt}\egroup\vskip-7pt\@endparenv}
32 \newcommand\ttbreak{\end{ttbox}\vskip-10pt\begin{ttbox}}
34 %%%Put first chapter on odd page, with arabic numbering; like \cleardoublepage
35 \newcommand\clearfirst{\clearpage\ifodd\c@page\else
36 \hbox{}\newpage\if@twocolumn\hbox{}\newpage\fi\fi
37 \pagenumbering{arabic}}
39 %%%Ruled chapter headings
40 \def\@rulehead#1{\hrule height1pt \vskip 14pt \Huge \bf
41 #1 \vskip 14pt\hrule height1pt}
42 \def\@makechapterhead#1{ { \parindent 0pt
43 \ifnum\c@secnumdepth >\m@ne \raggedleft\large\bf\@chapapp{} \thechapter \par
44 \vskip 20pt \fi \raggedright \@rulehead{#1} \par \nobreak \vskip 40pt } }
46 \def\@makeschapterhead#1{ { \parindent 0pt \raggedright
47 \@rulehead{#1} \par \nobreak \vskip 40pt } }