--- a/etc/options Thu Apr 17 11:29:15 2014 +0200
+++ b/etc/options Thu Apr 17 11:31:46 2014 +0200
@@ -139,7 +139,7 @@
public option find_theorems_limit : int = 40
-- "limit of displayed results"
-public option find_theorems_tac_limit : int = 5
+public option find_theorems_tactic_limit : int = 5
-- "limit of tactic search for 'solves' criterion"
--- a/src/Pure/Tools/find_theorems.ML Thu Apr 17 11:29:15 2014 +0200
+++ b/src/Pure/Tools/find_theorems.ML Thu Apr 17 11:31:46 2014 +0200
@@ -206,7 +206,7 @@
val goal' = Thm.transfer thy' goal;
fun limited_etac thm i =
- Seq.take (Options.default_int @{system_option find_theorems_tac_limit}) o etac thm i;
+ Seq.take (Options.default_int @{system_option find_theorems_tactic_limit}) o etac thm i;
fun try_thm thm =
if Thm.no_prems thm then rtac thm 1 goal'
else