kernel-Nat.add_div_left
- Kind
- kernel-term
- Status
- checked
Supports: ∀ (x : ℕ) {z : ℕ}, 0 < z → (z + x) / z = x / z + 1
test "$(cargo run -q -p axeyum-lean-kernel --example nat_theorem_inventory -- add_div_left 2>/dev/null | grep -Ec '^Nat\.add_div_left[[:space:]]')" -ge 1 Evidence notes
`build_nat_prelude` admits `Nat.add_div_left` through the trusted `Kernel::add_declaration` gate (declared in `nat_prelude/div_mod_lemmas.rs`'s `declare_add_div_mod_shift_family`). Route: the `add_comm`/`mul_one` bridge onto `div_mod_shift`'s reusable `(n+dd*k)/dd = n/dd+k` fact (itself built from `division.rs`'s `div_mod_exec`/`div_mod_unique`/`div_mod_add_multiple` via `succ_pred_of_pos`), instantiated at `dd:=z`, `n:=x`, `k:=1`. `nat_theorem_inventory`'s rendered type for `Nat.add_div_left` is `(x0:AxNat)->(x1:AxNat)->(x2:Lt zero x1)->Eq (div (add x1 x0) x1) (add (div x0 x1) (succ zero))`, matching this fact's `formal.statement` verbatim (`x0`=x, `x1`=z, `succ zero`=1). `nat_theorem_inventory` exits non-zero for a name that does not exist, and the `grep -c` count (tested `-ge 1`, not piped into `grep -q`) requires the admitted declaration to actually be printed.