doc-src/TutorialI/Misc/document/natsum.tex
author nipkow
Wed, 11 Oct 2000 10:44:42 +0200
changeset 10187 0376cccd9118
parent 10171 59d6633835fa
child 10538 d1bf9ca9008d
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
9722
a5f86aed785b *** empty log message ***
nipkow
parents: 9721
diff changeset
     1
%
a5f86aed785b *** empty log message ***
nipkow
parents: 9721
diff changeset
     2
\begin{isabellebody}%
9924
3370f6aa3200 updated;
wenzelm
parents: 9834
diff changeset
     3
\def\isabellecontext{natsum}%
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     4
%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     5
\begin{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
     6
\noindent
9541
d17c0b34d5c8 *** empty log message ***
nipkow
parents: 9458
diff changeset
     7
In particular, there are \isa{case}-expressions, for example
d17c0b34d5c8 *** empty log message ***
nipkow
parents: 9458
diff changeset
     8
\begin{isabelle}%
10187
0376cccd9118 *** empty log message ***
nipkow
parents: 10171
diff changeset
     9
\ \ \ \ \ case\ n\ of\ {\isadigit{0}}\ {\isasymRightarrow}\ {\isadigit{0}}\ {\isacharbar}\ Suc\ m\ {\isasymRightarrow}\ m%
9924
3370f6aa3200 updated;
wenzelm
parents: 9834
diff changeset
    10
\end{isabelle}
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    11
primitive recursion, for example%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    12
\end{isamarkuptext}%
9673
1b2d4f995b13 updated;
wenzelm
parents: 9644
diff changeset
    13
\isacommand{consts}\ sum\ {\isacharcolon}{\isacharcolon}\ {\isachardoublequote}nat\ {\isasymRightarrow}\ nat{\isachardoublequote}\isanewline
10187
0376cccd9118 *** empty log message ***
nipkow
parents: 10171
diff changeset
    14
\isacommand{primrec}\ {\isachardoublequote}sum\ {\isadigit{0}}\ {\isacharequal}\ {\isadigit{0}}{\isachardoublequote}\isanewline
9673
1b2d4f995b13 updated;
wenzelm
parents: 9644
diff changeset
    15
\ \ \ \ \ \ \ \ {\isachardoublequote}sum\ {\isacharparenleft}Suc\ n{\isacharparenright}\ {\isacharequal}\ Suc\ n\ {\isacharplus}\ sum\ n{\isachardoublequote}%
8749
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    16
\begin{isamarkuptext}%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    17
\noindent
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    18
and induction, for example%
2665170f104a Adding generated files
nipkow
parents:
diff changeset
    19
\end{isamarkuptext}%
9673
1b2d4f995b13 updated;
wenzelm
parents: 9644
diff changeset
    20
\isacommand{lemma}\ {\isachardoublequote}sum\ n\ {\isacharplus}\ sum\ n\ {\isacharequal}\ n{\isacharasterisk}{\isacharparenleft}Suc\ n{\isacharparenright}{\isachardoublequote}\isanewline
1b2d4f995b13 updated;
wenzelm
parents: 9644
diff changeset
    21
\isacommand{apply}{\isacharparenleft}induct{\isacharunderscore}tac\ n{\isacharparenright}\isanewline
10171
59d6633835fa *** empty log message ***
nipkow
parents: 9924
diff changeset
    22
\isacommand{apply}{\isacharparenleft}auto{\isacharparenright}\isanewline
59d6633835fa *** empty log message ***
nipkow
parents: 9924
diff changeset
    23
\isacommand{done}\isanewline
9722
a5f86aed785b *** empty log message ***
nipkow
parents: 9721
diff changeset
    24
\end{isabellebody}%
9145
9f7b8de5bfaf updated;
wenzelm
parents: 8749
diff changeset
    25
%%% Local Variables:
9f7b8de5bfaf updated;
wenzelm
parents: 8749
diff changeset
    26
%%% mode: latex
9f7b8de5bfaf updated;
wenzelm
parents: 8749
diff changeset
    27
%%% TeX-master: "root"
9f7b8de5bfaf updated;
wenzelm
parents: 8749
diff changeset
    28
%%% End: