Util.bit: def of unified-nsga-iii@0.2.2.0
Import: import unified-nsga-iii@0.2.2.0/util.bend as Util
Lines 111-118 of unified-nsga-iii@0.2.2.0/util.bend: https://jend.leeeet.dev/read.txt?path=unified-nsga-iii@0.2.2.0/util.bend&start_line=111&end_line=118

import Base

# 1 when i is a valid bin of a length-n histogram, else 0.
# List.set (and therefore inc_at) is a no-op at i >= n.
def bit(b: Bool) -> Nat:
  match b:
    case True{}:
      1n
    case False{}:
      0n

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