def AP.swap_v
import bend-osdev-array@0.1.0.1/PROOF.bend as PROOFimport Base
557def AP.swap_v(-T: Data, t: AP.Tree<T>, n: U32, +i: U32, v: T, z: Bool) -> T:
558 match t z:
559 case APLeaf{x} _:
560 x
561 case APNode{xs, ys} True{}:
562 +h = U32.shr(n)
563 AP.swap_v(T, xs, h, i, v, U32.is_lt(i, U32.shr(h)))
564 case APNode{xs, ys} False{}:
565 +h = U32.shr(n)
566 +j = U32.sub(i, h)
567 AP.swap_v(T, ys, h, j, v, U32.is_lt(j, U32.shr(h)))