~/jendhub

def offset_lt

stelliferous@0.0.2.0 · proofs/nat_order.bend:146

import stelliferous@0.0.2.0/proofs/nat_order.bend as NatOrder
import Base

146def offset_lt(+offset: Nat,+left: Nat,+right: Nat,ordered: {Nat.is_lt(left,right) == True{} : Bool}) ->
147  {Nat.is_lt(Nat.add(offset,left),Nat.add(offset,right)) == True{} : Bool}:
148  match offset:
149    case 0n: ordered
150    case 1n+rest: offset_lt(rest,left,right,ordered)

Uses (4)

Used by (1)