author | paulson |
Fri, 02 May 1997 10:19:19 +0200 | |
changeset 3093 | c9419211e542 |
parent 3092 | b92a1b50b16b |
child 3094 | 76aa0d5554f0 |
src/ZF/func.ML | file | annotate | diff | comparison | revisions |
--- a/src/ZF/func.ML Fri May 02 10:18:50 1997 +0200 +++ b/src/ZF/func.ML Fri May 02 10:19:19 1997 +0200 @@ -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) 11 1); (*11 secs*) +by (Blast.depth_tac (!claset) 12 1); (*9 secs*) qed "fun_disjoint_Un"; goal ZF.thy