Current library: Alpha v34, 4,223 checked-use theorems; Stable remains 432. Historical first admissions, original proof editions, and non-admitted aliases are preserved.
Exact expanded first-order arithmetic statement
forall n b c l z. (((~((n) = 0)) /\ (forall sfd_prime_evaluation_sf. (~((sfd_prime_evaluation_sf) = 1) /\ forall pvs_left_evaluation_sfdomain pvs_right_evaluation_sfdomain. (sfd_prime_evaluation_sf) = pvs_left_evaluation_sfdomain * pvs_right_evaluation_sfdomain -> pvs_left_evaluation_sfdomain = 1 \/ pvs_right_evaluation_sfdomain = 1) -> (exists pvs_le_gap_evaluation_sfbound. pvs_le_gap_evaluation_sfbound + (sfd_prime_evaluation_sf) = (n)) -> ~(exists pvs_factor_evaluation_sfsquare. (n) = (sfd_prime_evaluation_sf * sfd_prime_evaluation_sf) * pvs_factor_evaluation_sfsquare)))) -> ((~(n = 0) /\ ((exists ff_u_fsat_mv_evaluation_factors_product ff_v_fsat_mv_evaluation_factors_product. ((((exists ff_h_fsat_mv_evaluation_factors_product_start. ff_h_fsat_mv_evaluation_factors_product_start + S (1) = S ((S (0)) * ff_v_fsat_mv_evaluation_factors_product)) /\ exists ff_q_fsat_mv_evaluation_factors_product_start. ff_u_fsat_mv_evaluation_factors_product = ff_q_fsat_mv_evaluation_factors_product_start * S ((S (0)) * ff_v_fsat_mv_evaluation_factors_product) + (1))) /\ ((((exists ff_h_fsat_mv_evaluation_factors_product_terminal. ff_h_fsat_mv_evaluation_factors_product_terminal + S (n) = S ((S (l)) * ff_v_fsat_mv_evaluation_factors_product)) /\ exists ff_q_fsat_mv_evaluation_factors_product_terminal. ff_u_fsat_mv_evaluation_factors_product = ff_q_fsat_mv_evaluation_factors_product_terminal * S ((S (l)) * ff_v_fsat_mv_evaluation_factors_product) + (n))) /\ forall ff_i_fsat_mv_evaluation_factors_product. (exists ff_lt_fsat_mv_evaluation_factors_product_bound. ff_lt_fsat_mv_evaluation_factors_product_bound + S ff_i_fsat_mv_evaluation_factors_product = l) -> exists ff_p_fsat_mv_evaluation_factors_product ff_r_fsat_mv_evaluation_factors_product ff_s_fsat_mv_evaluation_factors_product. ((((exists ff_h_fsat_mv_evaluation_factors_product_factor. ff_h_fsat_mv_evaluation_factors_product_factor + S (ff_p_fsat_mv_evaluation_factors_product) = S ((S (ff_i_fsat_mv_evaluation_factors_product)) * c)) /\ exists ff_q_fsat_mv_evaluation_factors_product_factor. b = ff_q_fsat_mv_evaluation_factors_product_factor * S ((S (ff_i_fsat_mv_evaluation_factors_product)) * c) + (ff_p_fsat_mv_evaluation_factors_product))) /\ ((((exists ff_h_fsat_mv_evaluation_factors_product_partial. ff_h_fsat_mv_evaluation_factors_product_partial + S (ff_r_fsat_mv_evaluation_factors_product) = S ((S (ff_i_fsat_mv_evaluation_factors_product)) * ff_v_fsat_mv_evaluation_factors_product)) /\ exists ff_q_fsat_mv_evaluation_factors_product_partial. ff_u_fsat_mv_evaluation_factors_product = ff_q_fsat_mv_evaluation_factors_product_partial * S ((S (ff_i_fsat_mv_evaluation_factors_product)) * ff_v_fsat_mv_evaluation_factors_product) + (ff_r_fsat_mv_evaluation_factors_product))) /\ ((((exists ff_h_fsat_mv_evaluation_factors_product_successor. ff_h_fsat_mv_evaluation_factors_product_successor + S (ff_s_fsat_mv_evaluation_factors_product) = S ((S (S ff_i_fsat_mv_evaluation_factors_product)) * ff_v_fsat_mv_evaluation_factors_product)) /\ exists ff_q_fsat_mv_evaluation_factors_product_successor. ff_u_fsat_mv_evaluation_factors_product = ff_q_fsat_mv_evaluation_factors_product_successor * S ((S (S ff_i_fsat_mv_evaluation_factors_product)) * ff_v_fsat_mv_evaluation_factors_product) + (ff_s_fsat_mv_evaluation_factors_product))) /\ ff_s_fsat_mv_evaluation_factors_product = ff_r_fsat_mv_evaluation_factors_product * ff_p_fsat_mv_evaluation_factors_product)))))) /\ (forall ftsf_index_fsat_mv_evaluation_factors_primes. (exists ftsf_gap_fsat_mv_evaluation_factors_primes_bound. ftsf_gap_fsat_mv_evaluation_factors_primes_bound + S ftsf_index_fsat_mv_evaluation_factors_primes = (l)) -> exists ftsf_factor_fsat_mv_evaluation_factors_primes. ((((exists ff_h_ftsf_fsat_mv_evaluation_factors_primes_entry. ff_h_ftsf_fsat_mv_evaluation_factors_primes_entry + S (ftsf_factor_fsat_mv_evaluation_factors_primes) = S ((S (ftsf_index_fsat_mv_evaluation_factors_primes)) * c)) /\ exists ff_q_ftsf_fsat_mv_evaluation_factors_primes_entry. b = ff_q_ftsf_fsat_mv_evaluation_factors_primes_entry * S ((S (ftsf_index_fsat_mv_evaluation_factors_primes)) * c) + (ftsf_factor_fsat_mv_evaluation_factors_primes))) /\ ((~(ftsf_factor_fsat_mv_evaluation_factors_primes = 1) /\ forall frm_prime_left_ftsf_fsat_mv_evaluation_factors_primes_prime frm_prime_right_ftsf_fsat_mv_evaluation_factors_primes_prime. ftsf_factor_fsat_mv_evaluation_factors_primes = frm_prime_left_ftsf_fsat_mv_evaluation_factors_primes_prime * frm_prime_right_ftsf_fsat_mv_evaluation_factors_primes_prime -> frm_prime_left_ftsf_fsat_mv_evaluation_factors_primes_prime = 1 \/ frm_prime_right_ftsf_fsat_mv_evaluation_factors_primes_prime = 1))))))) -> (((~((n) = 0)) /\ ((((exists mv_square_prime_evaluation_valuesquare. ((~((mv_square_prime_evaluation_valuesquare) = 1) /\ forall pvs_left_evaluation_valuesquareprime pvs_right_evaluation_valuesquareprime. (mv_square_prime_evaluation_valuesquare) = pvs_left_evaluation_valuesquareprime * pvs_right_evaluation_valuesquareprime -> pvs_left_evaluation_valuesquareprime = 1 \/ pvs_right_evaluation_valuesquareprime = 1) /\ (exists pvs_factor_evaluation_valuesquaredivisor. (n) = (mv_square_prime_evaluation_valuesquare * mv_square_prime_evaluation_valuesquare) * pvs_factor_evaluation_valuesquaredivisor))) /\ ((z) = 0))) \/ (((((~((n) = 0)) /\ (forall sfd_prime_evaluation_valuesquarefree. (~((sfd_prime_evaluation_valuesquarefree) = 1) /\ forall pvs_left_evaluation_valuesquarefreedomain pvs_right_evaluation_valuesquarefreedomain. (sfd_prime_evaluation_valuesquarefree) = pvs_left_evaluation_valuesquarefreedomain * pvs_right_evaluation_valuesquarefreedomain -> pvs_left_evaluation_valuesquarefreedomain = 1 \/ pvs_right_evaluation_valuesquarefreedomain = 1) -> (exists pvs_le_gap_evaluation_valuesquarefreebound. pvs_le_gap_evaluation_valuesquarefreebound + (sfd_prime_evaluation_valuesquarefree) = (n)) -> ~(exists pvs_factor_evaluation_valuesquarefreesquare. (n) = (sfd_prime_evaluation_valuesquarefree * sfd_prime_evaluation_valuesquarefree) * pvs_factor_evaluation_valuesquarefreesquare)))) /\ (exists mv_factor_code_evaluation_valuefactors mv_factor_scale_evaluation_valuefactors mv_factor_count_evaluation_valuefactors. (((~(n = 0) /\ ((exists ff_u_fsat_evaluation_valuefactorsfactorization_product ff_v_fsat_evaluation_valuefactorsfactorization_product. ((((exists ff_h_fsat_evaluation_valuefactorsfactorization_product_start. ff_h_fsat_evaluation_valuefactorsfactorization_product_start + S (1) = S ((S (0)) * ff_v_fsat_evaluation_valuefactorsfactorization_product)) /\ exists ff_q_fsat_evaluation_valuefactorsfactorization_product_start. ff_u_fsat_evaluation_valuefactorsfactorization_product = ff_q_fsat_evaluation_valuefactorsfactorization_product_start * S ((S (0)) * ff_v_fsat_evaluation_valuefactorsfactorization_product) + (1))) /\ ((((exists ff_h_fsat_evaluation_valuefactorsfactorization_product_terminal. ff_h_fsat_evaluation_valuefactorsfactorization_product_terminal + S (n) = S ((S (mv_factor_count_evaluation_valuefactors)) * ff_v_fsat_evaluation_valuefactorsfactorization_product)) /\ exists ff_q_fsat_evaluation_valuefactorsfactorization_product_terminal. ff_u_fsat_evaluation_valuefactorsfactorization_product = ff_q_fsat_evaluation_valuefactorsfactorization_product_terminal * S ((S (mv_factor_count_evaluation_valuefactors)) * ff_v_fsat_evaluation_valuefactorsfactorization_product) + (n))) /\ forall ff_i_fsat_evaluation_valuefactorsfactorization_product. (exists ff_lt_fsat_evaluation_valuefactorsfactorization_product_bound. ff_lt_fsat_evaluation_valuefactorsfactorization_product_bound + S ff_i_fsat_evaluation_valuefactorsfactorization_product = mv_factor_count_evaluation_valuefactors) -> exists ff_p_fsat_evaluation_valuefactorsfactorization_product ff_r_fsat_evaluation_valuefactorsfactorization_product ff_s_fsat_evaluation_valuefactorsfactorization_product. ((((exists ff_h_fsat_evaluation_valuefactorsfactorization_product_factor. ff_h_fsat_evaluation_valuefactorsfactorization_product_factor + S (ff_p_fsat_evaluation_valuefactorsfactorization_product) = S ((S (ff_i_fsat_evaluation_valuefactorsfactorization_product)) * mv_factor_scale_evaluation_valuefactors)) /\ exists ff_q_fsat_evaluation_valuefactorsfactorization_product_factor. mv_factor_code_evaluation_valuefactors = ff_q_fsat_evaluation_valuefactorsfactorization_product_factor * S ((S (ff_i_fsat_evaluation_valuefactorsfactorization_product)) * mv_factor_scale_evaluation_valuefactors) + (ff_p_fsat_evaluation_valuefactorsfactorization_product))) /\ ((((exists ff_h_fsat_evaluation_valuefactorsfactorization_product_partial. ff_h_fsat_evaluation_valuefactorsfactorization_product_partial + S (ff_r_fsat_evaluation_valuefactorsfactorization_product) = S ((S (ff_i_fsat_evaluation_valuefactorsfactorization_product)) * ff_v_fsat_evaluation_valuefactorsfactorization_product)) /\ exists ff_q_fsat_evaluation_valuefactorsfactorization_product_partial. ff_u_fsat_evaluation_valuefactorsfactorization_product = ff_q_fsat_evaluation_valuefactorsfactorization_product_partial * S ((S (ff_i_fsat_evaluation_valuefactorsfactorization_product)) * ff_v_fsat_evaluation_valuefactorsfactorization_product) + (ff_r_fsat_evaluation_valuefactorsfactorization_product))) /\ ((((exists ff_h_fsat_evaluation_valuefactorsfactorization_product_successor. ff_h_fsat_evaluation_valuefactorsfactorization_product_successor + S (ff_s_fsat_evaluation_valuefactorsfactorization_product) = S ((S (S ff_i_fsat_evaluation_valuefactorsfactorization_product)) * ff_v_fsat_evaluation_valuefactorsfactorization_product)) /\ exists ff_q_fsat_evaluation_valuefactorsfactorization_product_successor. ff_u_fsat_evaluation_valuefactorsfactorization_product = ff_q_fsat_evaluation_valuefactorsfactorization_product_successor * S ((S (S ff_i_fsat_evaluation_valuefactorsfactorization_product)) * ff_v_fsat_evaluation_valuefactorsfactorization_product) + (ff_s_fsat_evaluation_valuefactorsfactorization_product))) /\ ff_s_fsat_evaluation_valuefactorsfactorization_product = ff_r_fsat_evaluation_valuefactorsfactorization_product * ff_p_fsat_evaluation_valuefactorsfactorization_product)))))) /\ (forall ftsf_index_fsat_evaluation_valuefactorsfactorization_primes. (exists ftsf_gap_fsat_evaluation_valuefactorsfactorization_primes_bound. ftsf_gap_fsat_evaluation_valuefactorsfactorization_primes_bound + S ftsf_index_fsat_evaluation_valuefactorsfactorization_primes = (mv_factor_count_evaluation_valuefactors)) -> exists ftsf_factor_fsat_evaluation_valuefactorsfactorization_primes. ((((exists ff_h_ftsf_fsat_evaluation_valuefactorsfactorization_primes_entry. ff_h_ftsf_fsat_evaluation_valuefactorsfactorization_primes_entry + S (ftsf_factor_fsat_evaluation_valuefactorsfactorization_primes) = S ((S (ftsf_index_fsat_evaluation_valuefactorsfactorization_primes)) * mv_factor_scale_evaluation_valuefactors)) /\ exists ff_q_ftsf_fsat_evaluation_valuefactorsfactorization_primes_entry. mv_factor_code_evaluation_valuefactors = ff_q_ftsf_fsat_evaluation_valuefactorsfactorization_primes_entry * S ((S (ftsf_index_fsat_evaluation_valuefactorsfactorization_primes)) * mv_factor_scale_evaluation_valuefactors) + (ftsf_factor_fsat_evaluation_valuefactorsfactorization_primes))) /\ ((~(ftsf_factor_fsat_evaluation_valuefactorsfactorization_primes = 1) /\ forall frm_prime_left_ftsf_fsat_evaluation_valuefactorsfactorization_primes_prime frm_prime_right_ftsf_fsat_evaluation_valuefactorsfactorization_primes_prime. ftsf_factor_fsat_evaluation_valuefactorsfactorization_primes = frm_prime_left_ftsf_fsat_evaluation_valuefactorsfactorization_primes_prime * frm_prime_right_ftsf_fsat_evaluation_valuefactorsfactorization_primes_prime -> frm_prime_left_ftsf_fsat_evaluation_valuefactorsfactorization_primes_prime = 1 \/ frm_prime_right_ftsf_fsat_evaluation_valuefactorsfactorization_primes_prime = 1))))))) /\ ((((exists mv_even_half_evaluation_valuefactorsparityeven. (mv_factor_count_evaluation_valuefactors) = 2 * mv_even_half_evaluation_valuefactorsparityeven) /\ ((z) = 2))) \/ (((exists mv_odd_half_evaluation_valuefactorsparityodd. (mv_factor_count_evaluation_valuefactors) = 2 * mv_odd_half_evaluation_valuefactorsparityodd + 1) /\ ((z) = 1))))))))))) -> ((((exists mv_even_half_evaluation_resulteven. (l) = 2 * mv_even_half_evaluation_resulteven) /\ ((z) = 2))) \/ (((exists mv_odd_half_evaluation_resultodd. (l) = 2 * mv_odd_half_evaluation_resultodd + 1) /\ ((z) = 1))))Constructive proof overview
Generated structural guide
For a squarefree input, every real factor list computes the same Möbius sign, independently of ordering or chosen witnesses.
The unchanged tactic script uses 2 declared prerequisites and contains 39 exact native proof lines.
Alpha v34 checked-use · first admitted v31 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
squarefree_excludes_prime_square Alpha theorem; checked-use authorized MV0004 mobius_prime_factor_count_uniqueDirect dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This exact body belongs to a complete independently kernel-checked constructive proof bundle and has Alpha checked-use authority; it does not imply Stable membership.
Read the argument
Proof checkpoints
This is a reading aid, not a new proof or a proof-tree certificate. Checkpoint groups are consecutive commands, not inferred branch boundaries. Every step links to the preserved script.
Named ingredients (1)
01Fix variables and assumptionsL1–8
02Separate the logical casesL9–14
03Use earlier factsL15–20
Instantiate or apply named facts and discharge the corresponding proof obligations.
04Separate the logical casesL21–25
05Establish heqL26–35
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply mobius prime factor count unique.
- L26
have heq : x2 = l - L27
specialize mobius_prime_factor_count_unique (n) - L28
specialize mobius_prime_factor_count_unique (x) - L29
specialize mobius_prime_factor_count_unique (x1) - L30
specialize mobius_prime_factor_count_unique (x2) - L31
specialize mobius_prime_factor_count_unique (b) - L32
specialize mobius_prime_factor_count_unique (c) - L33
specialize mobius_prime_factor_count_unique (l) - L34
apply mobius_prime_factor_count_unique - L35
exact hmu_right_right_right_witness_witness_witness_left
06Use earlier factsL36–36
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L36
exact hf
07Calculate and transport equalitiesL37–38
08Use earlier factsL39–39
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L39
exact hmu_right_right_right_witness_witness_witness_right
Original exact command ledger · 39 lines
- 0001
intro n - 0002
intro b - 0003
intro c - 0004
intro l - 0005
intro z - 0006
intro hsf - 0007
intro hf - 0008
intro hmu - 0009
cases hmu - 0010
cases hmu_right - 0011
cases hmu_right_left - 0012
cases hmu_right_left_left - 0013
cases hmu_right_left_left_witness - 0014
exfalso - 0015
specialize squarefree_excludes_prime_square (n) - 0016
specialize squarefree_excludes_prime_square (x) - 0017
apply squarefree_excludes_prime_square - 0018
exact hsf - 0019
exact hmu_right_left_left_witness_left - 0020
exact hmu_right_left_left_witness_right - 0021
cases hmu_right_right - 0022
cases hmu_right_right_right - 0023
cases hmu_right_right_right_witness - 0024
cases hmu_right_right_right_witness_witness - 0025
cases hmu_right_right_right_witness_witness_witness - 0026
have heq : x2 = l - 0027
specialize mobius_prime_factor_count_unique (n) - 0028
specialize mobius_prime_factor_count_unique (x) - 0029
specialize mobius_prime_factor_count_unique (x1) - 0030
specialize mobius_prime_factor_count_unique (x2) - 0031
specialize mobius_prime_factor_count_unique (b) - 0032
specialize mobius_prime_factor_count_unique (c) - 0033
specialize mobius_prime_factor_count_unique (l) - 0034
apply mobius_prime_factor_count_unique - 0035
exact hmu_right_right_right_witness_witness_witness_left - 0036
exact hf - 0037
rewrite heq at hmu_right_right_right_witness_witness_witness_right - 0038
rewrite heq at hmu_right_right_right_witness_witness_witness_right - 0039
exact hmu_right_right_right_witness_witness_witness_right