--- a/src/HOL/Tools/Sledgehammer/sledgehammer_minimize.ML Wed Sep 01 16:11:48 2010 +0200
+++ b/src/HOL/Tools/Sledgehammer/sledgehammer_minimize.ML Wed Sep 01 16:46:11 2010 +0200
@@ -13,7 +13,8 @@
val minimize_theorems :
params -> int -> int -> Proof.state -> ((string * locality) * thm list) list
-> ((string * locality) * thm list) list option * string
- val run_minimize : params -> int -> Facts.ref list -> Proof.state -> unit
+ val run_minimize :
+ params -> int -> (Facts.ref * Attrib.src list) list -> Proof.state -> unit
end;
structure Sledgehammer_Minimize : SLEDGEHAMMER_MINIMIZE =