rw [UInt.toNat_shiftLeft, Nat.getBit_mod_two_pow, Nat.shiftLeft_getBit, Bool.and_assoc]
α : Type
inst✝¹ : (n : Nat) → OfNat α n
inst✝ : UInt α
x y : α
i : Nat
⊢ Nat.getBit (toNat (x <<< y)) i =
    (decide (i < length α) && decide (i ≥ toNat y % length α) && Nat.getBit (toNat x) (i - toNat y % length α))
no goals