def cong_r

bend-collections-laws-crypto@1.0.0.0 · proofs/math/typed/w64mul.bend:103

import Base

103def cong_r(+z: Nat, +x: Nat, +y: Nat, +e: {x == y : Nat}) -> {Nat.add(z, x) == Nat.add(z, y) : Nat}:
104  Equal.cong(Nat, Nat, t => Nat.add(z, t), x, y, e)