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