equal
deleted
inserted
replaced
320 |> tap (trace_isar_proof "Compressed") |
320 |> tap (trace_isar_proof "Compressed") |
321 |> postprocess_isar_proof_remove_unreferenced_steps |
321 |> postprocess_isar_proof_remove_unreferenced_steps |
322 (keep_fastest_method_of_isar_step (!preplay_data) |
322 (keep_fastest_method_of_isar_step (!preplay_data) |
323 #> minimize ? minimize_isar_step_dependencies ctxt preplay_data) |
323 #> minimize ? minimize_isar_step_dependencies ctxt preplay_data) |
324 |> tap (trace_isar_proof "Minimized") |
324 |> tap (trace_isar_proof "Minimized") |
|
325 |> minimize |
|
326 ? (compress_isar_proof ctxt compress_isar preplay_data |
|
327 #> tap (trace_isar_proof "Compressed again")) |
325 |> `(preplay_outcome_of_isar_proof (!preplay_data)) |
328 |> `(preplay_outcome_of_isar_proof (!preplay_data)) |
326 ||> (comment_isar_proof comment_of |
329 ||> (comment_isar_proof comment_of |
327 #> chain_isar_proof |
330 #> chain_isar_proof |
328 #> kill_useless_labels_in_isar_proof |
331 #> kill_useless_labels_in_isar_proof |
329 #> relabel_isar_proof_nicely) |
332 #> relabel_isar_proof_nicely) |