Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/Provers/order.ML
changeset 42361 23f352990944
parent 37744 3daaf23b9ab4
child 42364 8c674b3b8e44 
--- a/src/Provers/order.ML	Sat Apr 16 15:47:52 2011 +0200
+++ b/src/Provers/order.ML	Sat Apr 16 16:15:37 2011 +0200
@@ -1225,7 +1225,7 @@
 in
  SUBGOAL (fn (A, n) => fn st =>
   let
-   val thy = ProofContext.theory_of ctxt;
+   val thy = Proof_Context.theory_of ctxt;
    val rfrees = map Free (Term.rename_wrt_term A (Logic.strip_params A));
    val Hs = map prop_of prems @ map (fn H => subst_bounds (rfrees, H)) (Logic.strip_assums_hyp A)
    val C = subst_bounds (rfrees, Logic.strip_assums_concl A)
isabelle