Retry.delay: def of bend-kit-retry@0.3.0.0
Import: import bend-kit-retry@0.3.0.0/retry.bend as Retry
Lines 198-205 of bend-kit-retry@0.3.0.0/retry.bend: https://jend.leeeet.dev/read.txt?path=bend-kit-retry@0.3.0.0/retry.bend&start_line=198&end_line=205

import Base

# min(cap, base * 2^n), doubled one step at a time, so no step passes cap.
def delay(n: Nat, +base: Nat, +cap: Nat) -> Nat:
  match n:
    case 0n:
      Nat.min(base, cap)
    case 1n+p:
      +d = delay(p, base, cap)
      Nat.min(Nat.add(d, d), cap)

Uses (3):
  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=Nat.min