# HG changeset patch # User wenzelm # Date 1006299246 -3600 # Node ID 3949e7aba298108476315fbc86b2740b8f2f6106 # Parent 5da24e7e9aba00f7ecca15587bdac9b2330d0598 Set.vimage; diff -r 5da24e7e9aba -r 3949e7aba298 src/HOL/Tools/inductive_package.ML --- a/src/HOL/Tools/inductive_package.ML Wed Nov 21 00:33:40 2001 +0100 +++ b/src/HOL/Tools/inductive_package.ML Wed Nov 21 00:34:06 2001 +0100 @@ -68,7 +68,7 @@ val mono_name = "HOL.mono"; val gfp_name = "Gfp.gfp"; val lfp_name = "Lfp.lfp"; -val vimage_name = "Inverse_Image.vimage"; +val vimage_name = "Set.vimage"; val Const _ $ (vimage_f $ _) $ _ = HOLogic.dest_Trueprop (Thm.concl_of vimageD); val inductive_forall_name = "HOL.induct_forall";