def model_map_step

stelliferous@0.0.2.0 · proofs/traversal_array_refinement.bend:143

import Base
import stelliferous@0.0.2.0/traversal_array.bend as Traversal
import stelliferous@0.0.2.0/proofs/storage_tree_model.bend as Tree

143def model_map_step(~Element: Data,~Context: Data,~map: Context -> U32 -> Element -> Element,
144  state: Traversal.State<&2,&2,Unit,Tree.Tree<Element>,Context>) -> Traversal.State<&2,&2,Unit,Tree.Tree<Element>,Context>:
145  Traversal.State{Unit{},+output,+position,+context} = state
146  Traversal.State{Unit{},Tree.write(Element,output,position,map(context,position,Tree.read(Element,output,position))),
147    (position + 1 : U32),context}