def fold_mul

bend-collections-laws-crypto@1.0.0.0 · spec/math/generic.bend:249

import Base
import bend-collections-laws-crypto@1.0.0.0/src/math/num.bend as N

249def fold_mul(~T: Data, ~op: N.Op<T> -> T, xs: List<&2, T>, +acc: T) -> T:
250  match xs:
251    case Nil{}:
252      acc
253    case Con{+x, t}:
254      fold_mul(~T, ~op, t, op(N.Mul{acc, x}))