kernel-Nat.clog_mono
- Kind
- kernel-term
- Status
- checked
Supports: ∀ {b c m n : ℕ}, 1 < c → c ≤ b → m ≤ n → Nat.clog b m ≤ Nat.clog c n
test "$(cargo run -q -p axeyum-lean-kernel --example nat_theorem_inventory -- clog_mono 2>/dev/null | grep -Ec '^Nat\.clog_mono[[:space:]]')" -ge 1 Evidence notes
`build_nat_prelude` admits `Nat.clog_mono` through the trusted `Kernel::add_declaration` gate (declared in `nat_prelude/log_clog_mirrors.rs`'s `declare_clog_mono`). Route: `Nat.clog_antitone_left` (`log_clog_order.rs`) at the shared value `m`, bases `c ≤ b` (using a derived `1 < b` exactly as `Nat.clog_anti_left`'s wrapper does), gives `clog b m ≤ clog c m`; `Nat.clog_mono_right` at the shared base `c`, `m ≤ n`, gives `clog c m ≤ clog c n`; `Nat.le_trans` composes the two into `clog b m ≤ clog c n`. `nat_theorem_inventory`'s rendered type for `Nat.clog_mono` is `(x0:AxNat)->(x1:AxNat)->(x2:AxNat)->(x3:AxNat)->(x4:Lt (succ zero) x2)->(x5:Le x2 x3)->(x6:Le x0 x1)->Le (clog x3 x0) (clog x2 x1)`, matching this fact's `formal.statement` verbatim (`x0`=m, `x1`=n, `x2`=c, `x3`=b). `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; verified against a deliberately misspelled name (`clog_monoxxxxx`) that this same pipeline reports `0`.