add missing goal argument
authorblanchet
Thu, 01 Apr 2010 11:12:08 +0200
changeset 36068 323349b45850
parent 36067 3a074096f83a
child 36072 bcfdfc660991
add missing goal argument
src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML
--- 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