equal
deleted
inserted
replaced
9 sig |
9 sig |
10 type preplay_interface = Sledgehammer_Preplay.preplay_interface |
10 type preplay_interface = Sledgehammer_Preplay.preplay_interface |
11 type isar_proof = Sledgehammer_Proof.isar_proof |
11 type isar_proof = Sledgehammer_Proof.isar_proof |
12 val minimize_dependencies_and_remove_unrefed_steps : |
12 val minimize_dependencies_and_remove_unrefed_steps : |
13 bool -> preplay_interface -> isar_proof -> isar_proof |
13 bool -> preplay_interface -> isar_proof -> isar_proof |
14 end |
14 end; |
15 |
15 |
16 structure Sledgehammer_Minimize_Isar : SLEDGEHAMMER_MINIMIZE_ISAR = |
16 structure Sledgehammer_Minimize_Isar : SLEDGEHAMMER_MINIMIZE_ISAR = |
17 struct |
17 struct |
18 |
18 |
19 open Sledgehammer_Util |
19 open Sledgehammer_Util |
103 end |
103 end |
104 in |
104 in |
105 snd (do_proof proof) |
105 snd (do_proof proof) |
106 end |
106 end |
107 |
107 |
108 end |
108 end; |