src/HOL/Analysis/Abstract_Topology.thy
changeset 78250 400aecdfd71f
parent 78248 740b23f1138a
child 78320 eb9a9690b8f5
--- a/src/HOL/Analysis/Abstract_Topology.thy	Mon Jul 03 16:46:37 2023 +0100
+++ b/src/HOL/Analysis/Abstract_Topology.thy	Tue Jul 04 12:53:01 2023 +0100
@@ -4490,7 +4490,7 @@
   next
     case (Basis s)
     then show ?case
-      by (simp add: Sup_upper arbitrary_union_of_inc finite'_intersection_of_inc relative_to_subset)
+      by (simp add: Sup_upper arbitrary_union_of_inc finite'_intersection_of_inc relative_to_subset_inc)
   qed auto
 next
   fix A