doc-src/TutorialI/isabelle.sty
author paulson
Wed, 22 Oct 2003 10:53:12 +0200
changeset 14245 c0272df4775b
parent 13963 ba7aa8c426ad
child 14342 6e564092d72d
permissions -rw-r--r--
auto update
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
8751
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
     1
%%
9845
1206c7615a47 updated;
wenzelm
parents: 9812
diff changeset
     2
%% Author: Markus Wenzel, TU Muenchen
1206c7615a47 updated;
wenzelm
parents: 9812
diff changeset
     3
%% License: GPL (GNU GENERAL PUBLIC LICENSE)
8751
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
     4
%%
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
     5
%% macros for Isabelle generated LaTeX output
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
     6
%%
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
     7
9924
3370f6aa3200 updated;
wenzelm
parents: 9845
diff changeset
     8
%%% Simple document preparation (based on theory token language and symbols)
8751
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
     9
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    10
% isabelle environments
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    11
9924
3370f6aa3200 updated;
wenzelm
parents: 9845
diff changeset
    12
\newcommand{\isabellecontext}{UNKNOWN}
3370f6aa3200 updated;
wenzelm
parents: 9845
diff changeset
    13
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    14
\newcommand{\isastyle}{\small\tt\slshape}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    15
\newcommand{\isastyleminor}{\small\tt\slshape}
10226
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
    16
\newcommand{\isastylescript}{\footnotesize\tt\slshape}
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    17
\newcommand{\isastyletext}{\normalsize\rm}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    18
\newcommand{\isastyletxt}{\rm}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    19
\newcommand{\isastylecmt}{\rm}
8751
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    20
10226
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
    21
%symbol markup -- \emph achieves decent spacing via italic corrections
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
    22
