Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
strengthen tactic w.r.t. let
authorblanchet
Wed, 02 Oct 2013 10:39:01 +0200
changeset 54024 07ab4fd922c2
parent 54023 cede3c1d2417
child 54025 70bc41e7a91e
strengthen tactic w.r.t. let
src/HOL/BNF/Tools/bnf_fp_rec_sugar_tactics.ML file | annotate | diff | comparison | revisions 
--- a/src/HOL/BNF/Tools/bnf_fp_rec_sugar_tactics.ML	Wed Oct 02 10:34:13 2013 +0200
+++ b/src/HOL/BNF/Tools/bnf_fp_rec_sugar_tactics.ML	Wed Oct 02 10:39:01 2013 +0200
@@ -62,7 +62,8 @@
   end;
 
 fun mk_primcorec_prelude ctxt defs thm =
-  unfold_thms_tac ctxt defs THEN HEADGOAL (rtac thm) THEN unfold_thms_tac ctxt @{thms split};
+  unfold_thms_tac ctxt defs THEN HEADGOAL (rtac thm) THEN
+  unfold_thms_tac ctxt @{thms Let_def split};
 
 fun mk_primcorec_disc_tac ctxt defs disc_corec k m exclsss =
   mk_primcorec_prelude ctxt defs disc_corec THEN mk_primcorec_cases_tac ctxt k m exclsss;
isabelle