new example
authorpaulson
Mon, 07 Sep 1998 10:45:45 +0200
changeset 5431 d50c2783f941
parent 5430 4a179dba527a
child 5432 983b9bf8e89f
new example
src/ZF/ex/misc.ML
--- a/src/ZF/ex/misc.ML	Mon Sep 07 10:43:31 1998 +0200
+++ b/src/ZF/ex/misc.ML	Mon Sep 07 10:45:45 1998 +0200
@@ -9,6 +9,11 @@
 
 writeln"ZF/ex/misc";
 
+(*trivial example of term synthesis: apparently hard for some provers!*)
+Goal "a ~= b ==> a:?X & b ~: ?X";
+by (Blast_tac 1);
+result();
+
 (*Nice Blast_tac benchmark.  Proved in 0.3s; old tactics can't manage it!*)
 Goal "ALL x:S. ALL y:S. x<=y ==> EX z. S <= {z}";
 by (Blast_tac 1);