doc-src/TutorialI/Misc/arith2.thy
author paulson
Wed, 18 Oct 2000 12:30:59 +0200
changeset 10241 e0428c2778f1
parent 10171 59d6633835fa
permissions -rw-r--r--
wellfounded -> well-founded

(*<*)
theory arith2 = Main:;
(*>*)
lemma "min i (max j (k*k)) = max (min (k*k) i) (min i (j::nat))";
apply(arith);
(**)(*<*)
done
end
(*>*)