changeset 78095 | bc42c074e58f |
parent 74561 | 8e6c973003c8 |
child 78812 | d769a183d51d |
--- a/src/HOL/Tools/inductive_set.ML Tue May 23 10:56:41 2023 +0200 +++ b/src/HOL/Tools/inductive_set.ML Tue May 23 18:46:15 2023 +0200 @@ -494,7 +494,7 @@ [def, @{thm mem_Collect_eq}, @{thm case_prod_conv}]) 1)) in lthy |> Local_Theory.note ((Binding.name (s ^ "p_" ^ s ^ "_eq"), - [Attrib.internal (K pred_set_conv_att)]), + [Attrib.internal \<^here> (K pred_set_conv_att)]), [conv_thm]) |> snd end) (preds ~~ cs ~~ cs_info ~~ defs) lthy2;