Retry.half.admit: def of bend-kit-retry@0.3.0.0
Import: import bend-kit-retry@0.3.0.0/retry.bend as Retry
Lines 88-93 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=88&end_line=93

import Base

def half.admit(go: Bool, +k: Nat) -> State & Bool:
  match go:
    case True{}:
      (CircuitHalf{1n+k}, True{})
    case False{}:
      (CircuitHalf{k}, False{})

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=Pair
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Sigma
  https://jend.leeeet.dev/definition.txt?path=bend-kit-retry@0.3.0.0/retry.bend&name=State