kernel-Int.mod_eq_mul_general
- Kind
- kernel-term
- Status
- checked
Supports: ∀ {n a b c d : ℤ}, a ≡ b [ZMOD n] → c ≡ d [ZMOD n] → a * c ≡ b * d [ZMOD n]
test "$(cargo run -q -p axeyum-lean-kernel --example int_theorem_inventory -- mod_eq_mul_general 2>/dev/null | /usr/bin/grep -cE '^theorem[[:space:]]+Int\.mod_eq_mul_general[[:space:]]')" -ge 1 Evidence notes
build_int_prelude admits Int.mod_eq_mul_general through the trusted Kernel::add_declaration gate, which re-checks the proof term against the stated type, so producing this row at all is a machine-checked proof. New proof, lane int-dvd-mirrors: int_prelude/dvd_gcd_mirrors.rs. The existing p.mod_eq_mul needs 0 < n (it routes through mod_eq_iff_dvd); this is a genuinely UNCONDITIONAL version, built by swapping that bridge for the already-unconditional modeq_to_dvd/dvd_to_modeq (the same trick modeq.rs already used to make the additive family unconditional), plus one extra step (Int.mul_sub) the multiplicative case needs that the additive case does not: dvd n (c*(b-a)) is rewritten to dvd n (c*b - c*a) before feeding dvd_to_modeq. mod_eq_mul_right_general/mod_eq_mul_left_general (both un-declared private helpers) scale each hypothesis and mod_eq_trans chains the two results. int_theorem_inventory rendered type matches this fact formal.statement (∀ {n a b c d : ℤ}, a ≡ b [ZMOD n] → c ≡ d [ZMOD n] → a * c ≡ b * d [ZMOD n]). int_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; the anchor requires the exact name followed by whitespace. Verified both ways: the real name greps to a count -ge 1; grepping a fabricated name (Int.mod_eq_mul_general_bogus_xyz) makes int_theorem_inventory fail closed (exit 1, no Int declaration matches).