Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/HOL/HOLCF/Tools/Domain/domain_induction.ML
changeset 59826 442b09c0f898
parent 59780 23b67731f4f0
child 60754 02924903a6fd 
--- a/src/HOL/HOLCF/Tools/Domain/domain_induction.ML	Fri Mar 27 11:38:26 2015 +0100
+++ b/src/HOL/HOLCF/Tools/Domain/domain_induction.ML	Fri Mar 27 17:46:08 2015 +0100
@@ -176,7 +176,7 @@
           val tacs1 = [
             quant_tac ctxt 1,
             simp_tac (put_simpset HOL_ss ctxt) 1,
-            Induct_Tacs.induct_tac ctxt [[SOME "n"]] 1,
+            Induct_Tacs.induct_tac ctxt [[SOME "n"]] NONE 1,
             simp_tac (put_simpset take_ss ctxt addsimps prems) 1,
             TRY (safe_tac (put_claset HOL_cs ctxt))]
           fun con_tac _ =
isabelle