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
∀ n. Odd(S n) → Even(n)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
1 occurrences
Exact expanded native-PA statement
forall n. (exists a. S n = 2 * a + 1) -> exists b. n = 2 * bProof 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–2
02Use earlier factsL3–3
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L3
specialize parity_cases n
03Separate the logical casesL4–5
04Construct an explicit witnessL6–6
Supply the displayed value, then prove that it has the required property.
- L6
exists x
05Use earlier factsL7–7
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L7
exact parity_cases_witness_left
06Separate the logical casesL8–8
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L8
exfalso
07Establish hseL9–11
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply successor even of odd.
08Construct an explicit witnessL12–12
Supply the displayed value, then prove that it has the required property.
- L12
exists x
Original defined command ledger · 17 lines
- 0001
intro n - 0002
intro hso - 0003
specialize parity_cases n - 0004
cases parity_cases - 0005
cases parity_cases_witness - 0006
exists x - 0007
exact parity_cases_witness_left - 0008
exfalso - 0009
have hse : Even(S n)Exact native replay line
have hse : exists b. S n = 2 * b - 0010
specialize successor_even_of_odd n - 0011
apply successor_even_of_odd - 0012
exists x - 0013
exact parity_cases_witness_right - 0014
specialize odd_not_even (S n) - 0015
apply odd_not_even - 0016
exact hso - 0017
exact hse