--- a/src/HOL/Code_Numeral.thy Tue Apr 15 19:40:39 2025 +0200
+++ b/src/HOL/Code_Numeral.thy Tue Apr 15 19:40:42 2025 +0200
@@ -642,7 +642,7 @@
by (transfer; simp)+
lemma or_integer_code [code]:
- \<open>Pos Num.One AND Pos Num.One = Pos Num.One\<close>
+ \<open>Pos Num.One OR Pos Num.One = Pos Num.One\<close>
\<open>Pos Num.One OR Pos (Num.Bit0 n) = Pos (Num.Bit1 n)\<close>
\<open>Pos (Num.Bit0 m) OR Pos Num.One = Pos (Num.Bit1 m)\<close>
\<open>Pos Num.One OR Pos (Num.Bit1 n) = Pos (Num.Bit1 n)\<close>