def ns.le_succ_self
import bend-osdev-word64@0.1.1.0/proof_shift.bend as ProofShiftimport Base
67def ns.le_succ_self(x: Nat) -> {Nat.is_le(x, 1n+x) == True{} : Bool}:
68 match x:
69 case 0n:
70 {==}
71 case 1n+ +p:
72 ns.le_succ_self(p)