Metamath Proof Explorer


Theorem gcdabsorb

Description: Absorption law for gcd. (Contributed by Scott Fenton, 8-Apr-2014) (Revised by Mario Carneiro, 19-Apr-2014)

Ref Expression
Assertion gcdabsorb ⊢ A ∈ ℤ ∧ B ∈ ℤ → A gcd B gcd B = A gcd B

Proof

Step Hyp Ref Expression
1 gcdass ⊢ A ∈ ℤ ∧ B ∈ ℤ ∧ B ∈ ℤ → A gcd B gcd B = A gcd B gcd B
2 1 3anidm23 ⊢ A ∈ ℤ ∧ B ∈ ℤ → A gcd B gcd B = A gcd B gcd B
3 gcdid ⊢ B ∈ ℤ → B gcd B = B
4 3 oveq2d ⊢ B ∈ ℤ → A gcd B gcd B = A gcd B
5 4 adantl ⊢ A ∈ ℤ ∧ B ∈ ℤ → A gcd B gcd B = A gcd B
6 gcdabs2 ⊢ A ∈ ℤ ∧ B ∈ ℤ → A gcd B = A gcd B
7 2 5 6 3eqtrd ⊢ A ∈ ℤ ∧ B ∈ ℤ → A gcd B gcd B = A gcd B