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 expanded first-order arithmetic statement
forall p d e. ~(p=0) -> ~(d=0) -> ((((~(exists pvs_factor_toggle_positive_graphfresh_input. (d) = (p) * pvs_factor_toggle_positive_graphfresh_input)) /\ ((e)=(p)*(d)))) \/ (((((d)=(p)*(e)) /\ (~(exists pvs_factor_toggle_positive_graphfresh_output. (e) = (p) * pvs_factor_toggle_positive_graphfresh_output)))) \/ (((exists pvs_factor_toggle_positive_graphsquare. (d) = ((p)*(p)) * pvs_factor_toggle_positive_graphsquare) /\ ((e)=(d)))))) -> ~(e=0)Constructive proof overview
Generated structural guide
Every raw toggle of a positive input by a nonzero p remains positive, including the quotient branch.
The unchanged tactic script uses 2 declared prerequisites and contains 29 exact native proof lines.
Alpha v34 checked-use · first admitted v31 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
mul_ne_zero Stable theorem; checked-use authorized factor_nonzero_right 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. 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.
01Fix variables and assumptionsL1–7
02Separate the logical casesL8–9
03Use earlier factsL10–14
04Calculate and transport equalitiesL15–15
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L15
rewrite he_left_right at hz
05Use earlier factsL16–16
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L16
exact hz
06Separate the logical casesL17–18
07Use earlier factsL19–25
08Separate the logical casesL26–26
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L26
cases he_right_right
09Use earlier factsL27–27
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L27
apply hd
10Calculate and transport equalitiesL28–28
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L28
rewrite he_right_right_right at hz
11Use earlier factsL29–29
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L29
exact hz
Original exact command ledger · 29 lines
- 0001
intro p - 0002
intro d - 0003
intro e - 0004
intro hp - 0005
intro hd - 0006
intro he - 0007
intro hz - 0008
cases he - 0009
cases he_left - 0010
specialize mul_ne_zero (p) - 0011
specialize mul_ne_zero (d) - 0012
apply mul_ne_zero - 0013
exact hp - 0014
exact hd - 0015
rewrite he_left_right at hz - 0016
exact hz - 0017
cases he_right - 0018
cases he_right_left - 0019
specialize factor_nonzero_right (d) - 0020
specialize factor_nonzero_right (p) - 0021
specialize factor_nonzero_right (e) - 0022
apply factor_nonzero_right - 0023
exact hd - 0024
exact he_right_left_left - 0025
exact hz - 0026
cases he_right_right - 0027
apply hd - 0028
rewrite he_right_right_right at hz - 0029
exact hz