kernel-Nat.dvd_of_lcm_right_dvd
- Kind
- kernel-term
- Status
- checked
Supports: lcm a b divides c implies a divides c
test "$(cargo run -q -p axeyum-lean-kernel --example nat_theorem_inventory -- dvd_of_lcm_right_dvd 2>/dev/null | grep -Ec '^Nat\.dvd_of_lcm_right_dvd[[:space:]]')" -ge 1 Evidence notes
`build_nat_prelude` admits this theorem through the trusted `Kernel::add_declaration` gate, which re-checks the constructed proof term against the stated type: `dvd_trans` composing `dvd_lcm_left : a | lcm a b` with the hypothesis `lcm a b | c`. `nat_theorem_inventory` exits non-zero for a name that does not exist, and the `grep -c` requires the admitted declaration to be printed.