def succ_cong

import bend-collections-laws-math@1.0.0.0/proofs/lib/nat.bend as Nat

import Base

20def succ_cong(+a: Nat, +b: Nat, e: {a == b : Nat}) -> {1n+a == 1n+b : Nat}:
21  Equal.cong(Nat, Nat, x => 1n+x, a, b, e)

Uses (2)