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. ∀ r. ∀ m. Odd(p) → r + m = p → ModEq(2,r,m + 1)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
2 occurrences
In local proof propositions
0 occurrences
Exact expanded native-PA statement
forall p r m. (exists sdp_odd_prime_like_modulus. p = 2 * sdp_odd_prime_like_modulus + 1) -> r + m = p -> (exists sdp_u_reflected_remainder sdp_v_reflected_remainder. (r) + 2 * sdp_u_reflected_remainder = (m + 1) + 2 * sdp_v_reflected_remainder)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 (3)
01Fix variables and assumptionsL1–5
02Separate the logical casesL6–6
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L6
cases hp
03Establish hdoubleL7–10
04Construct an explicit witnessL11–12
05Calculate and transport equalitiesL13–15
06Use earlier factsL16–16
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L16
exact hdouble
07Calculate and transport equalitiesL17–18
08Use earlier factsL19–19
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L19
apply add_assoc
09Calculate and transport equalitiesL20–26
10Use earlier factsL27–27
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L27
apply add_succ_left
Original defined command ledger · 27 lines
- 0001
intro p - 0002
intro r - 0003
intro m - 0004
intro hp - 0005
intro hreflect - 0006
cases hp - 0007
have hdouble : 2 * m = m + m - 0008
trans m * 2 - 0009
apply mul_comm - 0010
simp [zero_add] - 0011
exists m - 0012
exists x - 0013
trans r + (m + m) - 0014
congr - 0015
refl - 0016
exact hdouble - 0017
trans (r + m) + m - 0018
symm - 0019
apply add_assoc - 0020
trans p + m - 0021
rewrite hreflect - 0022
refl - 0023
trans (2 * x + 1) + m - 0024
rewrite hp_witness - 0025
refl - 0026
simp [add_assoc, add_comm] - 0027
apply add_succ_left