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 original first-admission records.
Exact expanded first-order arithmetic statement
forall b c l x. (forall bpr_left_index_gcrt_product_lcm_pairwise bpr_right_index_gcrt_product_lcm_pairwise bpr_left_value_gcrt_product_lcm_pairwise bpr_right_value_gcrt_product_lcm_pairwise. (exists bpr_gap_gcrt_product_lcm_pairwise_left_bound. bpr_gap_gcrt_product_lcm_pairwise_left_bound + S (bpr_left_index_gcrt_product_lcm_pairwise) = l) -> (exists bpr_gap_gcrt_product_lcm_pairwise_right_bound. bpr_gap_gcrt_product_lcm_pairwise_right_bound + S (bpr_right_index_gcrt_product_lcm_pairwise) = l) -> (((exists bpr_height_gcrt_product_lcm_pairwise_left_at. bpr_height_gcrt_product_lcm_pairwise_left_at + S (bpr_left_value_gcrt_product_lcm_pairwise) = S ((S (bpr_left_index_gcrt_product_lcm_pairwise)) * c)) /\ exists bpr_quotient_gcrt_product_lcm_pairwise_left_at. b = bpr_quotient_gcrt_product_lcm_pairwise_left_at * S ((S (bpr_left_index_gcrt_product_lcm_pairwise)) * c) + (bpr_left_value_gcrt_product_lcm_pairwise))) -> (((exists bpr_height_gcrt_product_lcm_pairwise_right_at. bpr_height_gcrt_product_lcm_pairwise_right_at + S (bpr_right_value_gcrt_product_lcm_pairwise) = S ((S (bpr_right_index_gcrt_product_lcm_pairwise)) * c)) /\ exists bpr_quotient_gcrt_product_lcm_pairwise_right_at. b = bpr_quotient_gcrt_product_lcm_pairwise_right_at * S ((S (bpr_right_index_gcrt_product_lcm_pairwise)) * c) + (bpr_right_value_gcrt_product_lcm_pairwise))) -> ~(bpr_left_index_gcrt_product_lcm_pairwise = bpr_right_index_gcrt_product_lcm_pairwise) -> (forall bpr_coprime_divisor_gcrt_product_lcm_pairwise_coprime. (exists bpr_coprime_left_factor_gcrt_product_lcm_pairwise_coprime. bpr_left_value_gcrt_product_lcm_pairwise = bpr_coprime_divisor_gcrt_product_lcm_pairwise_coprime * bpr_coprime_left_factor_gcrt_product_lcm_pairwise_coprime) -> (exists bpr_coprime_right_factor_gcrt_product_lcm_pairwise_coprime. bpr_right_value_gcrt_product_lcm_pairwise = bpr_coprime_divisor_gcrt_product_lcm_pairwise_coprime * bpr_coprime_right_factor_gcrt_product_lcm_pairwise_coprime) -> bpr_coprime_divisor_gcrt_product_lcm_pairwise_coprime = 1)) -> (exists ff_u_gcrt_product_lcm_source ff_v_gcrt_product_lcm_source. ((((exists ff_h_gcrt_product_lcm_source_start. ff_h_gcrt_product_lcm_source_start + S (1) = S ((S (0)) * ff_v_gcrt_product_lcm_source)) /\ exists ff_q_gcrt_product_lcm_source_start. ff_u_gcrt_product_lcm_source = ff_q_gcrt_product_lcm_source_start * S ((S (0)) * ff_v_gcrt_product_lcm_source) + (1))) /\ ((((exists ff_h_gcrt_product_lcm_source_terminal. ff_h_gcrt_product_lcm_source_terminal + S (x) = S ((S (l)) * ff_v_gcrt_product_lcm_source)) /\ exists ff_q_gcrt_product_lcm_source_terminal. ff_u_gcrt_product_lcm_source = ff_q_gcrt_product_lcm_source_terminal * S ((S (l)) * ff_v_gcrt_product_lcm_source) + (x))) /\ forall ff_i_gcrt_product_lcm_source. (exists ff_lt_gcrt_product_lcm_source_bound. ff_lt_gcrt_product_lcm_source_bound + S ff_i_gcrt_product_lcm_source = l) -> exists ff_p_gcrt_product_lcm_source ff_r_gcrt_product_lcm_source ff_s_gcrt_product_lcm_source. ((((exists ff_h_gcrt_product_lcm_source_factor. ff_h_gcrt_product_lcm_source_factor + S (ff_p_gcrt_product_lcm_source) = S ((S (ff_i_gcrt_product_lcm_source)) * c)) /\ exists ff_q_gcrt_product_lcm_source_factor. b = ff_q_gcrt_product_lcm_source_factor * S ((S (ff_i_gcrt_product_lcm_source)) * c) + (ff_p_gcrt_product_lcm_source))) /\ ((((exists ff_h_gcrt_product_lcm_source_partial. ff_h_gcrt_product_lcm_source_partial + S (ff_r_gcrt_product_lcm_source) = S ((S (ff_i_gcrt_product_lcm_source)) * ff_v_gcrt_product_lcm_source)) /\ exists ff_q_gcrt_product_lcm_source_partial. ff_u_gcrt_product_lcm_source = ff_q_gcrt_product_lcm_source_partial * S ((S (ff_i_gcrt_product_lcm_source)) * ff_v_gcrt_product_lcm_source) + (ff_r_gcrt_product_lcm_source))) /\ ((((exists ff_h_gcrt_product_lcm_source_successor. ff_h_gcrt_product_lcm_source_successor + S (ff_s_gcrt_product_lcm_source) = S ((S (S ff_i_gcrt_product_lcm_source)) * ff_v_gcrt_product_lcm_source)) /\ exists ff_q_gcrt_product_lcm_source_successor. ff_u_gcrt_product_lcm_source = ff_q_gcrt_product_lcm_source_successor * S ((S (S ff_i_gcrt_product_lcm_source)) * ff_v_gcrt_product_lcm_source) + (ff_s_gcrt_product_lcm_source))) /\ ff_s_gcrt_product_lcm_source = ff_r_gcrt_product_lcm_source * ff_p_gcrt_product_lcm_source)))))) -> (((forall gcrt_common_index_product_lcm_result_own gcrt_common_modulus_product_lcm_result_own. (exists ff_lt_gcrt_product_lcm_result_own_bound. ff_lt_gcrt_product_lcm_result_own_bound + S gcrt_common_index_product_lcm_result_own = l) -> (((exists ff_h_gcrt_product_lcm_result_own_entry. ff_h_gcrt_product_lcm_result_own_entry + S (gcrt_common_modulus_product_lcm_result_own) = S ((S (gcrt_common_index_product_lcm_result_own)) * c)) /\ exists ff_q_gcrt_product_lcm_result_own_entry. b = ff_q_gcrt_product_lcm_result_own_entry * S ((S (gcrt_common_index_product_lcm_result_own)) * c) + (gcrt_common_modulus_product_lcm_result_own))) -> exists gcrt_common_quotient_product_lcm_result_own. x = gcrt_common_modulus_product_lcm_result_own * gcrt_common_quotient_product_lcm_result_own) /\ forall gcrt_lcm_common_product_lcm_result. (forall gcrt_common_index_product_lcm_result_other gcrt_common_modulus_product_lcm_result_other. (exists ff_lt_gcrt_product_lcm_result_other_bound. ff_lt_gcrt_product_lcm_result_other_bound + S gcrt_common_index_product_lcm_result_other = l) -> (((exists ff_h_gcrt_product_lcm_result_other_entry. ff_h_gcrt_product_lcm_result_other_entry + S (gcrt_common_modulus_product_lcm_result_other) = S ((S (gcrt_common_index_product_lcm_result_other)) * c)) /\ exists ff_q_gcrt_product_lcm_result_other_entry. b = ff_q_gcrt_product_lcm_result_other_entry * S ((S (gcrt_common_index_product_lcm_result_other)) * c) + (gcrt_common_modulus_product_lcm_result_other))) -> exists gcrt_common_quotient_product_lcm_result_other. gcrt_lcm_common_product_lcm_result = gcrt_common_modulus_product_lcm_result_other * gcrt_common_quotient_product_lcm_result_other) -> exists gcrt_lcm_quotient_product_lcm_result. gcrt_lcm_common_product_lcm_result = x * gcrt_lcm_quotient_product_lcm_result))Constructive proof overview
Generated structural guide
For pairwise-coprime decoded moduli the actual finite product is exactly their universal-property lcm.
The unchanged tactic script uses 2 declared prerequisites and contains 24 exact native proof lines.
Alpha v34 checked-use · first admitted v24 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
CR000B crt_prefix_product_common_multiple beta_pairwise_coprime_product_divides_common_multiple Alpha theorem; checked-use authorizedDirect 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–6
02Separate the logical casesL7–7
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L7
split
03Use earlier factsL8–13
Instantiate or apply named facts and discharge the corresponding proof obligations.
04Fix variables and assumptionsL14–15
05Use earlier factsL16–24
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L16
specialize beta_pairwise_coprime_product_divides_common_multiple b - L17
specialize beta_pairwise_coprime_product_divides_common_multiple c - L18
specialize beta_pairwise_coprime_product_divides_common_multiple l - L19
specialize beta_pairwise_coprime_product_divides_common_multiple x - L20
specialize beta_pairwise_coprime_product_divides_common_multiple z - L21
apply beta_pairwise_coprime_product_divides_common_multiple - L22
exact hpairs - L23
exact hcommon - L24
exact hproduct
Original exact command ledger · 24 lines
- 0001
intro b - 0002
intro c - 0003
intro l - 0004
intro x - 0005
intro hpairs - 0006
intro hproduct - 0007
split - 0008
specialize crt_prefix_product_common_multiple b - 0009
specialize crt_prefix_product_common_multiple c - 0010
specialize crt_prefix_product_common_multiple l - 0011
specialize crt_prefix_product_common_multiple x - 0012
apply crt_prefix_product_common_multiple - 0013
exact hproduct - 0014
intro z - 0015
intro hcommon - 0016
specialize beta_pairwise_coprime_product_divides_common_multiple b - 0017
specialize beta_pairwise_coprime_product_divides_common_multiple c - 0018
specialize beta_pairwise_coprime_product_divides_common_multiple l - 0019
specialize beta_pairwise_coprime_product_divides_common_multiple x - 0020
specialize beta_pairwise_coprime_product_divides_common_multiple z - 0021
apply beta_pairwise_coprime_product_divides_common_multiple - 0022
exact hpairs - 0023
exact hcommon - 0024
exact hproduct
Separate complete second-wave branches: Full G011 proof · Alpha v27.