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
∀ m. ∀ n. ¬m = 0 → Dvd(m,n) → ∃ x. ∃ y. n = m · x + y ∧ y = 0 ∧ Lt(y,m)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 m n. ~(m = 0) -> (exists q. n = m * q) -> exists q r. (n = m * q + r /\ r = 0) /\ S r <= mProof 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.
Named ingredients (1)
01Fix variables and assumptionsL1–4
02Separate the logical casesL5–5
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L5
cases hd
03Use earlier factsL6–6
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L6
specialize zero_or_succ m
04Separate the logical casesL7–8
05Use earlier factsL9–10
06Separate the logical casesL11–11
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L11
cases zero_or_succ_right
07Construct an explicit witnessL12–13
08Separate the logical casesL14–15
09Calculate and transport equalitiesL16–18
10Construct an explicit witnessL19–19
Supply the displayed value, then prove that it has the required property.
- L19
exists x1
Original defined command ledger · 21 lines
- 0001
intro m - 0002
intro n - 0003
intro hm - 0004
intro hd - 0005
cases hd - 0006
specialize zero_or_succ m - 0007
cases zero_or_succ - 0008
exfalso - 0009
apply hm - 0010
exact zero_or_succ_left - 0011
cases zero_or_succ_right - 0012
exists x - 0013
exists 0 - 0014
split - 0015
split - 0016
rewrite hd_witness - 0017
simp - 0018
refl - 0019
exists x1 - 0020
rewrite zero_or_succ_right_witness - 0021
simp