equal
deleted
inserted
replaced
312 val (play_outcome, isar_proof) = |
312 val (play_outcome, isar_proof) = |
313 canonical_isar_proof |
313 canonical_isar_proof |
314 |> tap (trace_isar_proof "Original") |
314 |> tap (trace_isar_proof "Original") |
315 |> compress_isar_proof ctxt compress_isar preplay_data |
315 |> compress_isar_proof ctxt compress_isar preplay_data |
316 |> tap (trace_isar_proof "Compressed") |
316 |> tap (trace_isar_proof "Compressed") |
317 |> tap (trace_isar_proof "Tried0") |
|
318 |> postprocess_isar_proof_remove_unreferenced_steps |
317 |> postprocess_isar_proof_remove_unreferenced_steps |
319 (keep_fastest_method_of_isar_step (!preplay_data) |
318 (keep_fastest_method_of_isar_step (!preplay_data) |
320 #> minimize ? minimize_isar_step_dependencies ctxt preplay_data) |
319 #> minimize ? minimize_isar_step_dependencies ctxt preplay_data) |
321 |> tap (trace_isar_proof "Minimized") |
320 |> tap (trace_isar_proof "Minimized") |
322 |> `(preplay_outcome_of_isar_proof (!preplay_data)) |
321 |> `(preplay_outcome_of_isar_proof (!preplay_data)) |