| author | wenzelm |
| Tue, 16 Oct 2001 00:50:23 +0200 | |
| changeset 11797 | 1e29b79db3dc |
| parent 11573 | 4f85af77038f |
| child 11863 | 87643169ae7d |
| permissions | -rw-r--r-- |
| 7709 | 1 |
%% |
| 9818 | 2 |
%% Author: Markus Wenzel, TU Muenchen |
3 |
%% License: GPL (GNU GENERAL PUBLIC LICENSE) |
|
| 7709 | 4 |
%% |
5 |
%% macros for Isabelle generated LaTeX output |
|
6 |
%% |
|
7 |
||
| 9913 | 8 |
%%% Simple document preparation (based on theory token language and symbols) |
| 7709 | 9 |
|
| 8714 | 10 |
% isabelle environments |
| 7788 | 11 |
|
| 9913 | 12 |
\newcommand{\isabellecontext}{UNKNOWN}
|
13 |
||
| 9657 | 14 |
\newcommand{\isastyle}{\small\tt\slshape}
|
| 9669 | 15 |
\newcommand{\isastyleminor}{\small\tt\slshape}
|
| 10220 | 16 |
\newcommand{\isastylescript}{\footnotesize\tt\slshape}
|
| 9657 | 17 |
\newcommand{\isastyletext}{\normalsize\rm}
|
18 |
\newcommand{\isastyletxt}{\rm}
|
|
19 |
\newcommand{\isastylecmt}{\rm}
|
|
| 8713 | 20 |
|
| 10220 | 21 |
%symbol markup -- \emph achieves decent spacing via italic corrections |
22 |
\newcommand{\isamath}[1]{\emph{$#1$}}
|
|
23 |
\newcommand{\isatext}[1]{\emph{#1}}
|
|
24 |
\newcommand{\isascriptstyle}{\def\isamath##1{##1}\def\isatext##1{\mbox{\isastylescript##1}}}
|
|
| 10260 | 25 |
\newcommand{\isactrlsub}[1]{\emph{\isascriptstyle${}\sb{#1}$}}
|
26 |
\newcommand{\isactrlsup}[1]{\emph{\isascriptstyle${}\sp{#1}$}}
|
|
| 11573 | 27 |
\newcommand{\isactrlbold}[1]{{\bfseries\upshape\boldmath#1}}
|
| 10220 | 28 |
|
| 8713 | 29 |
\newdimen\isa@parindent\newdimen\isa@parskip |
| 9657 | 30 |
|
|
9702
f23bee3c0682
\newenvironment{isabellebody}: version without trivlist;
wenzelm
parents:
9688
diff
changeset
|
31 |
\newenvironment{isabellebody}{%
|
| 10470 | 32 |
\par% |
|
9702
f23bee3c0682
\newenvironment{isabellebody}: version without trivlist;
wenzelm
parents:
9688
diff
changeset
|
33 |
\isa@parindent\parindent\parindent0pt% |
| 8713 | 34 |
\isa@parskip\parskip\parskip0pt% |
| 10470 | 35 |
\isastyle}{\par}
|
|
9702
f23bee3c0682
\newenvironment{isabellebody}: version without trivlist;
wenzelm
parents:
9688
diff
changeset
|
36 |
|
|
f23bee3c0682
\newenvironment{isabellebody}: version without trivlist;
wenzelm
parents:
9688
diff
changeset
|
37 |
\newenvironment{isabelle}
|
| 10422 | 38 |
{\begin{trivlist}\begin{isabellebody}\item\relax}
|
39 |
{\end{isabellebody}\end{trivlist}}
|
|
| 8713 | 40 |
|
| 9669 | 41 |
\newcommand{\isa}[1]{\emph{\isastyleminor #1}}
|
| 8714 | 42 |
|
| 10949 | 43 |
\newcommand{\isaindent}[1]{\hphantom{#1}}
|
| 7709 | 44 |
\newcommand{\isanewline}{\mbox{}\\\mbox{}}
|
| 9669 | 45 |
\newcommand{\isadigit}[1]{#1}
|
| 7752 | 46 |
|
| 9669 | 47 |
\chardef\isacharbang=`\! |
48 |
\chardef\isachardoublequote=`\" |
|
| 9657 | 49 |
\chardef\isacharhash=`\# |
50 |
\chardef\isachardollar=`\$ |
|
51 |
\chardef\isacharpercent=`\% |
|
52 |
\chardef\isacharampersand=`\& |
|
53 |
\chardef\isacharprime=`\' |
|
54 |
\chardef\isacharparenleft=`\( |
|
55 |
\chardef\isacharparenright=`\) |
|
56 |
\chardef\isacharasterisk=`\* |
|
| 9669 | 57 |
\chardef\isacharplus=`\+ |
58 |
\chardef\isacharcomma=`\, |
|
| 9657 | 59 |
\chardef\isacharminus=`\- |
| 9669 | 60 |
\chardef\isachardot=`\. |
61 |
\chardef\isacharslash=`\/ |
|
62 |
\chardef\isacharcolon=`\: |
|
63 |
\chardef\isacharsemicolon=`\; |
|
| 9657 | 64 |
\chardef\isacharless=`\< |
| 9669 | 65 |
\chardef\isacharequal=`\= |
| 9657 | 66 |
\chardef\isachargreater=`\> |
| 9669 | 67 |
\chardef\isacharquery=`\? |
68 |
\chardef\isacharat=`\@ |
|
| 9657 | 69 |
\chardef\isacharbrackleft=`\[ |
70 |
\chardef\isacharbackslash=`\\ |
|
71 |
\chardef\isacharbrackright=`\] |
|
72 |
\chardef\isacharcircum=`\^ |
|
73 |
\chardef\isacharunderscore=`\_ |
|
| 9669 | 74 |
\chardef\isacharbackquote=`\` |
| 9657 | 75 |
\chardef\isacharbraceleft=`\{
|
76 |
\chardef\isacharbar=`\| |
|
77 |
\chardef\isacharbraceright=`\} |
|
78 |
\chardef\isachartilde=`\~ |
|
| 7788 | 79 |
|
| 7797 | 80 |
|
81 |
% keyword and section markup |
|
| 7788 | 82 |
|
| 9710 | 83 |
\newcommand{\isakeywordcharunderscore}{\_}
|
| 9669 | 84 |
\newcommand{\isakeyword}[1]
|
| 9710 | 85 |
{\emph{\bf\def\isachardot{.}\def\isacharunderscore{\isakeywordcharunderscore}%
|
| 9669 | 86 |
\def\isacharbraceleft{\{}\def\isacharbraceright{\}}#1}}
|
87 |
\newcommand{\isacommand}[1]{\isakeyword{#1}}
|
|
| 7758 | 88 |
|
| 8501 | 89 |
\newcommand{\isamarkupheader}[1]{\section{#1}}
|
| 7752 | 90 |
\newcommand{\isamarkupchapter}[1]{\chapter{#1}}
|
91 |
\newcommand{\isamarkupsection}[1]{\section{#1}}
|
|
92 |
\newcommand{\isamarkupsubsection}[1]{\subsection{#1}}
|
|
93 |
\newcommand{\isamarkupsubsubsection}[1]{\subsubsection{#1}}
|
|
94 |
\newcommand{\isamarkupsect}[1]{\section{#1}}
|
|
95 |
\newcommand{\isamarkupsubsect}[1]{\subsection{#1}}
|
|
96 |
\newcommand{\isamarkupsubsubsect}[1]{\subsubsection{#1}}
|
|
|
8662
f9679ddbc492
isapar, isamarkuptext, isamarkuptxt turned into environments;
wenzelm
parents:
8512
diff
changeset
|
97 |
|
| 10586 | 98 |
\newcommand{\isabeginpar}{\par\medskip}
|
99 |
\newcommand{\isaendpar}{\par\medskip}
|
|
100 |
\newenvironment{isapar}{\parindent\isa@parindent\parskip\isa@parskip\isabeginpar}{\isaendpar}
|
|
| 9657 | 101 |
\newenvironment{isamarkuptext}{\isastyletext\begin{isapar}}{\end{isapar}}
|
102 |
\newenvironment{isamarkuptxt}{\isastyletxt\begin{isapar}}{\end{isapar}}
|
|
103 |
\newcommand{\isamarkupcmt}[1]{{\isastylecmt--- #1}}
|
|
104 |
||
105 |
||
| 10024 | 106 |
% alternative styles |
| 9657 | 107 |
|
108 |
\newcommand{\isabellestyle}{}
|
|
| 9669 | 109 |
\def\isabellestyle#1{\csname isabellestyle#1\endcsname}
|
| 9657 | 110 |
|
| 10024 | 111 |
\newcommand{\isabellestylett}{%
|
112 |
\renewcommand{\isastyle}{\small\tt}%
|
|
| 10188 | 113 |
\renewcommand{\isastyleminor}{\small\tt}%
|
| 10220 | 114 |
\renewcommand{\isastylescript}{\footnotesize\tt}%
|
| 10024 | 115 |
} |
| 9669 | 116 |
\newcommand{\isabellestyleit}{%
|
117 |
\renewcommand{\isastyle}{\small\it}%
|
|
118 |
\renewcommand{\isastyleminor}{\it}%
|
|
| 10220 | 119 |
\renewcommand{\isastylescript}{\footnotesize\it}%
|
| 9725 | 120 |
\renewcommand{\isakeywordcharunderscore}{\mbox{-}}%
|
| 10220 | 121 |
\renewcommand{\isacharbang}{\isamath{!}}%
|
| 9669 | 122 |
\renewcommand{\isachardoublequote}{}%
|
| 10220 | 123 |
\renewcommand{\isacharhash}{\isamath{\#}}%
|
124 |
\renewcommand{\isachardollar}{\isamath{\$}}%
|
|
125 |
\renewcommand{\isacharpercent}{\isamath{\%}}%
|
|
126 |
\renewcommand{\isacharampersand}{\isamath{\&}}%
|
|
127 |
\renewcommand{\isacharprime}{\isamath{\mskip2mu{'}\mskip-2mu}}%
|
|
128 |
\renewcommand{\isacharparenleft}{\isamath{(}}%
|
|
129 |
\renewcommand{\isacharparenright}{\isamath{)}}%
|
|
130 |
\renewcommand{\isacharasterisk}{\isamath{*}}%
|
|
131 |
\renewcommand{\isacharplus}{\isamath{+}}%
|
|
132 |
\renewcommand{\isacharcomma}{\isamath{\mathord,}}%
|
|
133 |
\renewcommand{\isacharminus}{\isamath{-}}%
|
|
134 |
\renewcommand{\isachardot}{\isamath{\mathord.}}%
|
|
135 |
\renewcommand{\isacharslash}{\isamath{/}}%
|
|
136 |
\renewcommand{\isacharcolon}{\isamath{\mathord:}}%
|
|
137 |
\renewcommand{\isacharsemicolon}{\isamath{\mathord;}}%
|
|
138 |
\renewcommand{\isacharless}{\isamath{<}}%
|
|
139 |
\renewcommand{\isacharequal}{\isamath{=}}%
|
|
140 |
\renewcommand{\isachargreater}{\isamath{>}}%
|
|
141 |
\renewcommand{\isacharat}{\isamath{@}}%
|
|
142 |
\renewcommand{\isacharbrackleft}{\isamath{[}}%
|
|
143 |
\renewcommand{\isacharbrackright}{\isamath{]}}%
|
|
| 9725 | 144 |
\renewcommand{\isacharunderscore}{\mbox{-}}%
|
| 10220 | 145 |
\renewcommand{\isacharbraceleft}{\isamath{\{}}%
|
146 |
\renewcommand{\isacharbar}{\isamath{\mid}}%
|
|
147 |
\renewcommand{\isacharbraceright}{\isamath{\}}}%
|
|
| 10260 | 148 |
\renewcommand{\isachartilde}{\isamath{{}\sp{\sim}}}%
|
| 9657 | 149 |
} |
150 |
||
| 9975 | 151 |
\newcommand{\isabellestylesl}{%
|
152 |
\isabellestyleit% |
|
153 |
\renewcommand{\isastyle}{\small\sl}%
|
|
154 |
\renewcommand{\isastyleminor}{\sl}%
|
|
| 10220 | 155 |
\renewcommand{\isastylescript}{\footnotesize\sl}%
|
| 9975 | 156 |
} |