Metamath Proof Explorer


Theorem cdj3lem3

Description: Lemma for cdj3i . Value of the second-component function T . (Contributed by NM, 23-May-2005) (New usage is discouraged.)

Ref Expression
Hypotheses cdj3lem2.1 ⊢ A ∈ S ℋ
cdj3lem2.2 ⊢ B ∈ S ℋ
cdj3lem3.3 ⊢ T = x ∈ A + ℋ B ⟼ ι w ∈ B | ∃ z ∈ A x = z + ℎ w
Assertion cdj3lem3 ⊢ C ∈ A ∧ D ∈ B ∧ A ∩ B = 0 ℋ → T ⁡ C + ℎ D = D

Proof

Step Hyp Ref Expression
1 cdj3lem2.1 ⊢ A ∈ S ℋ
2 cdj3lem2.2 ⊢ B ∈ S ℋ
3 cdj3lem3.3 ⊢ T = x ∈ A + ℋ B ⟼ ι w ∈ B | ∃ z ∈ A x = z + ℎ w
4 incom ⊢ A ∩ B = B ∩ A
5 4 eqeq1i ⊢ A ∩ B = 0 ℋ ↔ B ∩ A = 0 ℋ
6 2 sheli ⊢ D ∈ B → D ∈ ℋ
7 1 sheli ⊢ C ∈ A → C ∈ ℋ
8 ax-hvcom ⊢ D ∈ ℋ ∧ C ∈ ℋ → D + ℎ C = C + ℎ D
9 6 7 8 syl2an ⊢ D ∈ B ∧ C ∈ A → D + ℎ C = C + ℎ D
10 9 fveq2d ⊢ D ∈ B ∧ C ∈ A → T ⁡ D + ℎ C = T ⁡ C + ℎ D
11 10 3adant3 ⊢ D ∈ B ∧ C ∈ A ∧ B ∩ A = 0 ℋ → T ⁡ D + ℎ C = T ⁡ C + ℎ D
12 2 1 shscomi ⊢ B + ℋ A = A + ℋ B
13 2 sheli ⊢ w ∈ B → w ∈ ℋ
14 1 sheli ⊢ z ∈ A → z ∈ ℋ
15 ax-hvcom ⊢ w ∈ ℋ ∧ z ∈ ℋ → w + ℎ z = z + ℎ w
16 13 14 15 syl2an ⊢ w ∈ B ∧ z ∈ A → w + ℎ z = z + ℎ w
17 16 eqeq2d ⊢ w ∈ B ∧ z ∈ A → x = w + ℎ z ↔ x = z + ℎ w
18 17 rexbidva ⊢ w ∈ B → ∃ z ∈ A x = w + ℎ z ↔ ∃ z ∈ A x = z + ℎ w
19 18 riotabiia ⊢ ι w ∈ B | ∃ z ∈ A x = w + ℎ z = ι w ∈ B | ∃ z ∈ A x = z + ℎ w
20 12 19 mpteq12i ⊢ x ∈ B + ℋ A ⟼ ι w ∈ B | ∃ z ∈ A x = w + ℎ z = x ∈ A + ℋ B ⟼ ι w ∈ B | ∃ z ∈ A x = z + ℎ w
21 3 20 eqtr4i ⊢ T = x ∈ B + ℋ A ⟼ ι w ∈ B | ∃ z ∈ A x = w + ℎ z
22 2 1 21 cdj3lem2 ⊢ D ∈ B ∧ C ∈ A ∧ B ∩ A = 0 ℋ → T ⁡ D + ℎ C = D
23 11 22 eqtr3d ⊢ D ∈ B ∧ C ∈ A ∧ B ∩ A = 0 ℋ → T ⁡ C + ℎ D = D
24 5 23 syl3an3b ⊢ D ∈ B ∧ C ∈ A ∧ A ∩ B = 0 ℋ → T ⁡ C + ℎ D = D
25 24 3com12 ⊢ C ∈ A ∧ D ∈ B ∧ A ∩ B = 0 ℋ → T ⁡ C + ℎ D = D