macros.tex 2.7 KB
Newer Older
1

2
% \newcommand{\todo}[1]{{\Huge\bfseries TODO: #1}}
3

MARCHE Claude's avatar
MARCHE Claude committed
4
\newcommand{\why}{\textsf{Why3}\xspace}
5
\newcommand{\whyml}{\textsf{WhyML}\xspace}
6
\newcommand{\eg}{\emph{e.g.}\xspace}
7
\newcommand{\ie}{\emph{i.e.}\xspace}
MARCHE Claude's avatar
MARCHE Claude committed
8 9

% BNF grammar
10
\newcommand{\keyword}[1]{\texttt{#1}}
MARCHE Claude's avatar
MARCHE Claude committed
11 12 13 14 15
\newcommand{\indextt}[1]{\index{#1@\protect\keyword{#1}}}
\newcommand{\indexttbs}[1]{\index{#1@\protect\keywordbs{#1}}}
\newif\ifspace
\newif\ifnewentry
\newcommand{\addspace}{\ifspace ~ \spacefalse \fi}
16
\newcommand{\term}[2]{\addspace\mbox{\lstinline|#1|%
MARCHE Claude's avatar
MARCHE Claude committed
17 18 19
\ifthenelse{\equal{#2}{}}{}{\indexttbase{#2}{#1}}}\spacetrue}
\newcommand{\nonterm}[2]{%
  \ifthenelse{\equal{#2}{}}%
20 21
             {\addspace\mbox{\textsl{#1}\ifnewentry\index{#1@\textsl{#1}}\fi}\spacetrue}%
             {\addspace\mbox{\textsl{#1}\footnote{#2}\ifnewentry\index{grammar entries!\textsl{#1}}\fi}\spacetrue}}
MARCHE Claude's avatar
MARCHE Claude committed
22 23 24 25 26 27 28 29 30 31 32 33 34 35
\newcommand{\repetstar}{$^*$\spacetrue}
\newcommand{\repetplus}{$^+$\spacetrue}
\newcommand{\repetone}{$^?$\spacetrue}
\newcommand{\lparen}{\addspace(}
\newcommand{\rparen}{)}
\newcommand{\orelse}{\addspace$\mid$\spacetrue}
\newcommand{\sep}{ \\[2mm] \spacefalse\newentrytrue}
\newcommand{\newl}{ \\ & & \spacefalse}
\newcommand{\alt}{ \\ & $\mid$ & \spacefalse}
\newcommand{\is}{ & $::=$ & \newentryfalse}
\newenvironment{syntax}{\begin{tabular}{@{}rrll@{}}\spacefalse\newentrytrue}{\end{tabular}}
\newcommand{\synt}[1]{$\spacefalse#1$}
\newcommand{\emptystring}{$\epsilon$}
\newcommand{\below}{See\; below}
36

37 38 39 40 41
%%% listings for Why3 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\RequirePackage{listings}
\RequirePackage{amssymb}

42 43 44 45 46 47 48 49 50 51
\lstset{
  basicstyle={\ttfamily},
  framesep=2pt,
  frame=single,
  keywordstyle={\color{blue}},
  stringstyle=\itshape,
  commentstyle=\itshape,
  columns=[l]fullflexible,
  showstringspaces=false,
}
52 53 54

\lstdefinelanguage{why3}
{
55
morekeywords={namespace,predicate,function,inductive,type,use,clone,%
56 57 58
import,export,theory,module,end,in,with,%
let,rec,for,to,do,done,match,if,then,else,while,try,invariant,variant,%
absurd,raise,assert,exception,%
59 60 61 62 63
goal,axiom,lemma,forall},%
string=[b]",%
sensitive=true,%
morecomment=[s]{(*}{*)},%
keepspaces=true,
64 65
}
%literate=%
66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84
%{'a}{$\alpha$}{1}%
%{'b}{$\beta$}{1}%
%{<}{$<$}{1}%
%{>}{$>$}{1}%
%{<=}{$\le$}{1}%
%{>=}{$\ge$}{1}%
% {<>}{$\ne$}{1}%
% {/\\}{$\land$}{1}%
% {\\/}{ $\lor$ }{3}%
% {\ or(}{ $\lor$(}{3}%
% {not\ }{$\lnot$ }{1}%
% {not(}{$\lnot$(}{1}%
% {+->}{\texttt{+->}}{2}%
% % {+->}{$\mapsto$}{2}%
% {-->}{\texttt{-\relax->}}{2}%
% %{-->}{$\longrightarrow$}{2}%
% {->}{$\rightarrow$}{2}%
% {<->}{$\leftrightarrow$}{2}%

85
\lstnewenvironment{whycode}{\lstset{language=why3}}{}
86
\lstnewenvironment{ocamlcode}{\lstset{language={[Objective]Caml}}}{}
87

MARCHE Claude's avatar
MARCHE Claude committed
88
%%% Local Variables:
89
%%% mode: latex
MARCHE Claude's avatar
MARCHE Claude committed
90
%%% TeX-master: "manual"
MARCHE Claude's avatar
MARCHE Claude committed
91 92
%%% TeX-PDF-mode: t
%%% End: