Edges in order with their positions, for folds that need the slot index.
152def nativePeerEdgesFold =
153 (lambda unrestricted edges : (family StdList (family NativePeerEdge)) .
154 (lambda unrestricted step : (pi unrestricted index : Nat . (pi unrestricted edge : (family NativePeerEdge) . (pi unrestricted rest : (family NativePhysicalCommands) . (family NativePhysicalCommands)))) .
155 (lambda unrestricted tail : (family NativePhysicalCommands) .
156 (stdListFold
157 (family NativePeerEdge)
158 (pi unrestricted index : Nat . (family NativePhysicalCommands))
159 (lambda unrestricted edge : (family NativePeerEdge) .
160 (lambda unrestricted next : (pi unrestricted index : Nat . (family NativePhysicalCommands)) .
161 (lambda unrestricted index : Nat . (step index edge (next (succ index))))))
162 (lambda unrestricted index : Nat . tail)
163 edges
164 0))))The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.