Exact expanded first-order arithmetic statement
forall p a. (~((p) = 1) /\ forall pfa_factor_left_inverse_unique_domain pfa_factor_right_inverse_unique_domain. (p) = pfa_factor_left_inverse_unique_domain * pfa_factor_right_inverse_unique_domain -> pfa_factor_left_inverse_unique_domain = 1 \/ pfa_factor_right_inverse_unique_domain = 1) -> (exists pfa_gap_inverse_unique_input. pfa_gap_inverse_unique_input + S (a) = (p)) -> ~(a = 0) -> exists b. (((~((a) = 0)) /\ ((((exists pfa_gap_inverse_chosenmultiplicationleft. pfa_gap_inverse_chosenmultiplicationleft + S (a) = (p)) /\ (((exists pfa_gap_inverse_chosenmultiplicationright. pfa_gap_inverse_chosenmultiplicationright + S (b) = (p)) /\ ((((exists pfa_gap_inverse_chosenmultiplicationresultbound. pfa_gap_inverse_chosenmultiplicationresultbound + S (1) = (p)) /\ ((exists pfa_offset_left_inverse_chosenmultiplicationresultcongruence pfa_offset_right_inverse_chosenmultiplicationresultcongruence. ((a) * (b)) + (p) * pfa_offset_left_inverse_chosenmultiplicationresultcongruence = (1) + (p) * pfa_offset_right_inverse_chosenmultiplicationresultcongruence)))))))))))) /\ forall c. (((~((a) = 0)) /\ ((((exists pfa_gap_inverse_othermultiplicationleft. pfa_gap_inverse_othermultiplicationleft + S (a) = (p)) /\ (((exists pfa_gap_inverse_othermultiplicationright. pfa_gap_inverse_othermultiplicationright + S (c) = (p)) /\ ((((exists pfa_gap_inverse_othermultiplicationresultbound. pfa_gap_inverse_othermultiplicationresultbound + S (1) = (p)) /\ ((exists pfa_offset_left_inverse_othermultiplicationresultcongruence pfa_offset_right_inverse_othermultiplicationresultcongruence. ((a) * (c)) + (p) * pfa_offset_left_inverse_othermultiplicationresultcongruence = (1) + (p) * pfa_offset_right_inverse_othermultiplicationresultcongruence)))))))))))) -> c = bConstructive proof overview
Generated structural guide
Proved unique inverse existence has exactly the nonzero carrier domain, not an odd-prime or supplied-inverse premise.
The unchanged tactic script uses 2 declared prerequisites and contains 25 exact native proof lines.
Public research checkpoint: original HA and independently compiled Lean verified; not Alpha-enrolled, no Alpha checked-use authority; not Stable
Proof neighborhood
Direct dependencies
Direct dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. The literal dependency-closed bundle is checked by original HA and the independently compiled Lean verifier. Public delivery grants no Alpha checked-use authority or 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 (2)
01Fix variables and assumptionsL1–5
02Establish hbL6–12
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime field inverse exists.
03Separate the logical casesL13–13
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L13
cases hb
04Construct an explicit witnessL14–14
Supply the displayed value, then prove that it has the required property.
- L14
exists x
05Separate the logical casesL15–15
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L15
split
06Use earlier factsL16–16
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L16
exact hb_witness
07Fix variables and assumptionsL17–18
08Use earlier factsL19–25
Instantiate or apply named facts and discharge the corresponding proof obligations.
Original exact command ledger · 25 lines
- 0001
intro p - 0002
intro a - 0003
intro hp - 0004
intro ha - 0005
intro hn - 0006
have hb : exists b. (((~((a) = 0)) /\ ((((exists pfa_gap_inverse_choicemultiplicationleft. pfa_gap_inverse_choicemultiplicationleft + S (a) = (p)) /\ (((exists pfa_gap_inverse_choicemultiplicationright. pfa_gap_inverse_choicemultiplicationright + S (b) = (p)) /\ ((((exists pfa_gap_inverse_choicemultiplicationresultbound. pfa_gap_inverse_choicemultiplicationresultbound + S (1) = (p)) /\ ((exists pfa_offset_left_inverse_choicemultiplicationresultcongruence pfa_offset_right_inverse_choicemultiplicationresultcongruence. ((a) * (b)) + (p) * pfa_offset_left_inverse_choicemultiplicationresultcongruence = (1) + (p) * pfa_offset_right_inverse_choicemultiplicationresultcongruence)))))))))))) - 0007
specialize prime_field_inverse_exists (p) - 0008
specialize prime_field_inverse_exists (a) - 0009
apply prime_field_inverse_exists - 0010
exact hp - 0011
exact ha - 0012
exact hn - 0013
cases hb - 0014
exists x - 0015
split - 0016
exact hb_witness - 0017
intro c - 0018
intro hc - 0019
specialize prime_field_inverse_functional (p) - 0020
specialize prime_field_inverse_functional (a) - 0021
specialize prime_field_inverse_functional (c) - 0022
specialize prime_field_inverse_functional (x) - 0023
apply prime_field_inverse_functional - 0024
exact hc - 0025
exact hb_witness