def mpow_m

bend-collections-laws-crypto@1.0.0.0 · src/math/w64.bend:637

import Base
import bend-collections-laws-crypto@1.0.0.0/src/math/u64.bend as W

637def mpow_m(+b: W.U64, +e: W.U64, +m: W.U64, +mp: W.U64) -> W.U64:
638  mont(m, mp, mpow_go(140n, m, mp, to_mont(b, m), to_mont(rem(W.U64{1, 0}, m), m), (e, is_zero(e))), W.U64{1, 0})