def wd.nz

bend-osdev-word64@0.1.1.0 · PROOF_div.bend:131

import Base

131def wd.nz(x: Nat, e: {Nat.is_eq(x, 0n) == False{} : Bool}) -> {Nat.is_lt(0n, x) == True{} : Bool}:
132  match x:
133    case 0n:
134      Empty.absurd({Nat.is_lt(0n, 0n) == True{} : Bool}, wn.tf(e))
135    case 1n+ +p:
136      {==}