|
lcp@292
|
1 |
% extra.sty : Isabelle Manual extra macros for non-Springer version
|
|
lcp@292
|
2 |
%
|
|
lcp@292
|
3 |
\typeout{Document Style extra. Released 17 February 1994}
|
|
lcp@292
|
4 |
|
|
lcp@292
|
5 |
%%Euro-style date: 20 September 1955
|
|
lcp@292
|
6 |
\def\today{\number\day\space\ifcase\month\or
|
|
lcp@292
|
7 |
January\or February\or March\or April\or May\or June\or
|
|
lcp@292
|
8 |
July\or August\or September\or October\or November\or December\fi
|
|
lcp@292
|
9 |
\space\number\year}
|
|
lcp@292
|
10 |
|
|
lcp@292
|
11 |
\input{alltt.sty}
|
|
lcp@292
|
12 |
%Indented, boxed alltt environment; uses \small\tt font
|
|
lcp@292
|
13 |
%\leftmargini is LaTeX's first-level indentation for items (2.5em)
|
|
lcp@292
|
14 |
%@endparenv is LaTeX's trick for preventing indentation of next paragraph
|
|
lcp@292
|
15 |
\newenvironment{ttbox}{\par\nobreak\vskip-2pt
|
|
lcp@455
|
16 |
\vbox\bgroup\footnotesize\begin{alltt}\chardef\{=`\{\chardef\}=`\}%
|
|
lcp@455
|
17 |
\leftskip\leftmargini}%
|
|
lcp@292
|
18 |
{\end{alltt}\egroup\vskip-7pt\@endparenv}
|
|
lcp@292
|
19 |
\newcommand\ttbreak{\end{ttbox}\vskip-10pt\begin{ttbox}}
|
|
lcp@292
|
20 |
|
|
lcp@292
|
21 |
%%%Put first chapter on odd page, with arabic numbering; like \cleardoublepage
|
|
lcp@292
|
22 |
\newcommand\clearfirst{\clearpage\ifodd\c@page\else
|
|
lcp@292
|
23 |
\hbox{}\newpage\if@twocolumn\hbox{}\newpage\fi\fi
|
|
lcp@292
|
24 |
\pagenumbering{arabic}}
|
|
lcp@292
|
25 |
|
|
lcp@292
|
26 |
%%%Ruled chapter headings
|
|
lcp@292
|
27 |
\def\@rulehead#1{\hrule height1pt \vskip 14pt \Huge \bf
|
|
lcp@292
|
28 |
#1 \vskip 14pt\hrule height1pt}
|
|
lcp@292
|
29 |
\def\@makechapterhead#1{ { \parindent 0pt
|
|
lcp@292
|
30 |
\ifnum\c@secnumdepth >\m@ne \raggedleft\large\bf\@chapapp{} \thechapter \par
|
|
lcp@292
|
31 |
\vskip 20pt \fi \raggedright \@rulehead{#1} \par \nobreak \vskip 40pt } }
|
|
lcp@292
|
32 |
|
|
lcp@292
|
33 |
\def\@makeschapterhead#1{ { \parindent 0pt \raggedright
|
|
lcp@292
|
34 |
\@rulehead{#1} \par \nobreak \vskip 40pt } }
|
|
lcp@292
|
35 |
|