TraversalWitness.fold_value: def of stelliferous@0.0.2.0
Import: import stelliferous@0.0.2.0/proofs/traversal_witness.bend as TraversalWitness
Lines 227-237 of stelliferous@0.0.2.0/proofs/traversal_witness.bend: https://jend.leeeet.dev/read.txt?path=stelliferous@0.0.2.0/proofs/traversal_witness.bend&start_line=227&end_line=237

import Base
import stelliferous@0.0.2.0/traversal_array.bend as Traversal

def fold_value(~Reader: Type,~Element: Data,~Accumulator: Data,~Context: Data,
  ~combine: Accumulator -> Element -> Accumulator,-reader: Reader,-accumulator: Accumulator,+position: U32,context: Context,
  -result: Reader & Element,sample: Sample<Reader,Element,reader,result>) ->
  FoldEvidence<Reader,Accumulator,Context,reader,
    Traversal.fold_value(~Reader,~Element,~Accumulator,~Context,~combine,accumulator,position,context,result)>:
  match sample:
    case Sample{value,equation}:
      %Equal.sym(Reader & Element,result,(reader,value),equation) :
        FoldEvidence<Reader,Accumulator,Context,reader,
          Traversal.fold_value(~Reader,~Element,~Accumulator,~Context,~combine,accumulator,position,context,_)>
      FoldEvidence{combine(accumulator,value),(position + 1 : U32),context,{==}}

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Equal.sym
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Pair
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Sigma
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.add
  https://jend.leeeet.dev/definition.txt?path=stelliferous@0.0.2.0/proofs/traversal_witness.bend&name=FoldEvidence
  https://jend.leeeet.dev/definition.txt?path=stelliferous@0.0.2.0/proofs/traversal_witness.bend&name=Sample
  https://jend.leeeet.dev/definition.txt?path=stelliferous@0.0.2.0/traversal_array.bend&name=fold_value