~/jendhub

def nat_sub_add

bend-osdev-aead@0.1.0.0 · PROOF.bend:98

import bend-osdev-aead@0.1.0.0/PROOF.bend as PROOF
import Base

98def nat_sub_add(+x: Nat, t: Nat) -> {x == Nat.sub(Nat.add(x, t), t) : Nat}:
99  match t:
100    case 0n:
101      %nat_add_zero(x) : {x == Nat.sub(_, 0n) : Nat}
102      nat_sub_zero(x)
103    case 1n+(+u):
104      %nat_add_succ(x, u) : {x == Nat.sub(_, 1n+u) : Nat}
105      nat_sub_add(x, u)

Uses (6)

Used by (1)