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 p b c a n qb qc r. (~((p) = 1) /\ forall pfa_factor_left_degree_prime pfa_factor_right_degree_prime. (p) = pfa_factor_left_degree_prime * pfa_factor_right_degree_prime -> pfa_factor_left_degree_prime = 1 \/ pfa_factor_right_degree_prime = 1) -> ((((S (S n))=S (S n)) /\ (((forall fom_index_pfp_degree_inputcoefficients. (exists fom_gap_pfp_degree_inputcoefficients_index_bound. fom_gap_pfp_degree_inputcoefficients_index_bound + S (fom_index_pfp_degree_inputcoefficients) = S (S n)) -> exists fom_value_pfp_degree_inputcoefficients. ((((exists fom_beta_height_pfp_degree_inputcoefficients_entry. fom_beta_height_pfp_degree_inputcoefficients_entry + S (fom_value_pfp_degree_inputcoefficients) = S ((S (fom_index_pfp_degree_inputcoefficients)) * c)) /\ exists fom_beta_quotient_pfp_degree_inputcoefficients_entry. b = fom_beta_quotient_pfp_degree_inputcoefficients_entry * S ((S (fom_index_pfp_degree_inputcoefficients)) * c) + (fom_value_pfp_degree_inputcoefficients))) /\ (exists fom_gap_pfp_degree_inputcoefficients_value_bound. fom_gap_pfp_degree_inputcoefficients_value_bound + S (fom_value_pfp_degree_inputcoefficients) = p))) /\ ((exists pfd_leading_degree_input. ((((exists ff_h_pfp_degree_inputentry. ff_h_pfp_degree_inputentry + S (pfd_leading_degree_input) = S ((S (0)) * c)) /\ exists ff_q_pfp_degree_inputentry. b = ff_q_pfp_degree_inputentry * S ((S (0)) * c) + (pfd_leading_degree_input))) /\ ((~(pfd_leading_degree_input=0)))))))))) -> (exists pfs_history_code_degree_division pfs_history_scale_degree_division. ((((exists pfa_gap_degree_divisiontracebase. pfa_gap_degree_divisiontracebase + S (a) = (p)) /\ (((((exists ff_h_pfp_degree_divisiontraceinitial. ff_h_pfp_degree_divisiontraceinitial + S (0) = S ((S (0)) * pfs_history_scale_degree_division)) /\ exists ff_q_pfp_degree_divisiontraceinitial. pfs_history_code_degree_division = ff_q_pfp_degree_divisiontraceinitial * S ((S (0)) * pfs_history_scale_degree_division) + (0))) /\ (((((exists ff_h_pfp_degree_divisiontraceterminal. ff_h_pfp_degree_divisiontraceterminal + S (r) = S ((S (S (S n))) * pfs_history_scale_degree_division)) /\ exists ff_q_pfp_degree_divisiontraceterminal. pfs_history_code_degree_division = ff_q_pfp_degree_divisiontraceterminal * S ((S (S (S n))) * pfs_history_scale_degree_division) + (r))) /\ ((forall pfh_index_degree_divisiontracesteps. (exists pfa_gap_degree_divisiontracestepsindex. pfa_gap_degree_divisiontracestepsindex + S (pfh_index_degree_divisiontracesteps) = (S (S n))) -> (exists pfh_coefficient_degree_divisiontracestepsstep pfh_before_degree_divisiontracestepsstep pfh_after_degree_divisiontracestepsstep pfh_product_degree_divisiontracestepsstep. ((((exists ff_h_pfp_degree_divisiontracestepsstepcoefficient. ff_h_pfp_degree_divisiontracestepsstepcoefficient + S (pfh_coefficient_degree_divisiontracestepsstep) = S ((S (pfh_index_degree_divisiontracesteps)) * c)) /\ exists ff_q_pfp_degree_divisiontracestepsstepcoefficient. b = ff_q_pfp_degree_divisiontracestepsstepcoefficient * S ((S (pfh_index_degree_divisiontracesteps)) * c) + (pfh_coefficient_degree_divisiontracestepsstep))) /\ (((((exists ff_h_pfp_degree_divisiontracestepsstepbefore. ff_h_pfp_degree_divisiontracestepsstepbefore + S (pfh_before_degree_divisiontracestepsstep) = S ((S (pfh_index_degree_divisiontracesteps)) * pfs_history_scale_degree_division)) /\ exists ff_q_pfp_degree_divisiontracestepsstepbefore. pfs_history_code_degree_division = ff_q_pfp_degree_divisiontracestepsstepbefore * S ((S (pfh_index_degree_divisiontracesteps)) * pfs_history_scale_degree_division) + (pfh_before_degree_divisiontracestepsstep))) /\ (((((exists ff_h_pfp_degree_divisiontracestepsstepafter. ff_h_pfp_degree_divisiontracestepsstepafter + S (pfh_after_degree_divisiontracestepsstep) = S ((S (S (pfh_index_degree_divisiontracesteps))) * pfs_history_scale_degree_division)) /\ exists ff_q_pfp_degree_divisiontracestepsstepafter. pfs_history_code_degree_division = ff_q_pfp_degree_divisiontracestepsstepafter * S ((S (S (pfh_index_degree_divisiontracesteps))) * pfs_history_scale_degree_division) + (pfh_after_degree_divisiontracestepsstep))) /\ (((((exists pfa_gap_degree_divisiontracestepsstepmultiplyleft. pfa_gap_degree_divisiontracestepsstepmultiplyleft + S (pfh_before_degree_divisiontracestepsstep) = (p)) /\ (((exists pfa_gap_degree_divisiontracestepsstepmultiplyright. pfa_gap_degree_divisiontracestepsstepmultiplyright + S (a) = (p)) /\ ((((exists pfa_gap_degree_divisiontracestepsstepmultiplyresultbound. pfa_gap_degree_divisiontracestepsstepmultiplyresultbound + S (pfh_product_degree_divisiontracestepsstep) = (p)) /\ ((exists pfa_offset_left_degree_divisiontracestepsstepmultiplyresultcongruence pfa_offset_right_degree_divisiontracestepsstepmultiplyresultcongruence. ((pfh_before_degree_divisiontracestepsstep) * (a)) + (p) * pfa_offset_left_degree_divisiontracestepsstepmultiplyresultcongruence = (pfh_product_degree_divisiontracestepsstep) + (p) * pfa_offset_right_degree_divisiontracestepsstepmultiplyresultcongruence))))))))) /\ ((((exists pfa_gap_degree_divisiontracestepsstepaddleft. pfa_gap_degree_divisiontracestepsstepaddleft + S (pfh_product_degree_divisiontracestepsstep) = (p)) /\ (((exists pfa_gap_degree_divisiontracestepsstepaddright. pfa_gap_degree_divisiontracestepsstepaddright + S (pfh_coefficient_degree_divisiontracestepsstep) = (p)) /\ ((((exists pfa_gap_degree_divisiontracestepsstepaddresultbound. pfa_gap_degree_divisiontracestepsstepaddresultbound + S (pfh_after_degree_divisiontracestepsstep) = (p)) /\ ((exists pfa_offset_left_degree_divisiontracestepsstepaddresultcongruence pfa_offset_right_degree_divisiontracestepsstepaddresultcongruence. ((pfh_product_degree_divisiontracestepsstep) + (pfh_coefficient_degree_divisiontracestepsstep)) + (p) * pfa_offset_left_degree_divisiontracestepsstepaddresultcongruence = (pfh_after_degree_divisiontracestepsstep) + (p) * pfa_offset_right_degree_divisiontracestepsstepaddresultcongruence)))))))))))))))))))))))))) /\ ((forall ff_index_mcp_pfs_degree_divisionquotient ff_source_mcp_pfs_degree_divisionquotient ff_target_mcp_pfs_degree_divisionquotient. (exists mcp_gap_pfs_degree_divisionquotient_bound. mcp_gap_pfs_degree_divisionquotient_bound + S (ff_index_mcp_pfs_degree_divisionquotient) = (S n)) -> (((exists fs_h_mcp_pfs_degree_divisionquotient_source. fs_h_mcp_pfs_degree_divisionquotient_source + S (ff_source_mcp_pfs_degree_divisionquotient) = S ((S ((1) + (1) * ff_index_mcp_pfs_degree_divisionquotient)) * pfs_history_scale_degree_division)) /\ exists fs_q_mcp_pfs_degree_divisionquotient_source. pfs_history_code_degree_division = fs_q_mcp_pfs_degree_divisionquotient_source * S ((S ((1) + (1) * ff_index_mcp_pfs_degree_divisionquotient)) * pfs_history_scale_degree_division) + (ff_source_mcp_pfs_degree_divisionquotient))) -> (((exists fs_h_mcp_pfs_degree_divisionquotient_target. fs_h_mcp_pfs_degree_divisionquotient_target + S (ff_target_mcp_pfs_degree_divisionquotient) = S ((S (ff_index_mcp_pfs_degree_divisionquotient)) * qc)) /\ exists fs_q_mcp_pfs_degree_divisionquotient_target. qb = fs_q_mcp_pfs_degree_divisionquotient_target * S ((S (ff_index_mcp_pfs_degree_divisionquotient)) * qc) + (ff_target_mcp_pfs_degree_divisionquotient))) -> ff_target_mcp_pfs_degree_divisionquotient = ff_source_mcp_pfs_degree_divisionquotient)))) -> ((((S n)=S (n)) /\ (((forall fom_index_pfp_degree_quotientcoefficients. (exists fom_gap_pfp_degree_quotientcoefficients_index_bound. fom_gap_pfp_degree_quotientcoefficients_index_bound + S (fom_index_pfp_degree_quotientcoefficients) = S n) -> exists fom_value_pfp_degree_quotientcoefficients. ((((exists fom_beta_height_pfp_degree_quotientcoefficients_entry. fom_beta_height_pfp_degree_quotientcoefficients_entry + S (fom_value_pfp_degree_quotientcoefficients) = S ((S (fom_index_pfp_degree_quotientcoefficients)) * qc)) /\ exists fom_beta_quotient_pfp_degree_quotientcoefficients_entry. qb = fom_beta_quotient_pfp_degree_quotientcoefficients_entry * S ((S (fom_index_pfp_degree_quotientcoefficients)) * qc) + (fom_value_pfp_degree_quotientcoefficients))) /\ (exists fom_gap_pfp_degree_quotientcoefficients_value_bound. fom_gap_pfp_degree_quotientcoefficients_value_bound + S (fom_value_pfp_degree_quotientcoefficients) = p))) /\ ((exists pfd_leading_degree_quotient. ((((exists ff_h_pfp_degree_quotiententry. ff_h_pfp_degree_quotiententry + S (pfd_leading_degree_quotient) = S ((S (0)) * qc)) /\ exists ff_q_pfp_degree_quotiententry. qb = ff_q_pfp_degree_quotiententry * S ((S (0)) * qc) + (pfd_leading_degree_quotient))) /\ ((~(pfd_leading_degree_quotient=0))))))))))Constructive proof overview
Generated structural guide
Synthetic division of a nonzero-leading polynomial of positive represented degree S n produces a quotient of represented degree exactly n.
The unchanged tactic script uses 2 declared prerequisites and contains 45 exact native proof lines.
Alpha v34 checked-use · first admitted v32 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
PQ004A prime_field_polynomial_synthetic_quotient_bounded PQ004F prime_field_polynomial_synthetic_leading_coefficientDirect 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 (2)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–11
Work with arbitrary variables or the premises of the current implication.
- L11
intro hs
03Separate the logical casesL12–14
04Calculate and transport equalitiesL15–15
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L15
refl
05Separate the logical casesL16–16
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L16
split
06Use earlier factsL17–26
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L17
specialize prime_field_polynomial_synthetic_quotient_bounded (p) - L18
specialize prime_field_polynomial_synthetic_quotient_bounded (b) - L19
specialize prime_field_polynomial_synthetic_quotient_bounded (c) - L20
specialize prime_field_polynomial_synthetic_quotient_bounded (a) - L21
specialize prime_field_polynomial_synthetic_quotient_bounded (S n) - L22
specialize prime_field_polynomial_synthetic_quotient_bounded (qb) - L23
specialize prime_field_polynomial_synthetic_quotient_bounded (qc) - L24
specialize prime_field_polynomial_synthetic_quotient_bounded (r) - L25
apply prime_field_polynomial_synthetic_quotient_bounded - L26
exact hp
07Use earlier factsL27–27
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L27
exact hs
08Separate the logical casesL28–29
09Construct an explicit witnessL30–30
Supply the displayed value, then prove that it has the required property.
- L30
exists x
10Separate the logical casesL31–31
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L31
split
11Use earlier factsL32–41
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L32
specialize prime_field_polynomial_synthetic_leading_coefficient (p) - L33
specialize prime_field_polynomial_synthetic_leading_coefficient (b) - L34
specialize prime_field_polynomial_synthetic_leading_coefficient (c) - L35
specialize prime_field_polynomial_synthetic_leading_coefficient (a) - L36
specialize prime_field_polynomial_synthetic_leading_coefficient (n) - L37
specialize prime_field_polynomial_synthetic_leading_coefficient (qb) - L38
specialize prime_field_polynomial_synthetic_leading_coefficient (qc) - L39
specialize prime_field_polynomial_synthetic_leading_coefficient (r) - L40
specialize prime_field_polynomial_synthetic_leading_coefficient (x) - L41
apply prime_field_polynomial_synthetic_leading_coefficient
Original exact command ledger · 45 lines
- 0001
intro p - 0002
intro b - 0003
intro c - 0004
intro a - 0005
intro n - 0006
intro qb - 0007
intro qc - 0008
intro r - 0009
intro hp - 0010
intro hd - 0011
intro hs - 0012
cases hd - 0013
cases hd_right - 0014
split - 0015
refl - 0016
split - 0017
specialize prime_field_polynomial_synthetic_quotient_bounded (p) - 0018
specialize prime_field_polynomial_synthetic_quotient_bounded (b) - 0019
specialize prime_field_polynomial_synthetic_quotient_bounded (c) - 0020
specialize prime_field_polynomial_synthetic_quotient_bounded (a) - 0021
specialize prime_field_polynomial_synthetic_quotient_bounded (S n) - 0022
specialize prime_field_polynomial_synthetic_quotient_bounded (qb) - 0023
specialize prime_field_polynomial_synthetic_quotient_bounded (qc) - 0024
specialize prime_field_polynomial_synthetic_quotient_bounded (r) - 0025
apply prime_field_polynomial_synthetic_quotient_bounded - 0026
exact hp - 0027
exact hs - 0028
cases hd_right_right - 0029
cases hd_right_right_witness - 0030
exists x - 0031
split - 0032
specialize prime_field_polynomial_synthetic_leading_coefficient (p) - 0033
specialize prime_field_polynomial_synthetic_leading_coefficient (b) - 0034
specialize prime_field_polynomial_synthetic_leading_coefficient (c) - 0035
specialize prime_field_polynomial_synthetic_leading_coefficient (a) - 0036
specialize prime_field_polynomial_synthetic_leading_coefficient (n) - 0037
specialize prime_field_polynomial_synthetic_leading_coefficient (qb) - 0038
specialize prime_field_polynomial_synthetic_leading_coefficient (qc) - 0039
specialize prime_field_polynomial_synthetic_leading_coefficient (r) - 0040
specialize prime_field_polynomial_synthetic_leading_coefficient (x) - 0041
apply prime_field_polynomial_synthetic_leading_coefficient - 0042
exact hp - 0043
exact hs - 0044
exact hd_right_right_witness_left - 0045
exact hd_right_right_witness_right