# HG changeset patch
# User wenzelm
# Date 1004487691 -3600
# Node ID da6ee05d9f3d59825c3d746e14e0c8025262ee41
# Parent  c1daefc08eff1789181299e72bd8bc8c08f48068
use HOL.induct_XXX;

diff -r c1daefc08eff -r da6ee05d9f3d src/HOL/Tools/inductive_package.ML
--- a/src/HOL/Tools/inductive_package.ML	Wed Oct 31 01:21:01 2001 +0100
+++ b/src/HOL/Tools/inductive_package.ML	Wed Oct 31 01:21:31 2001 +0100
@@ -72,14 +72,14 @@
 val vimage_name = "Inverse_Image.vimage";
 val Const _ $ (vimage_f $ _) $ _ = HOLogic.dest_Trueprop (Thm.concl_of vimageD);
 
-val inductive_forall_name = "HOL.inductive_forall";
-val inductive_forall_def = thm "inductive_forall_def";
-val inductive_conj_name = "HOL.inductive_conj";
-val inductive_conj_def = thm "inductive_conj_def";
-val inductive_conj = thms "inductive_conj";
-val inductive_atomize = thms "inductive_atomize";
-val inductive_rulify1 = thms "inductive_rulify1";
-val inductive_rulify2 = thms "inductive_rulify2";
+val inductive_forall_name = "HOL.induct_forall";
+val inductive_forall_def = thm "induct_forall_def";
+val inductive_conj_name = "HOL.induct_conj";
+val inductive_conj_def = thm "induct_conj_def";
+val inductive_conj = thms "induct_conj";
+val inductive_atomize = thms "induct_atomize";
+val inductive_rulify1 = thms "induct_rulify1";
+val inductive_rulify2 = thms "induct_rulify2";