# HG changeset patch # User haftmann # Date 1744738842 -7200 # Node ID 03d019ee7d022ab99a0a9f154df48bff22266852 # Parent efc1cd04444049d1c0ffe6b419620ccf5abe86fc corrected operation diff -r efc1cd044440 -r 03d019ee7d02 src/HOL/Code_Numeral.thy --- 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]: - \Pos Num.One AND Pos Num.One = Pos Num.One\ + \Pos Num.One OR Pos Num.One = Pos Num.One\ \Pos Num.One OR Pos (Num.Bit0 n) = Pos (Num.Bit1 n)\ \Pos (Num.Bit0 m) OR Pos Num.One = Pos (Num.Bit1 m)\ \Pos Num.One OR Pos (Num.Bit1 n) = Pos (Num.Bit1 n)\