def AP.lt_rw_l
import bend-osdev-array@0.1.0.1/PROOF.bend as PROOFimport Base
1010def AP.lt_rw_l(-x: Nat, -y: Nat, -m: Nat, e: {x == y : Nat}, h: {Nat.is_lt(y, m) == True{} : Bool}) -> {Nat.is_lt(x, m) == True{} : Bool}:
1011 %Equal.sym(Nat, x, y, e) : {Nat.is_lt(_, m) == True{} : Bool}
1012 h