--- a/src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML Thu Apr 01 10:54:21 2010 +0200
+++ b/src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML Thu Apr 01 11:12:08 2010 +0200
@@ -391,7 +391,7 @@
|> Option.map (fst o read_int o explode)
|> the_default 5
val params = default_params thy [("minimize_timeout", Int.toString timeout)]
- val minimize = minimize_theorems params linear_minimize prover prover_name
+ val minimize = minimize_theorems params linear_minimize prover prover_name 1
val _ = log separator
in
case minimize st (these (!named_thms)) of