law pbc

lawful-fields@0.1.1.0 · proof_cut.bend:526

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

526law pbc:
527  for +x: U32
528  for +t: List<&2, U32>
529  for +xs: List<&2, U32>
530  for +s: Nat
531  for +sep: U32
532  for +b: Bool
533  for +hb: {U32.is_eq(x, sep) == b : Bool}
534  for +hg: {List.get(&2, U32, xs, s) == Some{x} : Maybe<&2, U32>}
535  for +ih: {PN(F.ends(F.split(t, sep), Nat.add(s, 1n)), xs, Nat.add(s, 1n)) == F.split(t, sep) : List<&2, List<&2, U32>>}
536  {PN(F.ends(F.split(x <> t, sep), s), xs, s) == F.split(x <> t, sep) : List<&2, List<&2, U32>>}