Metamath Proof Explorer


Theorem djavalN

Description: Subspace join for DVecA partial vector space. (Contributed by NM, 6-Dec-2013) (New usage is discouraged.)

Ref Expression
Hypotheses djaval.h ⊢ H = LHyp ⁡ K
djaval.t ⊢ T = LTrn ⁡ K ⁡ W
djaval.i ⊢ I = DIsoA ⁡ K ⁡ W
djaval.n ⊢ ⊥ ˙ = ocA ⁡ K ⁡ W
djaval.j ⊢ J = vA ⁡ K ⁡ W
Assertion djavalN ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ T ∧ Y ⊆ T → X J Y = ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y

Proof

Step Hyp Ref Expression
1 djaval.h ⊢ H = LHyp ⁡ K
2 djaval.t ⊢ T = LTrn ⁡ K ⁡ W
3 djaval.i ⊢ I = DIsoA ⁡ K ⁡ W
4 djaval.n ⊢ ⊥ ˙ = ocA ⁡ K ⁡ W
5 djaval.j ⊢ J = vA ⁡ K ⁡ W
6 1 2 3 4 5 djafvalN ⊢ K ∈ HL ∧ W ∈ H → J = x ∈ 𝒫 T , y ∈ 𝒫 T ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y
7 6 adantr ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ T ∧ Y ⊆ T → J = x ∈ 𝒫 T , y ∈ 𝒫 T ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y
8 7 oveqd ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ T ∧ Y ⊆ T → X J Y = X x ∈ 𝒫 T , y ∈ 𝒫 T ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y Y
9 2 fvexi ⊢ T ∈ V
10 9 elpw2 ⊢ X ∈ 𝒫 T ↔ X ⊆ T
11 10 biimpri ⊢ X ⊆ T → X ∈ 𝒫 T
12 11 ad2antrl ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ T ∧ Y ⊆ T → X ∈ 𝒫 T
13 9 elpw2 ⊢ Y ∈ 𝒫 T ↔ Y ⊆ T
14 13 biimpri ⊢ Y ⊆ T → Y ∈ 𝒫 T
15 14 ad2antll ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ T ∧ Y ⊆ T → Y ∈ 𝒫 T
16 fvexd ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ T ∧ Y ⊆ T → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y ∈ V
17 fveq2 ⊢ x = X → ⊥ ˙ ⁡ x = ⊥ ˙ ⁡ X
18 17 ineq1d ⊢ x = X → ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y = ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ y
19 18 fveq2d ⊢ x = X → ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y = ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ y
20 fveq2 ⊢ y = Y → ⊥ ˙ ⁡ y = ⊥ ˙ ⁡ Y
21 20 ineq2d ⊢ y = Y → ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ y = ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y
22 21 fveq2d ⊢ y = Y → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ y = ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y
23 eqid ⊢ x ∈ 𝒫 T , y ∈ 𝒫 T ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y = x ∈ 𝒫 T , y ∈ 𝒫 T ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y
24 19 22 23 ovmpog ⊢ X ∈ 𝒫 T ∧ Y ∈ 𝒫 T ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y ∈ V → X x ∈ 𝒫 T , y ∈ 𝒫 T ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y Y = ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y
25 12 15 16 24 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ T ∧ Y ⊆ T → X x ∈ 𝒫 T , y ∈ 𝒫 T ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y Y = ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y
26 8 25 eqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ T ∧ Y ⊆ T → X J Y = ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y