Refinement.set_written: def of bendtorch-core@0.1.0.0
Import: import bendtorch-core@0.1.0.0/src/storage/refinement.bend as Refinement
Lines 381-387 of bendtorch-core@0.1.0.0/src/storage/refinement.bend: https://jend.leeeet.dev/read.txt?path=bendtorch-core@0.1.0.0/src/storage/refinement.bend&start_line=381&end_line=387

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

def set_written(-T: Data, -d: Nat, -original: Array<T>, -i: U32, -new: T,
  cert: SwapFull<T, d, original, i, new>) ->
  {Array.set(T, original, i, new) == Core.write_path(T, d, original, route(d, i), new) : Array<T>}:
  match cert:
    case SwapFull{array, old, equal, written, observed, valid}:
      %equal : {Array.set.fin(T, _) == Core.write_path(T, d, original, route(d, i), new) : Array<T>}
      written

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Array
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Array.set
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Array.set.fin
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=bendtorch-core@0.1.0.0/src/storage/array.bend&name=write_path
  https://jend.leeeet.dev/definition.txt?path=bendtorch-core@0.1.0.0/src/storage/refinement.bend&name=SwapFull
  https://jend.leeeet.dev/definition.txt?path=bendtorch-core@0.1.0.0/src/storage/refinement.bend&name=route