Exact expanded PA statement
forall a b. exists d. ((((exists x. a = d * x) /\ (exists y. b = d * y)) /\ forall c. (exists u. a = c * u) -> (exists v. b = c * v) -> exists w. d = c * w) /\ exists xp yp xn yn. a * xp + b * yp = d + (a * xn + b * yn))Structural proof guide
Every pair has a relational gcd together with balanced natural Bezout witnesses.
Direct prerequisites: le_refl, gcd_balanced_bezout_exists_up_to. 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.
- 0001
intro a - 0002
intro b - 0003
specialize gcd_balanced_bezout_exists_up_to b - 0004
specialize gcd_balanced_bezout_exists_up_to b - 0005
have hbb : exists t. t + b = b - 0006
apply le_refl - 0007
have hall : forall z. exists d. ((((exists x. z = d * x) /\ (exists y. b = d * y)) /\ forall c. (exists u. z = c * u) -> (exists v. b = c * v) -> exists w. d = c * w) /\ exists xp yp xn yn. z * xp + b * yp = d + (z * xn + b * yn)) - 0008
apply gcd_balanced_bezout_exists_up_to - 0009
exact hbb - 0010
specialize hall a - 0011
exact hall