src/HOL/UNITY/UNITY_tactics.ML
changeset 27239 f2f42f9fa09d
parent 27208 5fe899199f85
child 30610 bcbc34cb9749
--- a/src/HOL/UNITY/UNITY_tactics.ML	Mon Jun 16 17:56:08 2008 +0200
+++ b/src/HOL/UNITY/UNITY_tactics.ML	Mon Jun 16 22:13:39 2008 +0200
@@ -41,9 +41,9 @@
                                     @{thm EnsuresI}, @{thm ensuresI}] 1),
               (*now there are two subgoals: co & transient*)
               simp_tac (ss addsimps [@{thm mk_total_program_def}]) 2,
-              RuleInsts.res_inst_tac (Simplifier.the_context ss)
+              res_inst_tac (Simplifier.the_context ss)
                 [(("act", 0), sact)] @{thm totalize_transientI} 2
-              ORELSE RuleInsts.res_inst_tac (Simplifier.the_context ss)
+              ORELSE res_inst_tac (Simplifier.the_context ss)
                 [(("act", 0), sact)] @{thm transientI} 2,
                  (*simplify the command's domain*)
               simp_tac (ss addsimps [@{thm Domain_def}]) 3,