~/jendhub

def AP.lt_rw

bend-osdev-array@0.1.0.1 · PROOF.bend:983

import bend-osdev-array@0.1.0.1/PROOF.bend as PROOF
import Base

983def AP.lt_rw(-x: Nat, -y: Nat, -s: Nat, e: {x == y : Nat}, h: {Nat.is_lt(1n+y, s) == True{} : Bool}) -> {Nat.is_lt(1n+x, s) == True{} : Bool}:
984  %Equal.sym(Nat, x, y, e) : {Nat.is_lt(1n+_, s) == True{} : Bool}
985  h

Uses (4)

Used by (1)