Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Changed required by new blast_tac (the one that squashes flex-flex pairs)
authorpaulson
Fri, 02 Jan 1998 17:17:24 +0100
changeset 4512 572440df6aa7
parent 4511 93a84eb6c522
child 4513 6de428eac512
Changed required by new blast_tac (the one that squashes flex-flex pairs)
src/ZF/func.ML file | annotate | diff | comparison | revisions 
--- a/src/ZF/func.ML	Fri Jan 02 17:16:39 1998 +0100
+++ b/src/ZF/func.ML	Fri Jan 02 17:17:24 1998 +0100
@@ -329,7 +329,7 @@
 (*Prove the product and domain subgoals using distributive laws*)
 by (asm_full_simp_tac (simpset() addsimps [Pi_iff,extension]@Un_rls) 1);
 by (rewtac function_def);
-by (Blast.depth_tac (claset()) 12 1);	(*9 secs*)
+by (Blast_tac 1);
 qed "fun_disjoint_Un";
 
 goal ZF.thy
isabelle