def high_le

bendtorch-core@0.1.0.0 · src/storage/route.bend:289

import Base
import bendtorch-core@0.1.0.0/src/storage/size.bend as Size
import bendtorch-core@0.1.0.0/src/storage/arith.bend as Arith

289def high_le(+p: Nat, +i: U32, +h: {Nat.is_le(1n+p, 20n) == True{} : Bool},
290  +dz: {False{} == U32.is_lt(i, U32.shr(Size.capacity(1n+p))) : Bool}) ->
291  {Nat.is_le(U32.to_nat(Size.capacity(p)), U32.to_nat(i)) == True{} : Bool}:
292  Arith.not_lt_le(U32.to_nat(i), U32.to_nat(Size.capacity(p)), high_not_lt(p, i, h, dz))