def steps_next

bendtorch-core@0.1.0.0 · src/tensor/contracts/pointwise_proof.bend:78

import Base
import bendtorch-core@0.1.0.0/src/storage/arith.bend as Arith

78def steps_next(+cursor: Nat, +rest: Nat, +end: Nat, steps: {Nat.add(cursor, 1n+rest) == end : Nat}) ->
79  {Nat.add(1n+cursor, rest) == end : Nat}:
80  Equal.trans(Nat, 1n+Nat.add(cursor, rest), Nat.add(cursor, 1n+rest), end,
81    Equal.sym(Nat, Nat.add(cursor, 1n+rest), 1n+Nat.add(cursor, rest), Arith.add_succ(cursor, rest)), steps)