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