\newcommand{\isamath}[1]{\emph{$#1$}}
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
    23
\newcommand{\isatext}[1]{\emph{#1}}
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
    24
\newcommand{\isascriptstyle}{\def\isamath##1{##1}\def\isatext##1{\mbox{\isastylescript##1}}}
10267
325ead6d9457 updated;
wenzelm
parents: 10226
diff changeset
    25
\newcommand{\isactrlsub}[1]{\emph{\isascriptstyle${}\sb{#1}$}}
325ead6d9457 updated;
wenzelm
parents: 10226
diff changeset
    26
\newcommand{\isactrlsup}[1]{\emph{\isascriptstyle${}\sp{#1}$}}
14245
c0272df4775b auto update
paulson
parents: 13963
diff changeset
    27
\newcommand{\isactrlisub}[1]{\emph{\isascriptstyle${}\sb{#1}$}}
c0272df4775b auto update
paulson
parents: 13963
diff changeset
    28
\newcommand{\isactrlisup}[1]{\emph{\isascriptstyle${}\sp{#1}$}}
11610
99103cef5f29 updated;
wenzelm
parents: 10950
diff changeset
    29
\newcommand{\isactrlbold}[1]{{\bfseries\upshape\boldmath#1}}
10226
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
    30
8751
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    31
\newdimen\isa@parindent\newdimen\isa@parskip
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    32
9717
699de91b15e2 updated;
wenzelm
parents: 9698
diff changeset
    33
\newenvironment{isabellebody}{%
11866
fbd097aec213 updated;
wenzelm
parents: 11610
diff changeset
    34
\isamarkuptrue\par%
9717
699de91b15e2 updated;
wenzelm
parents: 9698
diff changeset
    35
\isa@parindent\parindent\parindent0pt%
8751
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    36
\isa@parskip\parskip\parskip0pt%
10471
040de0b97b72 updated;
wenzelm
parents: 10424
diff changeset
    37
\isastyle}{\par}
9717
699de91b15e2 updated;
wenzelm
parents: 9698
diff changeset
    38
699de91b15e2 updated;
wenzelm
parents: 9698
diff changeset
    39
\newenvironment{isabelle}
10424
17491b8c7732 updated;
wenzelm
parents: 10267
diff changeset
    40
{\begin{trivlist}\begin{isabellebody}\item\relax}
17491b8c7732 updated;
wenzelm
parents: 10267
diff changeset
    41
{\end{isabellebody}\end{trivlist}}
8751
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    42
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    43
\newcommand{\isa}[1]{\emph{\isastyleminor #1}}
8771
026f37a86ea7 *** empty log message ***
nipkow
parents: 8751
diff changeset
    44
10950
aa788fcb75a5 updated;
wenzelm
parents: 10839
diff changeset
    45
\newcommand{\isaindent}[1]{\hphantom{#1}}
13963
ba7aa8c426ad new version
paulson
parents: 11866
diff changeset
    46
\newcommand{\isanewline}{\mbox{}\par\mbox{}}
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    47
\newcommand{\isadigit}[1]{#1}
8751
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    48
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    49
\chardef\isacharbang=`\!
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    50
\chardef\isachardoublequote=`\"
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    51
\chardef\isacharhash=`\#
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    52
\chardef\isachardollar=`\$
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    53
\chardef\isacharpercent=`\%
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    54
\chardef\isacharampersand=`\&
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    55
\chardef\isacharprime=`\'
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    56
\chardef\isacharparenleft=`\(
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    57
\chardef\isacharparenright=`\)
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    58
\chardef\isacharasterisk=`\*
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    59
\chardef\isacharplus=`\+
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    60
\chardef\isacharcomma=`\,
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    61
\chardef\isacharminus=`\-
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    62
\chardef\isachardot=`\.
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    63
\chardef\isacharslash=`\/
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    64
\chardef\isacharcolon=`\:
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    65
\chardef\isacharsemicolon=`\;
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    66
\chardef\isacharless=`\<
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    67
\chardef\isacharequal=`\=
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    68
\chardef\isachargreater=`\>
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    69
\chardef\isacharquery=`\?
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    70
\chardef\isacharat=`\@
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    71
\chardef\isacharbrackleft=`\[
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    72
\chardef\isacharbackslash=`\\
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    73
\chardef\isacharbrackright=`\]
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    74
\chardef\isacharcircum=`\^
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    75
\chardef\isacharunderscore=`\_
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    76
\chardef\isacharbackquote=`\`
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    77
\chardef\isacharbraceleft=`\{
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    78
\chardef\isacharbar=`\|
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    79
\chardef\isacharbraceright=`\}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    80
\chardef\isachartilde=`\~
8751
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    81
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    82
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    83
% keyword and section markup
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    84
9717
699de91b15e2 updated;
wenzelm
parents: 9698
diff changeset
    85
\newcommand{\isakeywordcharunderscore}{\_}
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    86
\newcommand{\isakeyword}[1]
9717
699de91b15e2 updated;
wenzelm
parents: 9698
diff changeset
    87
{\emph{\bf\def\isachardot{.}\def\isacharunderscore{\isakeywordcharunderscore}%
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    88
\def\isacharbraceleft{\{}\def\isacharbraceright{\}}#1}}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
    89
\newcommand{\isacommand}[1]{\isakeyword{#1}}
8751
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    90
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    91
\newcommand{\isamarkupheader}[1]{\section{#1}}
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    92
\newcommand{\isamarkupchapter}[1]{\chapter{#1}}
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    93
\newcommand{\isamarkupsection}[1]{\section{#1}}
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    94
\newcommand{\isamarkupsubsection}[1]{\subsection{#1}}
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    95
\newcommand{\isamarkupsubsubsection}[1]{\subsubsection{#1}}
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    96
\newcommand{\isamarkupsect}[1]{\section{#1}}
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    97
\newcommand{\isamarkupsubsect}[1]{\subsection{#1}}
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    98
\newcommand{\isamarkupsubsubsect}[1]{\subsubsection{#1}}
9ed0548177fb *** empty log message ***
nipkow
parents:
diff changeset
    99
11866
fbd097aec213 updated;
wenzelm
parents: 11610
diff changeset
   100
\newif\ifisamarkup
fbd097aec213 updated;
wenzelm
parents: 11610
diff changeset
   101
\newcommand{\isabeginpar}{\par\ifisamarkup\relax\else\medskip\fi}
10589
b2d1b393b750 *** empty log message ***
wenzelm
parents: 10471
diff changeset
   102
\newcommand{\isaendpar}{\par\medskip}
b2d1b393b750 *** empty log message ***
wenzelm
parents: 10471
diff changeset
   103
\newenvironment{isapar}{\parindent\isa@parindent\parskip\isa@parskip\isabeginpar}{\isaendpar}
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   104
\newenvironment{isamarkuptext}{\isastyletext\begin{isapar}}{\end{isapar}}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   105
\newenvironment{isamarkuptxt}{\isastyletxt\begin{isapar}}{\end{isapar}}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   106
\newcommand{\isamarkupcmt}[1]{{\isastylecmt--- #1}}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   107
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   108
10037
0d2a6feeb634 updated;
wenzelm
parents: 9992
diff changeset
   109
% alternative styles
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   110
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   111
\newcommand{\isabellestyle}{}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   112
\def\isabellestyle#1{\csname isabellestyle#1\endcsname}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   113
10037
0d2a6feeb634 updated;
wenzelm
parents: 9992
diff changeset
   114
\newcommand{\isabellestylett}{%
0d2a6feeb634 updated;
wenzelm
parents: 9992
diff changeset
   115
\renewcommand{\isastyle}{\small\tt}%
10211
1bece7f35762 updated;
wenzelm
parents: 10132
diff changeset
   116
\renewcommand{\isastyleminor}{\small\tt}%
10226
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   117
\renewcommand{\isastylescript}{\footnotesize\tt}%
10037
0d2a6feeb634 updated;
wenzelm
parents: 9992
diff changeset
   118
}
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   119
\newcommand{\isabellestyleit}{%
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   120
\renewcommand{\isastyle}{\small\it}%
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   121
\renewcommand{\isastyleminor}{\it}%
10226
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   122
\renewcommand{\isastylescript}{\footnotesize\it}%
9812
87ba969d069c updated;
wenzelm
parents: 9717
diff changeset
   123
\renewcommand{\isakeywordcharunderscore}{\mbox{-}}%
10226
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   124
\renewcommand{\isacharbang}{\isamath{!}}%
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   125
\renewcommand{\isachardoublequote}{}%
10226
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   126
\renewcommand{\isacharhash}{\isamath{\#}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   127
\renewcommand{\isachardollar}{\isamath{\$}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   128
\renewcommand{\isacharpercent}{\isamath{\%}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   129
\renewcommand{\isacharampersand}{\isamath{\&}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   130
\renewcommand{\isacharprime}{\isamath{\mskip2mu{'}\mskip-2mu}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   131
\renewcommand{\isacharparenleft}{\isamath{(}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   132
\renewcommand{\isacharparenright}{\isamath{)}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   133
\renewcommand{\isacharasterisk}{\isamath{*}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   134
\renewcommand{\isacharplus}{\isamath{+}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   135
\renewcommand{\isacharcomma}{\isamath{\mathord,}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   136
\renewcommand{\isacharminus}{\isamath{-}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   137
\renewcommand{\isachardot}{\isamath{\mathord.}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   138
\renewcommand{\isacharslash}{\isamath{/}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   139
\renewcommand{\isacharcolon}{\isamath{\mathord:}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   140
\renewcommand{\isacharsemicolon}{\isamath{\mathord;}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   141
\renewcommand{\isacharless}{\isamath{<}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   142
\renewcommand{\isacharequal}{\isamath{=}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   143
\renewcommand{\isachargreater}{\isamath{>}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   144
\renewcommand{\isacharat}{\isamath{@}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   145
\renewcommand{\isacharbrackleft}{\isamath{[}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   146
\renewcommand{\isacharbrackright}{\isamath{]}}%
9812
87ba969d069c updated;
wenzelm
parents: 9717
diff changeset
   147
\renewcommand{\isacharunderscore}{\mbox{-}}%
10226
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   148
\renewcommand{\isacharbraceleft}{\isamath{\{}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   149
\renewcommand{\isacharbar}{\isamath{\mid}}%
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   150
\renewcommand{\isacharbraceright}{\isamath{\}}}%
10267
325ead6d9457 updated;
wenzelm
parents: 10226
diff changeset
   151
\renewcommand{\isachartilde}{\isamath{{}\sp{\sim}}}%
9673
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   152
}
1b2d4f995b13 updated;
wenzelm
parents: 8824
diff changeset
   153
9992
4281ccea43f0 *** empty log message ***
nipkow
parents: 9924
diff changeset
   154
\newcommand{\isabellestylesl}{%
4281ccea43f0 *** empty log message ***
nipkow
parents: 9924
diff changeset
   155
\isabellestyleit%
4281ccea43f0 *** empty log message ***
nipkow
parents: 9924
diff changeset
   156
\renewcommand{\isastyle}{\small\sl}%
4281ccea43f0 *** empty log message ***
nipkow
parents: 9924
diff changeset
   157
\renewcommand{\isastyleminor}{\sl}%
10226
2c0ad01ddaf7 updated;
wenzelm
parents: 10211
diff changeset
   158
\renewcommand{\isastylescript}{\footnotesize\sl}%
9992
4281ccea43f0 *** empty log message ***
nipkow
parents: 9924
diff changeset
   159
}