Exact expanded PA statement
forall d n q r. (((n) = (d) * (q) + (r) /\ (exists bcf_lt_gap_bdzq_source_bound. bcf_lt_gap_bdzq_source_bound + S (r) = d))) -> (exists bcf_lt_gap_bdzq_bound. bcf_lt_gap_bdzq_bound + S (n) = d) -> q = 0Structural proof guide
A dividend below its divisor has quotient zero.
Direct prerequisites: zero_add, division_remainder_unique. The authored body proceeds by case analysis (2), intermediate claims (2), equality transport (1).
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.
- 0001
intro d - 0002
intro n - 0003
intro q - 0004
intro r - 0005
intro hdivision - 0006
intro hbound - 0007
cases hdivision - 0008
have hzero : n = d * 0 + n - 0009
rewrite PA5 - 0010
symm - 0011
specialize zero_add n - 0012
apply zero_add - 0013
have hunique : q = 0 /\ r = n - 0014
specialize division_remainder_unique d - 0015
specialize division_remainder_unique n - 0016
specialize division_remainder_unique q - 0017
specialize division_remainder_unique r - 0018
specialize division_remainder_unique 0 - 0019
specialize division_remainder_unique n - 0020
apply division_remainder_unique - 0021
exact hdivision_left - 0022
exact hdivision_right - 0023
exact hzero - 0024
exact hbound - 0025
cases hunique - 0026
exact hunique_left