Metamath Proof Explorer


Theorem cmmdi

Description: Commuting subspaces form a modular pair. (Contributed by NM, 16-Jan-2005) (New usage is discouraged.)

Ref Expression
Hypotheses sumdmdi.1 ⊢ A ∈ C ℋ
sumdmdi.2 ⊢ B ∈ C ℋ
Assertion cmmdi ⊢ A 𝐶 ℋ B → A 𝑀 ℋ B

Proof

Step Hyp Ref Expression
1 sumdmdi.1 ⊢ A ∈ C ℋ
2 sumdmdi.2 ⊢ B ∈ C ℋ
3 1 2 cmcm4i ⊢ A 𝐶 ℋ B ↔ ⊥ ⁡ A 𝐶 ℋ ⊥ ⁡ B
4 1 choccli ⊢ ⊥ ⁡ A ∈ C ℋ
5 2 choccli ⊢ ⊥ ⁡ B ∈ C ℋ
6 4 5 osumcor2i ⊢ ⊥ ⁡ A 𝐶 ℋ ⊥ ⁡ B → ⊥ ⁡ A + ℋ ⊥ ⁡ B = ⊥ ⁡ A ∨ ℋ ⊥ ⁡ B
7 3 6 sylbi ⊢ A 𝐶 ℋ B → ⊥ ⁡ A + ℋ ⊥ ⁡ B = ⊥ ⁡ A ∨ ℋ ⊥ ⁡ B
8 4 5 sumdmdii ⊢ ⊥ ⁡ A + ℋ ⊥ ⁡ B = ⊥ ⁡ A ∨ ℋ ⊥ ⁡ B → ⊥ ⁡ A 𝑀 ℋ * ⊥ ⁡ B
9 7 8 syl ⊢ A 𝐶 ℋ B → ⊥ ⁡ A 𝑀 ℋ * ⊥ ⁡ B
10 mddmd ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → A 𝑀 ℋ B ↔ ⊥ ⁡ A 𝑀 ℋ * ⊥ ⁡ B
11 1 2 10 mp2an ⊢ A 𝑀 ℋ B ↔ ⊥ ⁡ A 𝑀 ℋ * ⊥ ⁡ B
12 9 11 sylibr ⊢ A 𝐶 ℋ B → A 𝑀 ℋ B