src/Provers/quantifier1.ML
changeset 36610 bafd82950e24
parent 35762 af3ff2ba4c54
child 38452 abc655166d61
child 38456 6769ccd90ad6
--- a/src/Provers/quantifier1.ML	Mon May 03 07:59:51 2010 +0200
+++ b/src/Provers/quantifier1.ML	Mon May 03 14:25:56 2010 +0200
@@ -113,7 +113,7 @@
   in exqu [] end;
 
 fun prove_conv tac thy tu =
-  Goal.prove (ProofContext.init thy) [] [] (Logic.mk_equals tu)
+  Goal.prove (ProofContext.init_global thy) [] [] (Logic.mk_equals tu)
     (K (rtac iff_reflection 1 THEN tac));
 
 fun qcomm_tac qcomm qI i = REPEAT_DETERM (rtac qcomm i THEN rtac qI i)