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.
Statement with defined notation
∀ p. ∀ h. ∀ a. ∀ b. ∀ c. ∀ i. ∀ x. ∀ q. ∀ r. p = 2 · h + 1 → BetaAt(b,c,i,x) → a · x = q · p + r → Lt(r,p) → ¬r = 0 → ∃ y. ∃ z. ∃ n. BetaAt(b,c,i,y) ∧ (Lt(0,z) ∧ (Le(z,h) ∧ ((n = 0 ∨ n = 1) ∧ (n = 0 ∧ ModEq(p,a · y,z) ∨ n = 1 ∧ ModEq(p,a · y,2 · h · z)))))Every purple notation token opens its conservative definition. This is a reading surface; the compiler expands the statement before the unchanged kernel checks it.
Definitions used by this theorem
In the theorem statement
7 occurrences
In local proof propositions
4 occurrences
Exact expanded native-PA statement
forall p h a b c i x q r. p = 2 * h + 1 -> (((exists ff_h_gsp_point_source. ff_h_gsp_point_source + S (x) = S ((S (i)) * c)) /\ exists ff_q_gsp_point_source. b = ff_q_gsp_point_source * S ((S (i)) * c) + (x))) -> a * x = q * p + r -> (exists gsp_lt_gap_point_remainder_bound. gsp_lt_gap_point_remainder_bound + S r = p) -> ~(r = 0) -> (exists gsp_value_point_result gsp_magnitude_point_result gsp_sign_point_result. (((exists ff_h_gsp_point_result_source. ff_h_gsp_point_result_source + S (gsp_value_point_result) = S ((S (i)) * c)) /\ exists ff_q_gsp_point_result_source. b = ff_q_gsp_point_result_source * S ((S (i)) * c) + (gsp_value_point_result))) /\ ((exists gsp_lt_gap_point_result_positive. gsp_lt_gap_point_result_positive + S 0 = gsp_magnitude_point_result) /\ ((exists gsp_le_gap_point_result_bounded. gsp_le_gap_point_result_bounded + gsp_magnitude_point_result = h) /\ ((gsp_sign_point_result = 0 \/ gsp_sign_point_result = 1) /\ (((gsp_sign_point_result = 0 /\ (exists gsp_mod_left_point_result_lower gsp_mod_right_point_result_lower. (a * gsp_value_point_result) + p * gsp_mod_left_point_result_lower = (gsp_magnitude_point_result) + p * gsp_mod_right_point_result_lower)) \/ (gsp_sign_point_result = 1 /\ (exists gsp_mod_left_point_result_reflected gsp_mod_right_point_result_reflected. (a * gsp_value_point_result) + p * gsp_mod_left_point_result_reflected = ((2 * h) * gsp_magnitude_point_result) + p * gsp_mod_right_point_result_reflected))))))))Proof neighborhood
Direct theorem prerequisites
Direct theorem dependents
Definition-aware tactic body
Only local propositions introduced by have or suffices are compacted. The untrusted compiler re-expands each one before the original tactic script is replayed; defined notation is never accepted by the kernel. Open the exact replay line beneath every changed command.
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–10
02Fix variables and assumptionsL11–14
03Establish hrepresentativeL15–24
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply gauss pointwise signed half representative.
- L15
have hrepresentative : ∃ m. Lt(0,m) ∧ (Le(m,h) ∧ (ModEq(p,a · x,m) ∨ ModEq(p,a · x,2 · h · m)))Definitions: Lt(0,m)Le(m,h)ModEq(p,a · x,m)ModEq(p,a · x,2 · h · m)Original native command in the exact edition - L16
specialize gauss_pointwise_signed_half_representative p - L17
specialize gauss_pointwise_signed_half_representative h - L18
specialize gauss_pointwise_signed_half_representative a - L19
specialize gauss_pointwise_signed_half_representative x - L20
specialize gauss_pointwise_signed_half_representative q - L21
specialize gauss_pointwise_signed_half_representative r - L22
apply gauss_pointwise_signed_half_representative - L23
exact hp - L24
exact hdecomp
04Use earlier factsL25–26
05Separate the logical casesL27–30
06Construct an explicit witnessL31–33
07Separate the logical casesL34–34
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L34
split
08Use earlier factsL35–35
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L35
exact hsource
09Separate the logical casesL36–36
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L36
split
10Use earlier factsL37–37
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L37
exact hrepresentative_witness_left
11Separate the logical casesL38–38
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L38
split
12Use earlier factsL39–39
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L39
exact hrepresentative_witness_right_left
13Separate the logical casesL40–41
14Calculate and transport equalitiesL42–42
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L42
refl
15Separate the logical casesL43–44
16Calculate and transport equalitiesL45–45
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L45
refl
17Use earlier factsL46–46
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L46
exact hrepresentative_witness_right_right_left
18Construct an explicit witnessL47–49
19Separate the logical casesL50–50
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L50
split
20Use earlier factsL51–51
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L51
exact hsource
21Separate the logical casesL52–52
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L52
split
22Use earlier factsL53–53
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L53
exact hrepresentative_witness_left
23Separate the logical casesL54–54
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L54
split
24Use earlier factsL55–55
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L55
exact hrepresentative_witness_right_left
25Separate the logical casesL56–57
26Calculate and transport equalitiesL58–58
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L58
refl
27Separate the logical casesL59–60
28Calculate and transport equalitiesL61–61
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L61
refl
29Use earlier factsL62–62
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L62
exact hrepresentative_witness_right_right_right
Original defined command ledger · 62 lines
- 0001
intro p - 0002
intro h - 0003
intro a - 0004
intro b - 0005
intro c - 0006
intro i - 0007
intro x - 0008
intro q - 0009
intro r - 0010
intro hp - 0011
intro hsource - 0012
intro hdecomp - 0013
intro hrp - 0014
intro hr0 - 0015
have hrepresentative : ∃ m. Lt(0,m) ∧ (Le(m,h) ∧ (ModEq(p,a · x,m) ∨ ModEq(p,a · x,2 · h · m)))Exact native replay line
have hrepresentative : exists m. (exists gsp_lt_gap_point_result_positive. gsp_lt_gap_point_result_positive + S 0 = m) /\ ((exists gsp_le_gap_point_result_bounded. gsp_le_gap_point_result_bounded + m = h) /\ ((exists gsp_mod_left_point_result_lower gsp_mod_right_point_result_lower. (a * x) + p * gsp_mod_left_point_result_lower = (m) + p * gsp_mod_right_point_result_lower) \/ (exists gsp_mod_left_point_result_reflected gsp_mod_right_point_result_reflected. (a * x) + p * gsp_mod_left_point_result_reflected = ((2 * h) * m) + p * gsp_mod_right_point_result_reflected))) - 0016
specialize gauss_pointwise_signed_half_representative p - 0017
specialize gauss_pointwise_signed_half_representative h - 0018
specialize gauss_pointwise_signed_half_representative a - 0019
specialize gauss_pointwise_signed_half_representative x - 0020
specialize gauss_pointwise_signed_half_representative q - 0021
specialize gauss_pointwise_signed_half_representative r - 0022
apply gauss_pointwise_signed_half_representative - 0023
exact hp - 0024
exact hdecomp - 0025
exact hrp - 0026
exact hr0 - 0027
cases hrepresentative - 0028
cases hrepresentative_witness - 0029
cases hrepresentative_witness_right - 0030
cases hrepresentative_witness_right_right - 0031
exists x - 0032
exists x1 - 0033
exists 0 - 0034
split - 0035
exact hsource - 0036
split - 0037
exact hrepresentative_witness_left - 0038
split - 0039
exact hrepresentative_witness_right_left - 0040
split - 0041
left - 0042
refl - 0043
left - 0044
split - 0045
refl - 0046
exact hrepresentative_witness_right_right_left - 0047
exists x - 0048
exists x1 - 0049
exists 1 - 0050
split - 0051
exact hsource - 0052
split - 0053
exact hrepresentative_witness_left - 0054
split - 0055
exact hrepresentative_witness_right_left - 0056
split - 0057
right - 0058
refl - 0059
right - 0060
split - 0061
refl - 0062
exact hrepresentative_witness_right_right_right