Exact expanded PA statement
forall u v b c. (forall wpo_position_wpoi_zero_closed wpo_source_wpoi_zero_closed wpo_mate_wpoi_zero_closed. (exists wpo_gap_wpoi_zero_closed_position_bound. wpo_gap_wpoi_zero_closed_position_bound + S (wpo_position_wpoi_zero_closed) = 0) -> (((exists wpo_beta_height_wpoi_zero_closed_source_entry. wpo_beta_height_wpoi_zero_closed_source_entry + S (wpo_source_wpoi_zero_closed) = S ((S (wpo_position_wpoi_zero_closed)) * c)) /\ exists wpo_beta_quotient_wpoi_zero_closed_source_entry. b = wpo_beta_quotient_wpoi_zero_closed_source_entry * S ((S (wpo_position_wpoi_zero_closed)) * c) + (wpo_source_wpoi_zero_closed))) -> (((exists wpo_beta_height_wpoi_zero_closed_inverse_entry. wpo_beta_height_wpoi_zero_closed_inverse_entry + S (wpo_mate_wpoi_zero_closed) = S ((S (wpo_source_wpoi_zero_closed)) * v)) /\ exists wpo_beta_quotient_wpoi_zero_closed_inverse_entry. u = wpo_beta_quotient_wpoi_zero_closed_inverse_entry * S ((S (wpo_source_wpoi_zero_closed)) * v) + (wpo_mate_wpoi_zero_closed))) -> exists wpo_mate_position_wpoi_zero_closed. ((exists wpo_gap_wpoi_zero_closed_mate_bound. wpo_gap_wpoi_zero_closed_mate_bound + S (wpo_mate_position_wpoi_zero_closed) = 0) /\ (((exists wpo_beta_height_wpoi_zero_closed_mate_entry. wpo_beta_height_wpoi_zero_closed_mate_entry + S (wpo_mate_wpoi_zero_closed) = S ((S (wpo_mate_position_wpoi_zero_closed)) * c)) /\ exists wpo_beta_quotient_wpoi_zero_closed_mate_entry. b = wpo_beta_quotient_wpoi_zero_closed_mate_entry * S ((S (wpo_mate_position_wpoi_zero_closed)) * c) + (wpo_mate_wpoi_zero_closed)))))Structural proof guide
Generated structural guide
Orbit closure is vacuous on the empty decoded prefix.
Use the direct prerequisites add_eq_zero_right, succ_ne_zero as previously established PA formulas.
The proof proceeds by case analysis (1), intermediate claims (1).
Referenced ingredients
Proof neighborhood
Direct dependencies
Direct dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Linked names are exact direct references. This Alpha-v16 checked-use theorem is independently kernel-checked when replayed; it is not a Stable theorem.
- 0001
intro u - 0002
intro v - 0003
intro b - 0004
intro c - 0005
intro q - 0006
intro s - 0007
intro m - 0008
intro hq - 0009
intro hsource - 0010
intro hinverse - 0011
exfalso - 0012
cases hq - 0013
have hsq : S q = 0 - 0014
specialize add_eq_zero_right x - 0015
specialize add_eq_zero_right (S q) - 0016
apply add_eq_zero_right - 0017
exact hq_witness - 0018
specialize succ_ne_zero q - 0019
apply succ_ne_zero - 0020
exact hsq