Exact expanded PA statement
forall p h a x n q r m s. p = 2 * h + 1 -> (exists sdp_odd_gep_scale. a = 2 * sdp_odd_gep_scale + 1) -> n = a * x -> n = p * q + r -> (exists gsp_lt_gap_gep_r_below. gsp_lt_gap_gep_r_below + S r = p) -> (exists gsp_lt_gap_gep_m_positive. gsp_lt_gap_gep_m_positive + S 0 = m) -> (exists gsp_le_gap_gep_m_bounded. gsp_le_gap_gep_m_bounded + m = h) -> (((s = 0 /\ (exists wpp_mod_left_gep_n_mod_m wpp_mod_right_gep_n_mod_m. (n) + p * wpp_mod_left_gep_n_mod_m = (m) + p * wpp_mod_right_gep_n_mod_m)) \/ (s = 1 /\ (exists wpp_mod_left_gep_n_mod_reflected wpp_mod_right_gep_n_mod_reflected. (n) + p * wpp_mod_left_gep_n_mod_reflected = ((2 * h) * m) + p * wpp_mod_right_gep_n_mod_reflected)))) -> (exists sdp_u_gep_generic_result sdp_v_gep_generic_result. (x) + 2 * sdp_u_gep_generic_result = (q + m + s) + 2 * sdp_v_gep_generic_result)Structural proof guide
Generated structural guide
Exact signed division data gives the Gauss--Eisenstein modulo-two relation.
Use the direct prerequisites odd_signed_division_branch_exact, odd_scaled_division_signed_mod_two as previously established PA formulas.
The proof proceeds by intermediate claims (2).
Referenced ingredients
Proof neighborhood
Direct dependencies
Direct dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Linked names are exact direct references. This Alpha-v16 checked-use theorem is independently kernel-checked when replayed; it is not a Stable theorem.
- 0001
intro p - 0002
intro h - 0003
intro a - 0004
intro x - 0005
intro n - 0006
intro q - 0007
intro r - 0008
intro m - 0009
intro s - 0010
intro hp - 0011
intro ha - 0012
intro hnscale - 0013
intro hdivision - 0014
intro hrbelow - 0015
intro hmpositive - 0016
intro hmbounded - 0017
intro hsigned - 0018
have hexact : ((s = 0 /\ r = m) \/ (s = 1 /\ r + m = p)) - 0019
specialize odd_signed_division_branch_exact p - 0020
specialize odd_signed_division_branch_exact h - 0021
specialize odd_signed_division_branch_exact n - 0022
specialize odd_signed_division_branch_exact q - 0023
specialize odd_signed_division_branch_exact r - 0024
specialize odd_signed_division_branch_exact m - 0025
specialize odd_signed_division_branch_exact s - 0026
apply odd_signed_division_branch_exact - 0027
exact hp - 0028
exact hdivision - 0029
exact hrbelow - 0030
exact hmpositive - 0031
exact hmbounded - 0032
exact hsigned - 0033
have hpodd : exists sdp_odd_gep_modulus. p = 2 * sdp_odd_gep_modulus + 1 - 0034
exists h - 0035
exact hp - 0036
specialize odd_scaled_division_signed_mod_two p - 0037
specialize odd_scaled_division_signed_mod_two a - 0038
specialize odd_scaled_division_signed_mod_two x - 0039
specialize odd_scaled_division_signed_mod_two q - 0040
specialize odd_scaled_division_signed_mod_two r - 0041
specialize odd_scaled_division_signed_mod_two m - 0042
specialize odd_scaled_division_signed_mod_two s - 0043
apply odd_scaled_division_signed_mod_two - 0044
exact hpodd - 0045
exact ha - 0046
trans n - 0047
symm - 0048
exact hnscale - 0049
exact hdivision - 0050
exact hexact