author | wenzelm |
Fri, 01 Sep 2000 00:28:27 +0200 | |
changeset 9769 | a73540153a73 |
parent 9768 | a589b1d75b7b |
child 9770 | 5258ef87e85a |
src/HOL/Set.ML | file | annotate | diff | comparison | revisions |
--- a/src/HOL/Set.ML Fri Sep 01 00:28:06 2000 +0200 +++ b/src/HOL/Set.ML Fri Sep 01 00:28:27 2000 +0200 @@ -785,7 +785,7 @@ fun gen_rulify_prems x = Attrib.no_args (Drule.rule_attribute (fn _ => (standard o - rule_by_tactic (REPEAT (ALLGOALS (resolve_tac [allI, ballI, impI])))))) x; + rule_by_tactic (REPEAT (FIRSTGOAL (resolve_tac [allI, ballI, impI])))))) x; in