def cong_l

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

import Base

100def cong_l(+x: Nat, +y: Nat, +z: Nat, +e: {x == y : Nat}) -> {Nat.add(x, z) == Nat.add(y, z) : Nat}:
101  Equal.cong(Nat, Nat, t => Nat.add(t, z), x, y, e)