BT00XO

prime_power_quotient_zero_of_exponent_gt

Alpha body-checked ยท checked-use disabled

A prime-power quotient vanishes once its exponent exceeds the dividend.

Exact expanded PA statement

forall p n e d q r. ((~(p = 1) /\ forall frm_prime_left_b5cvqz_prime frm_prime_right_b5cvqz_prime. p = frm_prime_left_b5cvqz_prime * frm_prime_right_b5cvqz_prime -> frm_prime_left_b5cvqz_prime = 1 \/ frm_prime_right_b5cvqz_prime = 1)) -> (exists bcf_lt_gap_b5cvqz_exponent. bcf_lt_gap_b5cvqz_exponent + S (n) = e) -> (exists bpvi_b_b5cvqz_power bpvi_c_b5cvqz_power. ((forall bpvi_i_b5cvqz_power. (exists bpvi_repeat_gap_b5cvqz_power. bpvi_repeat_gap_b5cvqz_power + S bpvi_i_b5cvqz_power = e) -> (((exists bpvi_h_b5cvqz_power_repeat. bpvi_h_b5cvqz_power_repeat + S (p) = S ((S (bpvi_i_b5cvqz_power)) * bpvi_c_b5cvqz_power)) /\ exists bpvi_q_b5cvqz_power_repeat. bpvi_b_b5cvqz_power = bpvi_q_b5cvqz_power_repeat * S ((S (bpvi_i_b5cvqz_power)) * bpvi_c_b5cvqz_power) + (p)))) /\ (exists bpvi_u_b5cvqz_power bpvi_v_b5cvqz_power. ((((exists bpvi_h_b5cvqz_power_start. bpvi_h_b5cvqz_power_start + S (1) = S ((S (0)) * bpvi_v_b5cvqz_power)) /\ exists bpvi_q_b5cvqz_power_start. bpvi_u_b5cvqz_power = bpvi_q_b5cvqz_power_start * S ((S (0)) * bpvi_v_b5cvqz_power) + (1))) /\ ((((exists bpvi_h_b5cvqz_power_terminal. bpvi_h_b5cvqz_power_terminal + S (d) = S ((S (e)) * bpvi_v_b5cvqz_power)) /\ exists bpvi_q_b5cvqz_power_terminal. bpvi_u_b5cvqz_power = bpvi_q_b5cvqz_power_terminal * S ((S (e)) * bpvi_v_b5cvqz_power) + (d))) /\ forall bpvi_j_b5cvqz_power. (exists bpvi_product_gap_b5cvqz_power. bpvi_product_gap_b5cvqz_power + S bpvi_j_b5cvqz_power = e) -> exists bpvi_factor_b5cvqz_power bpvi_partial_b5cvqz_power bpvi_successor_b5cvqz_power. ((((exists bpvi_h_b5cvqz_power_factor. bpvi_h_b5cvqz_power_factor + S (bpvi_factor_b5cvqz_power) = S ((S (bpvi_j_b5cvqz_power)) * bpvi_c_b5cvqz_power)) /\ exists bpvi_q_b5cvqz_power_factor. bpvi_b_b5cvqz_power = bpvi_q_b5cvqz_power_factor * S ((S (bpvi_j_b5cvqz_power)) * bpvi_c_b5cvqz_power) + (bpvi_factor_b5cvqz_power))) /\ ((((exists bpvi_h_b5cvqz_power_partial. bpvi_h_b5cvqz_power_partial + S (bpvi_partial_b5cvqz_power) = S ((S (bpvi_j_b5cvqz_power)) * bpvi_v_b5cvqz_power)) /\ exists bpvi_q_b5cvqz_power_partial. bpvi_u_b5cvqz_power = bpvi_q_b5cvqz_power_partial * S ((S (bpvi_j_b5cvqz_power)) * bpvi_v_b5cvqz_power) + (bpvi_partial_b5cvqz_power))) /\ ((((exists bpvi_h_b5cvqz_power_successor. bpvi_h_b5cvqz_power_successor + S (bpvi_successor_b5cvqz_power) = S ((S (S bpvi_j_b5cvqz_power)) * bpvi_v_b5cvqz_power)) /\ exists bpvi_q_b5cvqz_power_successor. bpvi_u_b5cvqz_power = bpvi_q_b5cvqz_power_successor * S ((S (S bpvi_j_b5cvqz_power)) * bpvi_v_b5cvqz_power) + (bpvi_successor_b5cvqz_power))) /\ bpvi_successor_b5cvqz_power = bpvi_partial_b5cvqz_power * bpvi_factor_b5cvqz_power)))))))) -> (((n) = (d) * (q) + (r) /\ (exists bcf_lt_gap_b5cvqz_division_bound. bcf_lt_gap_b5cvqz_division_bound + S (r) = d))) -> q = 0

Structural proof guide

A prime-power quotient vanishes once its exponent exceeds the dividend.

Direct prerequisites: prime_power_exponent_le, lt_of_lt_of_le, division_zero_quotient_of_lt. The authored body proceeds by intermediate claims (2).

Proof neighborhood

Direct dependencies

Direct dependents

Formal native tactic body

Dependencies are hypotheses of this body receipt. The focused endpoint audits separately check the complete empty-context certificates.

  1. 0001intro p
  2. 0002intro n
  3. 0003intro e
  4. 0004intro d
  5. 0005intro q
  6. 0006intro r
  7. 0007intro hp
  8. 0008intro hexponent
  9. 0009intro hpower
  10. 0010intro hdivision
  11. 0011have hpower_bound : exists g. g + e = d
  12. 0012specialize prime_power_exponent_le p
  13. 0013specialize prime_power_exponent_le e
  14. 0014specialize prime_power_exponent_le d
  15. 0015apply prime_power_exponent_le
  16. 0016exact hp
  17. 0017exact hpower
  18. 0018have hvalue_bound : exists g. g + S n = d
  19. 0019specialize lt_of_lt_of_le n
  20. 0020specialize lt_of_lt_of_le e
  21. 0021specialize lt_of_lt_of_le d
  22. 0022apply lt_of_lt_of_le
  23. 0023exact hexponent
  24. 0024exact hpower_bound
  25. 0025specialize division_zero_quotient_of_lt d
  26. 0026specialize division_zero_quotient_of_lt n
  27. 0027specialize division_zero_quotient_of_lt q
  28. 0028specialize division_zero_quotient_of_lt r
  29. 0029apply division_zero_quotient_of_lt
  30. 0030exact hdivision
  31. 0031exact hvalue_bound