changeset 35021 | c839a4c670c6 |
parent 32970 | fbd2bb2489a8 |
child 36610 | bafd82950e24 |
35020:862a20ffa8e2 | 35021:c839a4c670c6 |
---|---|
37 if ! quick_and_dirty |
37 if ! quick_and_dirty |
38 then cheat_tac (ProofContext.theory_of ctxt) st |
38 then cheat_tac (ProofContext.theory_of ctxt) st |
39 else tac args st); |
39 else tac args st); |
40 |
40 |
41 fun prove_global thy xs asms prop tac = |
41 fun prove_global thy xs asms prop tac = |
42 Drule.standard (prove (ProofContext.init thy) xs asms prop tac); |
42 Drule.export_without_context (prove (ProofContext.init thy) xs asms prop tac); |
43 |
43 |
44 end; |
44 end; |