Hairpin.clock: def of bend-kit-hairpin@0.14.0.0
Import: import bend-kit-hairpin@0.14.0.0/hairpin.bend as Hairpin
Lines 194-200 of bend-kit-hairpin@0.14.0.0/hairpin.bend: https://jend.leeeet.dev/read.txt?path=bend-kit-hairpin@0.14.0.0/hairpin.bend&start_line=194&end_line=200

import Base
import bend-kit-time@0.3.0.0/time.bend as Time

# The clock, read only when a decision depends on it; 0 otherwise, which no such decision reads.
def clock(need: Bool) -> IO(Nat):
  match need:
    case True{}:
      Time.mono.ms()
    case False{}:
      IO.pure(Nat, 0n)

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=IO
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=IO.pure
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=bend-kit-time@0.3.0.0/time.bend&name=mono.ms