src/Doc/Tutorial/Misc/fakenat.thy
author wenzelm
Fri, 12 Jan 2018 14:08:53 +0100
changeset 67406 23307fd33906
parent 58860 fee7cfa69c50
permissions -rw-r--r--
isabelle update_cartouches -c;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
8745
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     1
(*<*)
58860
fee7cfa69c50 eliminated spurious semicolons;
wenzelm
parents: 56260
diff changeset
     2
theory fakenat imports Main begin
8745
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     3
(*>*)
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     4
67406
23307fd33906 isabelle update_cartouches -c;
wenzelm
parents: 58860
diff changeset
     5
text\<open>\noindent
11418
53a402c10ba9 indexing tweaks
paulson
parents: 9541
diff changeset
     6
The type \tydx{nat} of natural
56260
3d79c132e657 modernized approximation, avoiding bad name binding;
wenzelm
parents: 48985
diff changeset
     7
numbers is predefined to have the constructors \cdx{0} and~\cdx{Suc}.
3d79c132e657 modernized approximation, avoiding bad name binding;
wenzelm
parents: 48985
diff changeset
     8
It behaves approximately as if it were declared like this:
67406
23307fd33906 isabelle update_cartouches -c;
wenzelm
parents: 58860
diff changeset
     9
\<close>
8745
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
    10
56260
3d79c132e657 modernized approximation, avoiding bad name binding;
wenzelm
parents: 48985
diff changeset
    11
datatype nat = zero ("0") | Suc nat
8745
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
    12
(*<*)
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
    13
end
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
    14
(*>*)