changeset 70494 | 41108e3e9ca5 |
parent 69593 | 3dda49e08b9d |
child 80634 | a90ab1ea6458 |
--- a/src/HOL/Tools/BNF/bnf_lfp_compat.ML Fri Aug 09 15:58:26 2019 +0200 +++ b/src/HOL/Tools/BNF/bnf_lfp_compat.ML Fri Aug 09 17:14:49 2019 +0200 @@ -158,7 +158,7 @@ fun prove goal = Goal.prove_sorry ctxt [] [] goal (tac o #context) - |> Thm.close_derivation; + |> Thm.close_derivation \<^here>; in map (map prove) goalss end;