--- a/src/HOL/List.thy Wed Jun 04 09:52:40 2025 +0200
+++ b/src/HOL/List.thy Wed Jun 04 19:43:13 2025 +0000
@@ -8279,8 +8279,8 @@
by simp
lemma subset_code [code]:
- "set xs \<le> B \<longleftrightarrow> (\<forall>x\<in>set xs. x \<in> B)"
- "A \<le> List.coset ys \<longleftrightarrow> (\<forall>y\<in>set ys. y \<notin> A)"
+ "set xs \<subseteq> B \<longleftrightarrow> (\<forall>x\<in>set xs. x \<in> B)"
+ "A \<subseteq> List.coset ys \<longleftrightarrow> (\<forall>y\<in>set ys. y \<notin> A)"
"List.coset [] \<subseteq> set [] \<longleftrightarrow> False"
by auto