doc-src/Tutorial/Misc/arith2.ML
author wenzelm
Sun, 25 Jun 2000 23:46:39 +0200
changeset 9122 addbea344673
parent 6577 a2b5c84d590a
permissions -rw-r--r--
added state: 'a * 'b -> 'a * ('a * 'b);
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
6577
a2b5c84d590a Arithmetic.
nipkow
parents:
diff changeset
     1
Goal "min i (max j (k*k)) = max (min (k*k) i) (min i (j::nat))";