def nat_add_succ

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

import Base

83def nat_add_succ(x: Nat, +t: Nat) -> {1n+Nat.add(x, t) == Nat.add(x, 1n+t) : Nat}:
84  match x:
85    case 0n:
86      {==}
87    case 1n+p:
88      %nat_add_succ(p, t) : {1n+1n+Nat.add(p, t) == 1n+_ : Nat}
89      {==}