induction n <;> simp [addSeqAux, *]
α β α' β' : Type
γ : β → Type
x y : ℕ → Bool
n : ℕ
⊢ (addSeqAux x y n).snd =
    propagateCarry (fun x => false)
      (fun carry bits x => bits true && bits false || bits false && carry () || bits true && carry ())
      (fun b => bif b then x else y) n ()
no goals