def wn.sub_add_l
import bend-osdev-word64@0.1.1.0/proof_value.bend as ProofValueimport Base
78def wn.sub_add_l(y: Nat, +r: Nat) -> {Nat.sub(Nat.add(y, r), y) == r : Nat}:
79 match y:
80 case 0n:
81 match r:
82 case 0n:
83 {==}
84 case 1n+q:
85 {==}
86 case 1n+q:
87 wn.sub_add_l(q, r)