doc-src/TutorialI/Misc/document/Plus.tex
author wenzelm
Sat, 11 Mar 2006 17:30:35 +0100
changeset 19249 86c73395c99b
parent 17187 45bee2f6e61f
child 27015 f8537d69f514
permissions -rw-r--r--
renamed plus to add;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
13305
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
     1
%
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
     2
\begin{isabellebody}%
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
     3
\def\isabellecontext{Plus}%
17056
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
     4
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
     5
\isadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
     6
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
     7
\endisadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
     8
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
     9
\isatagtheory
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    10
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    11
\endisatagtheory
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    12
{\isafoldtheory}%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    13
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    14
\isadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    15
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    16
\endisadelimtheory
13305
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    17
%
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    18
\begin{isamarkuptext}%
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    19
\noindent Define the following addition function%
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    20
\end{isamarkuptext}%
17175
1eced27ee0e1 updated;
wenzelm
parents: 17056
diff changeset
    21
\isamarkuptrue%
1eced27ee0e1 updated;
wenzelm
parents: 17056
diff changeset
    22
\isacommand{consts}\isamarkupfalse%
19249
86c73395c99b renamed plus to add;
wenzelm
parents: 17187
diff changeset
    23
\ add\ {\isacharcolon}{\isacharcolon}\ {\isachardoublequoteopen}nat\ {\isasymRightarrow}\ nat\ {\isasymRightarrow}\ nat{\isachardoublequoteclose}\isanewline
17175
1eced27ee0e1 updated;
wenzelm
parents: 17056
diff changeset
    24
\isacommand{primrec}\isamarkupfalse%
1eced27ee0e1 updated;
wenzelm
parents: 17056
diff changeset
    25
\isanewline
19249
86c73395c99b renamed plus to add;
wenzelm
parents: 17187
diff changeset
    26
{\isachardoublequoteopen}add\ m\ {\isadigit{0}}\ {\isacharequal}\ m{\isachardoublequoteclose}\isanewline
86c73395c99b renamed plus to add;
wenzelm
parents: 17187
diff changeset
    27
{\isachardoublequoteopen}add\ m\ {\isacharparenleft}Suc\ n{\isacharparenright}\ {\isacharequal}\ add\ {\isacharparenleft}Suc\ m{\isacharparenright}\ n{\isachardoublequoteclose}%
13305
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    28
\begin{isamarkuptext}%
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    29
\noindent and prove%
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    30
\end{isamarkuptext}%
17175
1eced27ee0e1 updated;
wenzelm
parents: 17056
diff changeset
    31
\isamarkuptrue%
17056
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    32
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    33
\isadelimproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    34
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    35
\endisadelimproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    36
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    37
\isatagproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    38
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    39
\endisatagproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    40
{\isafoldproof}%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    41
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    42
\isadelimproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    43
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    44
\endisadelimproof
17175
1eced27ee0e1 updated;
wenzelm
parents: 17056
diff changeset
    45
\isacommand{lemma}\isamarkupfalse%
19249
86c73395c99b renamed plus to add;
wenzelm
parents: 17187
diff changeset
    46
\ {\isachardoublequoteopen}add\ m\ n\ {\isacharequal}\ m{\isacharplus}n{\isachardoublequoteclose}%
17056
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    47
\isadelimproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    48
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    49
\endisadelimproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    50
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    51
\isatagproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    52
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    53
\endisatagproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    54
{\isafoldproof}%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    55
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    56
\isadelimproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    57
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    58
\endisadelimproof
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    59
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    60
\isadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    61
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    62
\endisadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    63
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    64
\isatagtheory
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    65
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    66
\endisatagtheory
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    67
{\isafoldtheory}%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    68
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    69
\isadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    70
%
05fc32a23b8b updated;
wenzelm
parents: 16069
diff changeset
    71
\endisadelimtheory
13305
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    72
\end{isabellebody}%
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    73
%%% Local Variables:
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    74
%%% mode: latex
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    75
%%% TeX-master: "root"
f88d0c363582 *** empty log message ***
nipkow
parents:
diff changeset
    76
%%% End: