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. ∀ m. Le(n,m) ∨ Le(m,n)Every purple notation token opens its conservative definition. Expanding the displayed statement recovers the exact first-order Peano-arithmetic formula checked by the unchanged kernel.
Definitions used by this theorem
In the theorem statement
2 occurrences
In local proof propositions
0 occurrences
Exact expanded native-PA statement
forall n m. n <= m \/ m <= nProof neighborhood
Direct theorem prerequisites
Direct theorem dependents
Definition-aware tactic body
Only local propositions introduced by have or suffices are compacted. Every changed line has an exact-AST conservative-expansion receipt; the kernel still receives the immutable original tactic script.
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.
01Induction on nL1–2
02Separate the logical casesL3–3
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L3
left
03Construct an explicit witnessL4–4
Supply the displayed value, then prove that it has the required property.
- L4
exists m
04Calculate and transport equalitiesL5–5
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L5
simp
05Induction on mL6–6
Split the argument into the base and successor obligations. The induction hypothesis is available only in the successor branch.
- L6
induction m
06Separate the logical casesL7–7
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L7
right
07Construct an explicit witnessL8–8
Supply the displayed value, then prove that it has the required property.
- L8
exists (S n)
08Calculate and transport equalitiesL9–9
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L9
simp
09Use earlier factsL10–10
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L10
specialize IH m
10Separate the logical casesL11–13
11Construct an explicit witnessL14–14
Supply the displayed value, then prove that it has the required property.
- L14
exists x
12Calculate and transport equalitiesL15–16
13Use earlier factsL17–17
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L17
exact IH_left_witness
14Separate the logical casesL18–19
15Construct an explicit witnessL20–20
Supply the displayed value, then prove that it has the required property.
- L20
exists x
16Calculate and transport equalitiesL21–22
17Use earlier factsL23–23
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L23
exact IH_right_witness
Original defined command ledger · 23 lines
- 0001
induction n - 0002
intro m - 0003
left - 0004
exists m - 0005
simp - 0006
induction m - 0007
right - 0008
exists (S n) - 0009
simp - 0010
specialize IH m - 0011
cases IH - 0012
cases IH_left - 0013
left - 0014
exists x - 0015
rewrite PA4 - 0016
congr - 0017
exact IH_left_witness - 0018
cases IH_right - 0019
right - 0020
exists x - 0021
rewrite PA4 - 0022
congr - 0023
exact IH_right_witness