def law_swap_go_refines

bendtorch-core@0.1.0.0 · src/storage/refinement.bend:206

import Base
import bendtorch-core@0.1.0.0/src/storage/model.bend as Model
import bendtorch-core@0.1.0.0/src/storage/array.bend as Core

206def law_swap_go_refines(-T: Data, d: Nat, array: Array<T>, +n: U32, +i: U32,
207  new: T, z: Bool, valid: Model.Balanced(T, d, array)) ->
208  {first(T, Array.swap.go(T, array, n, i, new, z)) ==
209    Core.write_path(T, d, array, trace(d, n, i, z), new) : Array<T>}:
210  swap_go_written(T, d, array, n, i, z, new, swap_go(T, d, array, n, i, new, z, valid))