283 lines
9.4 KiB
TeX
283 lines
9.4 KiB
TeX
%%
|
|
%% macros for Isabelle generated LaTeX output
|
|
%%
|
|
|
|
%%% Simple document preparation (based on theory token language and symbols)
|
|
|
|
% isabelle environments
|
|
|
|
\newcommand{\isabellecontext}{UNKNOWN}
|
|
\newcommand{\setisabellecontext}[1]{\def\isabellecontext{#1}}
|
|
|
|
\newcommand{\isastyle}{\UNDEF}
|
|
\newcommand{\isastylett}{\UNDEF}
|
|
\newcommand{\isastyleminor}{\UNDEF}
|
|
\newcommand{\isastyleminortt}{\UNDEF}
|
|
\newcommand{\isastylescript}{\UNDEF}
|
|
\newcommand{\isastyletext}{\normalsize\normalfont\rmfamily}
|
|
\newcommand{\isastyletxt}{\normalfont\rmfamily}
|
|
\newcommand{\isastylecmt}{\normalfont\rmfamily}
|
|
|
|
\newcommand{\isaspacing}{%
|
|
\sfcode 42 1000 % .
|
|
\sfcode 63 1000 % ?
|
|
\sfcode 33 1000 % !
|
|
\sfcode 58 1000 % :
|
|
\sfcode 59 1000 % ;
|
|
\sfcode 44 1000 % ,
|
|
}
|
|
|
|
%symbol markup -- \emph achieves decent spacing via italic corrections
|
|
\newcommand{\isamath}[1]{\emph{$#1$}}
|
|
\newcommand{\isatext}[1]{\emph{#1}}
|
|
\DeclareRobustCommand{\isascriptstyle}{\def\isamath##1{##1}\def\isatext##1{\mbox{\isaspacing\isastylescript##1}}}
|
|
\newcommand{\isactrlsub}[1]{\emph{\isascriptstyle${}\sb{#1}$}}
|
|
\newcommand{\isactrlsup}[1]{\emph{\isascriptstyle${}\sp{#1}$}}
|
|
\DeclareRobustCommand{\isactrlbsub}{\emph\bgroup\math{}\sb\bgroup\mbox\bgroup\isaspacing\isastylescript}
|
|
\DeclareRobustCommand{\isactrlesub}{\egroup\egroup\endmath\egroup}
|
|
\DeclareRobustCommand{\isactrlbsup}{\emph\bgroup\math{}\sp\bgroup\mbox\bgroup\isaspacing\isastylescript}
|
|
\DeclareRobustCommand{\isactrlesup}{\egroup\egroup\endmath\egroup}
|
|
\newcommand{\isactrlbold}[1]{{\bfseries\upshape\boldmath#1}}
|
|
|
|
%blackboard-bold (requires font txmia from pxfonts)
|
|
\DeclareSymbolFont{bbbfont}{U}{txmia}{m}{it}
|
|
\SetSymbolFont{bbbfont}{bold}{U}{txmia}{bx}{it}
|
|
\DeclareMathSymbol{\bbbA}{\mathord}{bbbfont}{129}
|
|
\DeclareMathSymbol{\bbbB}{\mathord}{bbbfont}{130}
|
|
\DeclareMathSymbol{\bbbC}{\mathord}{bbbfont}{131}
|
|
\DeclareMathSymbol{\bbbD}{\mathord}{bbbfont}{132}
|
|
\DeclareMathSymbol{\bbbE}{\mathord}{bbbfont}{133}
|
|
\DeclareMathSymbol{\bbbF}{\mathord}{bbbfont}{134}
|
|
\DeclareMathSymbol{\bbbG}{\mathord}{bbbfont}{135}
|
|
\DeclareMathSymbol{\bbbH}{\mathord}{bbbfont}{136}
|
|
\DeclareMathSymbol{\bbbI}{\mathord}{bbbfont}{137}
|
|
\DeclareMathSymbol{\bbbJ}{\mathord}{bbbfont}{138}
|
|
\DeclareMathSymbol{\bbbK}{\mathord}{bbbfont}{139}
|
|
\DeclareMathSymbol{\bbbL}{\mathord}{bbbfont}{140}
|
|
\DeclareMathSymbol{\bbbM}{\mathord}{bbbfont}{141}
|
|
\DeclareMathSymbol{\bbbN}{\mathord}{bbbfont}{142}
|
|
\DeclareMathSymbol{\bbbO}{\mathord}{bbbfont}{143}
|
|
\DeclareMathSymbol{\bbbP}{\mathord}{bbbfont}{144}
|
|
\DeclareMathSymbol{\bbbQ}{\mathord}{bbbfont}{145}
|
|
\DeclareMathSymbol{\bbbR}{\mathord}{bbbfont}{146}
|
|
\DeclareMathSymbol{\bbbS}{\mathord}{bbbfont}{147}
|
|
\DeclareMathSymbol{\bbbT}{\mathord}{bbbfont}{148}
|
|
\DeclareMathSymbol{\bbbU}{\mathord}{bbbfont}{149}
|
|
\DeclareMathSymbol{\bbbV}{\mathord}{bbbfont}{150}
|
|
\DeclareMathSymbol{\bbbW}{\mathord}{bbbfont}{151}
|
|
\DeclareMathSymbol{\bbbX}{\mathord}{bbbfont}{152}
|
|
\DeclareMathSymbol{\bbbY}{\mathord}{bbbfont}{153}
|
|
\DeclareMathSymbol{\bbbZ}{\mathord}{bbbfont}{154}
|
|
|
|
\newenvironment{isaantiq}{{\isacharat\isacharbraceleft}}{{\isacharbraceright}}
|
|
|
|
\newdimen\isa@parindent\newdimen\isa@parskip
|
|
|
|
\newenvironment{isabellebody}{%
|
|
\isamarkuptrue\par%
|
|
\isa@parindent\parindent\parindent0pt%
|
|
\isa@parskip\parskip\parskip0pt%
|
|
\isaspacing\isastyle}{\par}
|
|
|
|
\newenvironment{isabellebodytt}{%
|
|
\isamarkuptrue\par%
|
|
\isa@parindent\parindent\parindent0pt%
|
|
\isa@parskip\parskip\parskip0pt%
|
|
\isaspacing\isastylett}{\par}
|
|
|
|
\newenvironment{isabelle}
|
|
{\begin{trivlist}\begin{isabellebody}\item\relax}
|
|
{\end{isabellebody}\end{trivlist}}
|
|
|
|
\newenvironment{isabellett}
|
|
{\begin{trivlist}\begin{isabellebodytt}\item\relax}
|
|
{\end{isabellebodytt}\end{trivlist}}
|
|
|
|
\newcommand{\isa}[1]{\emph{\isaspacing\isastyleminor #1}}
|
|
\newcommand{\isatt}[1]{\emph{\isaspacing\isastyleminortt #1}}
|
|
|
|
\newcommand{\isaindent}[1]{\hphantom{#1}}
|
|
\newcommand{\isanewline}{\mbox{}\par\mbox{}}
|
|
\newcommand{\isasep}{}
|
|
\newcommand{\isadigit}[1]{#1}
|
|
|
|
\newcommand{\isachardefaults}{%
|
|
\def\isacharbell{\isamath{\bigbox}}%requires stmaryrd
|
|
\chardef\isacharbang=`\!%
|
|
\chardef\isachardoublequote=`\"%
|
|
\chardef\isachardoublequoteopen=`\"%
|
|
\chardef\isachardoublequoteclose=`\"%
|
|
\chardef\isacharhash=`\#%
|
|
\chardef\isachardollar=`\$%
|
|
\chardef\isacharpercent=`\%%
|
|
\chardef\isacharampersand=`\&%
|
|
\chardef\isacharprime=`\'%
|
|
\chardef\isacharparenleft=`\(%
|
|
\chardef\isacharparenright=`\)%
|
|
\chardef\isacharasterisk=`\*%
|
|
\chardef\isacharplus=`\+%
|
|
\chardef\isacharcomma=`\,%
|
|
\chardef\isacharminus=`\-%
|
|
\chardef\isachardot=`\.%
|
|
\chardef\isacharslash=`\/%
|
|
\chardef\isacharcolon=`\:%
|
|
\chardef\isacharsemicolon=`\;%
|
|
\chardef\isacharless=`\<%
|
|
\chardef\isacharequal=`\=%
|
|
\chardef\isachargreater=`\>%
|
|
\chardef\isacharquery=`\?%
|
|
\chardef\isacharat=`\@%
|
|
\chardef\isacharbrackleft=`\[%
|
|
\chardef\isacharbackslash=`\\%
|
|
\chardef\isacharbrackright=`\]%
|
|
\chardef\isacharcircum=`\^%
|
|
\chardef\isacharunderscore=`\_%
|
|
\def\isacharunderscorekeyword{\_}%
|
|
\chardef\isacharbackquote=`\`%
|
|
\chardef\isacharbackquoteopen=`\`%
|
|
\chardef\isacharbackquoteclose=`\`%
|
|
\chardef\isacharbraceleft=`\{%
|
|
\chardef\isacharbar=`\|%
|
|
\chardef\isacharbraceright=`\}%
|
|
\chardef\isachartilde=`\~%
|
|
\def\isacharverbatimopen{\isacharbraceleft\isacharasterisk}%
|
|
\def\isacharverbatimclose{\isacharasterisk\isacharbraceright}%
|
|
\def\isacartoucheopen{\isatext{\guilsinglleft}}%
|
|
\def\isacartoucheclose{\isatext{\guilsinglright}}%
|
|
}
|
|
|
|
|
|
% keyword and section markup
|
|
|
|
\newcommand{\isakeyword}[1]
|
|
{\emph{\normalfont\bfseries\def\isachardot{.}\def\isacharunderscore{\isacharunderscorekeyword}%
|
|
\def\isacharbraceleft{\{}\def\isacharbraceright{\}}#1}}
|
|
\newcommand{\isacommand}[1]{\isakeyword{#1}}
|
|
|
|
\newcommand{\isakeywordcontrol}[1]
|
|
{\emph{\normalfont\bfseries\itshape\def\isacharunderscore{\isacharunderscorekeyword}#1\,}}
|
|
|
|
\newcommand{\isamarkupchapter}[1]{\chapter{#1}}
|
|
\newcommand{\isamarkupsection}[1]{\section{#1}}
|
|
\newcommand{\isamarkupsubsection}[1]{\subsection{#1}}
|
|
\newcommand{\isamarkupsubsubsection}[1]{\subsubsection{#1}}
|
|
\newcommand{\isamarkupparagraph}[1]{\paragraph{#1}}
|
|
\newcommand{\isamarkupsubparagraph}[1]{\subparagraph{#1}}
|
|
|
|
\newif\ifisamarkup
|
|
\newcommand{\isabeginpar}{\par\ifisamarkup\relax\else\medskip\fi}
|
|
\newcommand{\isaendpar}{\par\medskip}
|
|
\newenvironment{isapar}{\parindent\isa@parindent\parskip\isa@parskip\isabeginpar}{\isaendpar}
|
|
\newenvironment{isamarkuptext}{\par\isastyletext\begin{isapar}}{\end{isapar}}
|
|
\newenvironment{isamarkuptxt}{\par\isastyletxt\begin{isapar}}{\end{isapar}}
|
|
\newcommand{\isamarkupcmt}[1]{{\isastylecmt--- #1}}
|
|
|
|
|
|
% index entries
|
|
|
|
\newcommand{\isaindexdef}[1]{\textbf{#1}}
|
|
\newcommand{\isaindexref}[1]{#1}
|
|
|
|
|
|
% styles
|
|
|
|
\def\isabellestyle#1{\csname isabellestyle#1\endcsname}
|
|
|
|
\newcommand{\isabellestyledefault}{%
|
|
\def\isastyle{\small\normalfont\ttfamily\slshape}%
|
|
\def\isastylett{\small\normalfont\ttfamily}%
|
|
\def\isastyleminor{\small\normalfont\ttfamily\slshape}%
|
|
\def\isastyleminortt{\small\normalfont\ttfamily}%
|
|
\def\isastylescript{\footnotesize\normalfont\ttfamily\slshape}%
|
|
\isachardefaults%
|
|
}
|
|
\isabellestyledefault
|
|
|
|
\newcommand{\isabellestylett}{%
|
|
\def\isastyle{\small\normalfont\ttfamily}%
|
|
\def\isastylett{\small\normalfont\ttfamily}%
|
|
\def\isastyleminor{\small\normalfont\ttfamily}%
|
|
\def\isastyleminortt{\small\normalfont\ttfamily}%
|
|
\def\isastylescript{\footnotesize\normalfont\ttfamily}%
|
|
\isachardefaults%
|
|
}
|
|
|
|
\newcommand{\isabellestyleit}{%
|
|
\def\isastyle{\small\normalfont\itshape}%
|
|
\def\isastylett{\small\normalfont\ttfamily}%
|
|
\def\isastyleminor{\normalfont\itshape}%
|
|
\def\isastyleminortt{\normalfont\ttfamily}%
|
|
\def\isastylescript{\footnotesize\normalfont\itshape}%
|
|
\isachardefaults%
|
|
\def\isacharunderscorekeyword{\mbox{-}}%
|
|
\def\isacharbang{\isamath{!}}%
|
|
\def\isachardoublequote{}%
|
|
\def\isachardoublequoteopen{}%
|
|
\def\isachardoublequoteclose{}%
|
|
\def\isacharhash{\isamath{\#}}%
|
|
\def\isachardollar{\isamath{\$}}%
|
|
\def\isacharpercent{\isamath{\%}}%
|
|
\def\isacharampersand{\isamath{\&}}%
|
|
\def\isacharprime{\isamath{\mskip2mu{'}\mskip-2mu}}%
|
|
\def\isacharparenleft{\isamath{(}}%
|
|
\def\isacharparenright{\isamath{)}}%
|
|
\def\isacharasterisk{\isamath{*}}%
|
|
\def\isacharplus{\isamath{+}}%
|
|
\def\isacharcomma{\isamath{\mathord,}}%
|
|
\def\isacharminus{\isamath{-}}%
|
|
\def\isachardot{\isamath{\mathord.}}%
|
|
\def\isacharslash{\isamath{/}}%
|
|
\def\isacharcolon{\isamath{\mathord:}}%
|
|
\def\isacharsemicolon{\isamath{\mathord;}}%
|
|
\def\isacharless{\isamath{<}}%
|
|
\def\isacharequal{\isamath{=}}%
|
|
\def\isachargreater{\isamath{>}}%
|
|
\def\isacharat{\isamath{@}}%
|
|
\def\isacharbrackleft{\isamath{[}}%
|
|
\def\isacharbackslash{\isamath{\backslash}}%
|
|
\def\isacharbrackright{\isamath{]}}%
|
|
\def\isacharunderscore{\mbox{-}}%
|
|
\def\isacharbraceleft{\isamath{\{}}%
|
|
\def\isacharbar{\isamath{\mid}}%
|
|
\def\isacharbraceright{\isamath{\}}}%
|
|
\def\isachartilde{\isamath{{}\sp{\sim}}}%
|
|
\def\isacharbackquoteopen{\isatext{\guilsinglleft}}%
|
|
\def\isacharbackquoteclose{\isatext{\guilsinglright}}%
|
|
}
|
|
|
|
\newcommand{\isabellestyleliteral}{%
|
|
\isabellestyleit%
|
|
\def\isacharunderscore{\_}%
|
|
\def\isacharunderscorekeyword{\_}%
|
|
\chardef\isacharbackquoteopen=`\`%
|
|
\chardef\isacharbackquoteclose=`\`%
|
|
}
|
|
|
|
\newcommand{\isabellestyleliteralunderscore}{%
|
|
\isabellestyleliteral%
|
|
\def\isacharunderscore{\textunderscore}%
|
|
\def\isacharunderscorekeyword{\textunderscore}%
|
|
}
|
|
|
|
\newcommand{\isabellestylesl}{%
|
|
\isabellestyleit%
|
|
\def\isastyle{\small\normalfont\slshape}%
|
|
\def\isastylett{\small\normalfont\ttfamily}%
|
|
\def\isastyleminor{\normalfont\slshape}%
|
|
\def\isastyleminortt{\normalfont\ttfamily}%
|
|
\def\isastylescript{\footnotesize\normalfont\slshape}%
|
|
}
|
|
|
|
|
|
% cancel text
|
|
|
|
\usepackage[normalem]{ulem}
|
|
\newcommand{\isamarkupcancel}[1]{\isa{\xout{#1}}}
|
|
|
|
|
|
% tags
|
|
|
|
\newcommand{\isafold}[1]{\emph{$\langle\mathord{\mathit{#1}}\rangle$}}
|
|
|
|
\IfFileExists{isabelletags.sty}{\usepackage{isabelletags}}{}
|