ProofList.decb_fits_m: law of lawful-fields@0.1.1.0
Import: import lawful-fields@0.1.1.0/proof_list.bend as ProofList
Lines 452-458 of lawful-fields@0.1.1.0/proof_list.bend: https://jend.leeeet.dev/read.txt?path=lawful-fields@0.1.1.0/proof_list.bend&start_line=452&end_line=458

import Base
import lawful-fields@0.1.1.0/defs.bend as F

law decb_fits_m:
  for +xs: List<&2, U32>
  for +n: Nat
  for +m: Nat
  for +h: {F.dec(xs) == Some{n} : Maybe<&2, Nat>}
  for +hn: {Nat.is_lt(n, m) == True{} : Bool}
  {F.decb(xs, m) == Some{n} : Maybe<&2, Nat>}

Uses (11):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Equal.sym
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Maybe
  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_lt
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=lawful-fields@0.1.1.0/defs.bend&name=dec
  https://jend.leeeet.dev/definition.txt?path=lawful-fields@0.1.1.0/defs.bend&name=decb
  https://jend.leeeet.dev/definition.txt?path=lawful-fields@0.1.1.0/defs.bend&name=decb.of
  https://jend.leeeet.dev/definition.txt?path=lawful-fields@0.1.1.0/proof_list.bend&name=decb_if