doc-src/extra.sty
author lcp
Mon Jul 11 16:29:21 1994 +0200 (1994-07-11)
changeset 455 466dd59b3645
parent 292 cc69ef31cfc3
child 596 cffb278ec83e
permissions -rw-r--r--
misc updates
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