def perm_big

bend-collections-laws-math@1.0.0.0 · src/math/generic.bend:471

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

471def perm_big(~T: Data, ~op: N.Op<T> -> T, ~test: N.Test<T> -> Bool, +n: T, +k: T, big: Bool) -> Result<&2, &2, N.NumError, T>:
472  match big:
473    case True{}:
474      Done{op(N.ZeroOp{})}
475    case False{}:
476      ok(T, perm_go(~T, ~op, ~test, fuel(), k, n, (op(N.One{}), True{}), Bool.not(test(N.IsZero{k}))))