law cut_bounds

lawful-fields@0.1.1.0 · LAWS.bend:39

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

39# Every end lies in from .. to.
40law cut_bounds:
41  for b: D.Bytes
42  for d: Nat
43  for from: U32
44  for to: U32
45  for sep: U32
46  for n: Nat
47  for h: {D.ok(b, d) == True{} : Bool}
48  for hft: {U32.is_le(from, to) == True{} : Bool}
49  for ht: {Nat.is_le(U32.to_nat(to), D.size(b)) == True{} : Bool}
50  for hs: {U32.is_lt(sep, 256) == True{} : Bool}
51  {F.within(Pair.snd(D.Bytes, List<&2, U32>, C.cut(b, from, to, sep, n)), U32.to_nat(from), U32.to_nat(to)) == True{} : Bool}