BendMlTensorArray.cap_pick: def of bend-ml-tensor-array@0.1.19.0
Import: import bend-ml-tensor-array@0.1.19.0/main.bend as BendMlTensorArray
Lines 565-571 of bend-ml-tensor-array@0.1.19.0/main.bend: https://jend.leeeet.dev/read.txt?path=bend-ml-tensor-array@0.1.19.0/main.bend&start_line=565&end_line=571

import Base

# smallest power of two >= n, by structural recursion on n: returns (depth, 2^depth)
def cap_pick(ok: Bool, d: Nat, +p: Nat) -> Nat & Nat:
  match ok:
    case True{}:
      (d, p)
    case False{}:
      (1n+d, Nat.add(p, p))

Uses (5):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.add
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Pair
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Sigma