doc-src/TutorialI/Misc/pairs.thy
author nipkow
Fri, 02 Jun 2000 15:19:18 +0200
changeset 9016 d61c76716984
parent 8745 13b32661dde4
child 9541 d17c0b34d5c8
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
8745
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     1
(*<*)
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     2
theory pairs = Main:;
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     3
term(*>*) "let (x,y) = f z in (y,x)";
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     4
(*<*)
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     5
term(*>*) "case xs of [] \\<Rightarrow> 0 | (x,y)#zs \\<Rightarrow> x+y"
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     6
(**)(*<*)
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     7
end
13b32661dde4 I wonder which files i forgot.
nipkow
parents:
diff changeset
     8
(*>*)