~/jendhub

def cancel_offset_le

stelliferous@0.0.2.0 · proofs/nat_order.bend:15

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

15def cancel_offset_le(+offset: Nat,+left: Nat,+right: Nat,ordered: {Nat.is_le(Nat.add(offset,left),Nat.add(offset,right)) == True{} : Bool}) ->
16  {Nat.is_le(left,right) == True{} : Bool}:
17  match offset:
18    case 0n: ordered
19    case 1n+previous: cancel_offset_le(previous,left,right,ordered)

Uses (4)

Used by (1)