unfold UInt.getBit
α : Type
inst✝¹ : (n : Nat) → OfNat α n
inst✝ : UInt α
x y : α
i : Nat
⊢ UInt.getBit (x <<< y) i =
    (decide (i < length α) && decide (i ≥ toNat y % length α) && UInt.getBit x (i - toNat y % length α))
α : 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 α))