changeset 25289 | 3d332d8a827c |
parent 25222 | 78943ac46f6d |
child 25361 | 1aa441e48496 |
--- a/src/HOL/Tools/function_package/fundef_datatype.ML Mon Nov 05 20:50:41 2007 +0100 +++ b/src/HOL/Tools/function_package/fundef_datatype.ML Mon Nov 05 20:50:42 2007 +0100 @@ -306,7 +306,7 @@ lthy |> FundefPackage.add_fundef fixes statements config flags |> by_pat_completeness_simp - |> (fn lthy => LocalTheory.reinit lthy (ProofContext.theory_of lthy)) + |> LocalTheory.reinit |> termination_by_lexicographic_order val _ =