ProofFastW2.R4: def of lawful-bytes@0.1.1.0
Import: import lawful-bytes@0.1.1.0/proof_fast_w2.bend as ProofFastW2
Lines 290-292 of lawful-bytes@0.1.1.0/proof_fast_w2.bend: https://jend.leeeet.dev/read.txt?path=lawful-bytes@0.1.1.0/proof_fast_w2.bend&start_line=290&end_line=292

import Base

# run_len over the four byte tests of a word.
def R4(e0: Bool, e1: Bool, e2: Bool, e3: Bool) -> Nat:
  Bool.pick(Nat, e0, 0n, Nat.add(1n, Bool.pick(Nat, e1, 0n, Nat.add(1n, Bool.pick(Nat, e2, 0n, Nat.add(1n, Bool.pick(Nat, e3, 0n, Nat.add(1n, 0n))))))))

Uses (4):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool.pick
  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