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.
Exact expanded first-order arithmetic statement
forall p dp dn. ((~(p = 1) /\ forall frm_prime_left_hsc_derivative_prime frm_prime_right_hsc_derivative_prime. p = frm_prime_left_hsc_derivative_prime * frm_prime_right_hsc_derivative_prime -> frm_prime_left_hsc_derivative_prime = 1 \/ frm_prime_right_hsc_derivative_prime = 1)) -> (~(exists hgcrt_mod_left_hpl_hsc_derivative_criterion hgcrt_mod_right_hpl_hsc_derivative_criterion. dp + p * hgcrt_mod_left_hpl_hsc_derivative_criterion = dn + p * hgcrt_mod_right_hpl_hsc_derivative_criterion)) -> (exists sph_inverse_hsc_derivative_unit. ((exists hpl_gap_hsc_derivative_unit. hpl_gap_hsc_derivative_unit + S (sph_inverse_hsc_derivative_unit) = (p)) /\ (exists hgcrt_mod_left_hpl_hsc_derivative_unit hgcrt_mod_right_hpl_hsc_derivative_unit. (dp * sph_inverse_hsc_derivative_unit) + p * hgcrt_mod_left_hpl_hsc_derivative_unit = (1 + dn * sph_inverse_hsc_derivative_unit) + p * hgcrt_mod_right_hpl_hsc_derivative_unit)))Constructive proof overview
Generated structural guide
The ordinary signed nonzero-mod-prime derivative condition constructs the full bounded derivative-unit witness; neither an inverse nor a natural blend is supplied.
The unchanged tactic script uses 3 declared prerequisites and contains 24 exact native proof lines.
Alpha v34 checked-use · first admitted v27 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
prime_nonzero Stable theorem; checked-use authorized nonzero_is_succ Stable theorem; checked-use authorized HL0025 hensel_prime_blended_nonzero_derivative_is_unitDirect dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This exact body belongs to a complete independently kernel-checked constructive proof bundle and has Alpha checked-use authority; it does not imply Stable membership.
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–5
02Establish hpredecessorL6–13
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply nonzero is succ.
03Separate the logical casesL14–14
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L14
cases hpredecessor
04Use earlier factsL15–21
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L15
specialize hensel_prime_blended_nonzero_derivative_is_unit (p) - L16
specialize hensel_prime_blended_nonzero_derivative_is_unit (x) - L17
specialize hensel_prime_blended_nonzero_derivative_is_unit (dp) - L18
specialize hensel_prime_blended_nonzero_derivative_is_unit (dn) - L19
specialize hensel_prime_blended_nonzero_derivative_is_unit (dp + x * dn) - L20
apply hensel_prime_blended_nonzero_derivative_is_unit - L21
exact hpredecessor_witness
05Calculate and transport equalitiesL22–22
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L22
refl
Original exact command ledger · 24 lines
- 0001
intro p - 0002
intro dp - 0003
intro dn - 0004
intro hp - 0005
intro hnonzero - 0006
have hpredecessor : exists h. p = S h - 0007
specialize nonzero_is_succ (p) - 0008
apply nonzero_is_succ - 0009
intro hz - 0010
specialize prime_nonzero (p) - 0011
apply prime_nonzero - 0012
exact hp - 0013
exact hz - 0014
cases hpredecessor - 0015
specialize hensel_prime_blended_nonzero_derivative_is_unit (p) - 0016
specialize hensel_prime_blended_nonzero_derivative_is_unit (x) - 0017
specialize hensel_prime_blended_nonzero_derivative_is_unit (dp) - 0018
specialize hensel_prime_blended_nonzero_derivative_is_unit (dn) - 0019
specialize hensel_prime_blended_nonzero_derivative_is_unit (dp + x * dn) - 0020
apply hensel_prime_blended_nonzero_derivative_is_unit - 0021
exact hpredecessor_witness - 0022
refl - 0023
exact hp - 0024
exact hnonzero