Exact expanded first-order arithmetic statement
forall p a b. (~((p) = 1) /\ forall pfa_factor_left_inverse_output_domain pfa_factor_right_inverse_output_domain. (p) = pfa_factor_left_inverse_output_domain * pfa_factor_right_inverse_output_domain -> pfa_factor_left_inverse_output_domain = 1 \/ pfa_factor_right_inverse_output_domain = 1) -> (((~((a) = 0)) /\ ((((exists pfa_gap_inverse_outputmultiplicationleft. pfa_gap_inverse_outputmultiplicationleft + S (a) = (p)) /\ (((exists pfa_gap_inverse_outputmultiplicationright. pfa_gap_inverse_outputmultiplicationright + S (b) = (p)) /\ ((((exists pfa_gap_inverse_outputmultiplicationresultbound. pfa_gap_inverse_outputmultiplicationresultbound + S (1) = (p)) /\ ((exists pfa_offset_left_inverse_outputmultiplicationresultcongruence pfa_offset_right_inverse_outputmultiplicationresultcongruence. ((a) * (b)) + (p) * pfa_offset_left_inverse_outputmultiplicationresultcongruence = (1) + (p) * pfa_offset_right_inverse_outputmultiplicationresultcongruence)))))))))))) -> ~(b = 0)Constructive proof overview
Generated structural guide
An actual inverse is itself nonzero, so reciprocal inversion has the correct domain.
The unchanged tactic script uses 2 declared prerequisites and contains 21 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–6
02Separate the logical casesL7–7
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L7
cases hi
03Use earlier factsL8–11
04Establish hmL12–21
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime field multiply commutative.
- L12
have hm : ((exists pfa_gap_inverse_swappedleft. pfa_gap_inverse_swappedleft + S (b) = (p)) /\ (((exists pfa_gap_inverse_swappedright. pfa_gap_inverse_swappedright + S (a) = (p)) /\ ((((exists pfa_gap_inverse_swappedresultbound. pfa_gap_inverse_swappedresultbound + S (1) = (p)) /\ ((exists pfa_offset_left_inverse_swappedresultcongruence pfa_offset_right_inverse_swappedresultcongruence. ((b) * (a)) + (p) * pfa_offset_left_inverse_swappedresultcongruence = (1) + (p) * pfa_offset_right_inverse_swappedresultcongruence)))))))) - L13
specialize prime_field_multiply_commutative (p) - L14
specialize prime_field_multiply_commutative (a) - L15
specialize prime_field_multiply_commutative (b) - L16
specialize prime_field_multiply_commutative (1) - L17
apply prime_field_multiply_commutative - L18
exact hi_right - L19
rewrite hz at hm - L20
rewrite hz at hm - L21
exact hm
Original exact command ledger · 21 lines
- 0001
intro p - 0002
intro a - 0003
intro b - 0004
intro hp - 0005
intro hi - 0006
intro hz - 0007
cases hi - 0008
specialize prime_field_zero_has_no_multiplicative_inverse (p) - 0009
specialize prime_field_zero_has_no_multiplicative_inverse (a) - 0010
apply prime_field_zero_has_no_multiplicative_inverse - 0011
exact hp - 0012
have hm : ((exists pfa_gap_inverse_swappedleft. pfa_gap_inverse_swappedleft + S (b) = (p)) /\ (((exists pfa_gap_inverse_swappedright. pfa_gap_inverse_swappedright + S (a) = (p)) /\ ((((exists pfa_gap_inverse_swappedresultbound. pfa_gap_inverse_swappedresultbound + S (1) = (p)) /\ ((exists pfa_offset_left_inverse_swappedresultcongruence pfa_offset_right_inverse_swappedresultcongruence. ((b) * (a)) + (p) * pfa_offset_left_inverse_swappedresultcongruence = (1) + (p) * pfa_offset_right_inverse_swappedresultcongruence)))))))) - 0013
specialize prime_field_multiply_commutative (p) - 0014
specialize prime_field_multiply_commutative (a) - 0015
specialize prime_field_multiply_commutative (b) - 0016
specialize prime_field_multiply_commutative (1) - 0017
apply prime_field_multiply_commutative - 0018
exact hi_right - 0019
rewrite hz at hm - 0020
rewrite hz at hm - 0021
exact hm