def add_one

stelliferous@0.0.2.0 · proofs/nat_to_u32_bounds.bend:29

import Base
import stelliferous@0.0.2.0/proofs/u32_successor.bend as U32Successor

29def add_one(+i: U32) -> {U32.add(i,1) == U32.inc(i) : U32}:
30  match i:
31    case U32{+w}:
32      %U32Successor.add_one(32n,w) : {U32{Word.add(32n,w,Word.inc(32n,Word.zero(32n)))} == U32{_} : U32}
33      {==}