def divides_right

bend-collections-laws-crypto@1.0.0.0 · proofs/math/natural/proof.bend:42

import Base
import bend-collections-laws-crypto@1.0.0.0/spec/math/natural.bend as S
import bend-collections-laws-crypto@1.0.0.0/proofs/math/natural/gcd.bend as G

42def divides_right(+a: Nat, +b: Nat) -> S.Gcd.divides_right(a, b):
43  (G.wr(G.ws(b, a, b)), G.gcd_dvd_right(a, b))