generalize hgo : go aig input distance curr hcurr s = res
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
distance : Nat
input : aig.RefStream w
assign : α → Bool
curr : Nat
hcurr : curr ≤ w
s : aig.RefStream curr
idx : Nat
hidx1 : idx < w
hidx2 : curr ≤ idx
⊢ ⟦{ aig := (go aig input distance curr hcurr s).aig,
        ref := (go aig input distance curr hcurr s).stream.getRef idx hidx1 },
      assign⟧ =
    if hidx : idx < distance then false else ⟦{ aig := aig, ref := input.getRef (idx - distance) ⋯ }, assign⟧
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
distance : Nat
input : aig.RefStream w
assign : α → Bool
curr : Nat
hcurr : curr ≤ w
s : aig.RefStream curr
idx : Nat
hidx1 : idx < w
hidx2 : curr ≤ idx
res : RefStreamEntry α w
hgo : go aig input distance curr hcurr s = res
⊢ ⟦{ aig := res.aig, ref := res.stream.getRef idx hidx1 }, assign⟧ =
    if hidx : idx < distance then false else ⟦{ aig := aig, ref := input.getRef (idx - distance) ⋯ }, assign⟧