Exact expanded first-order arithmetic statement
forall n d. (((~((n) = 0)) /\ (forall sfd_prime_divisor_source. (~((sfd_prime_divisor_source) = 1) /\ forall pvs_left_divisor_sourcedomain pvs_right_divisor_sourcedomain. (sfd_prime_divisor_source) = pvs_left_divisor_sourcedomain * pvs_right_divisor_sourcedomain -> pvs_left_divisor_sourcedomain = 1 \/ pvs_right_divisor_sourcedomain = 1) -> (exists pvs_le_gap_divisor_sourcebound. pvs_le_gap_divisor_sourcebound + (sfd_prime_divisor_source) = (n)) -> ~(exists pvs_factor_divisor_sourcesquare. (n) = (sfd_prime_divisor_source * sfd_prime_divisor_source) * pvs_factor_divisor_sourcesquare)))) -> (exists pvs_factor_divisor_at. (n) = (d) * pvs_factor_divisor_at) -> (((~((d) = 0)) /\ (forall sfd_prime_divisor_target. (~((sfd_prime_divisor_target) = 1) /\ forall pvs_left_divisor_targetdomain pvs_right_divisor_targetdomain. (sfd_prime_divisor_target) = pvs_left_divisor_targetdomain * pvs_right_divisor_targetdomain -> pvs_left_divisor_targetdomain = 1 \/ pvs_right_divisor_targetdomain = 1) -> (exists pvs_le_gap_divisor_targetbound. pvs_le_gap_divisor_targetbound + (sfd_prime_divisor_target) = (d)) -> ~(exists pvs_factor_divisor_targetsquare. (d) = (sfd_prime_divisor_target * sfd_prime_divisor_target) * pvs_factor_divisor_targetsquare))))Constructive proof overview
Generated structural guide
A genuine divisor of a positive squarefree input is positive and squarefree, with no bound assumption on its prime-square witnesses.
The unchanged tactic script uses 3 declared prerequisites and contains 30 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
factor_nonzero_left Alpha theorem; checked-use authorized squarefree_excludes_prime_square Alpha theorem; checked-use authorized multiple_trans Alpha theorem; checked-use authorizedDirect 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.
01Fix variables and assumptionsL1–4
02Separate the logical casesL5–6
03Fix variables and assumptionsL7–7
Work with arbitrary variables or the premises of the current implication.
- L7
intro hz
04Separate the logical casesL8–8
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L8
cases hdiv
05Use earlier factsL9–15
06Fix variables and assumptionsL16–19
07Use earlier factsL20–29
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L20
specialize squarefree_excludes_prime_square (n) - L21
specialize squarefree_excludes_prime_square (p) - L22
apply squarefree_excludes_prime_square - L23
exact hsf - L24
exact hp - L25
specialize multiple_trans (d) - L26
specialize multiple_trans (p * p) - L27
specialize multiple_trans (n) - L28
apply multiple_trans - L29
exact hdiv
08Use earlier factsL30–30
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L30
exact hsquare
Original exact command ledger · 30 lines
- 0001
intro n - 0002
intro d - 0003
intro hsf - 0004
intro hdiv - 0005
cases hsf - 0006
split - 0007
intro hz - 0008
cases hdiv - 0009
specialize factor_nonzero_left (n) - 0010
specialize factor_nonzero_left (d) - 0011
specialize factor_nonzero_left (x) - 0012
apply factor_nonzero_left - 0013
exact hsf_left - 0014
exact hdiv_witness - 0015
exact hz - 0016
intro p - 0017
intro hp - 0018
intro hbound - 0019
intro hsquare - 0020
specialize squarefree_excludes_prime_square (n) - 0021
specialize squarefree_excludes_prime_square (p) - 0022
apply squarefree_excludes_prime_square - 0023
exact hsf - 0024
exact hp - 0025
specialize multiple_trans (d) - 0026
specialize multiple_trans (p * p) - 0027
specialize multiple_trans (n) - 0028
apply multiple_trans - 0029
exact hdiv - 0030
exact hsquare