ProofList.pl_r_hit: law of lawful-bytes@0.1.1.0
Import: import lawful-bytes@0.1.1.0/proof_list.bend as ProofList
Lines 149-156 of lawful-bytes@0.1.1.0/proof_list.bend: https://jend.leeeet.dev/read.txt?path=lawful-bytes@0.1.1.0/proof_list.bend&start_line=149&end_line=156

import Base
import lawful-bytes@0.1.1.0/defs.bend as D

# Short of the end, the run stops at a c.
law pl_r_hit:
  for +zs: List<&2, U32>
  for +n: Nat
  for +c: U32
  for +ht: {Nat.is_le(n, List.length(&2, U32, zs)) == True{} : Bool}
  for +hlt: {Nat.is_lt(D.run_len(List.take(&2, U32, zs, n), c), n) == True{} : Bool}
  {D.has(zs, D.run_len(List.take(&2, U32, zs, n), c), c) == True{} : Bool}

Uses (14):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Empty.absurd
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List.length
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List.take
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.is_le
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.is_lt
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.is_eq
  https://jend.leeeet.dev/definition.txt?path=lawful-bytes@0.1.1.0/defs.bend&name=has
  https://jend.leeeet.dev/definition.txt?path=lawful-bytes@0.1.1.0/defs.bend&name=run_len
  https://jend.leeeet.dev/definition.txt?path=lawful-bytes@0.1.1.0/proof_list.bend&name=pl_ft
  https://jend.leeeet.dev/definition.txt?path=lawful-bytes@0.1.1.0/proof_list.bend&name=pl_r_hit_step