~/jendhub

def ndiv

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/u64int.bend:1236

import bend-collections-laws-math@1.0.0.0/proofs/math/typed/u64int.bend as U64int
import Base

1236def ndiv(+a: Nat, +b: Nat, +na: Nat, +nb: Nat, +ha: {a == na : Nat}, +hb: {b == nb : Nat}) -> {Nat.div(a, b) == Nat.div(na, nb) : Nat}:
1237  Equal.trans(Nat, Nat.div(a, b), Nat.div(na, b), Nat.div(na, nb), Equal.cong(Nat, Nat, t => Nat.div(t, b), a, na, ha), Equal.cong(Nat, Nat, t => Nat.div(na, t), b, nb, hb))

Uses (4)

Used by (1)