Metamath Proof Explorer


Theorem djhval

Description: Subspace join for DVecH vector space. (Contributed by NM, 19-Jul-2014)

Ref Expression
Hypotheses djhval.h ⊢ H = LHyp ⁡ K
djhval.u ⊢ U = DVecH ⁡ K ⁡ W
djhval.v ⊢ V = Base U
djhval.o ⊢ ⊥ ˙ = ocH ⁡ K ⁡ W
djhval.j ⊢ ∨ ˙ = joinH ⁡ K ⁡ W
Assertion djhval ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ V ∧ Y ⊆ V → X ∨ ˙ Y = ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y

Proof

Step Hyp Ref Expression
1 djhval.h ⊢ H = LHyp ⁡ K
2 djhval.u ⊢ U = DVecH ⁡ K ⁡ W
3 djhval.v ⊢ V = Base U
4 djhval.o ⊢ ⊥ ˙ = ocH ⁡ K ⁡ W
5 djhval.j ⊢ ∨ ˙ = joinH ⁡ K ⁡ W
6 1 2 3 4 5 djhfval ⊢ K ∈ HL ∧ W ∈ H → ∨ ˙ = x ∈ 𝒫 V , y ∈ 𝒫 V ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y
7 6 adantr ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ V ∧ Y ⊆ V → ∨ ˙ = x ∈ 𝒫 V , y ∈ 𝒫 V ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y
8 7 oveqd ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ V ∧ Y ⊆ V → X ∨ ˙ Y = X x ∈ 𝒫 V , y ∈ 𝒫 V ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y Y
9 3 fvexi ⊢ V ∈ V
10 9 elpw2 ⊢ X ∈ 𝒫 V ↔ X ⊆ V
11 10 biimpri ⊢ X ⊆ V → X ∈ 𝒫 V
12 11 ad2antrl ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ V ∧ Y ⊆ V → X ∈ 𝒫 V
13 9 elpw2 ⊢ Y ∈ 𝒫 V ↔ Y ⊆ V
14 13 biimpri ⊢ Y ⊆ V → Y ∈ 𝒫 V
15 14 ad2antll ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ V ∧ Y ⊆ V → Y ∈ 𝒫 V
16 fvexd ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ V ∧ Y ⊆ V → ⊥ ˙ ⁡ ⊥ ˙ ⁡ 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 ∈ 𝒫 V , y ∈ 𝒫 V ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y = x ∈ 𝒫 V , y ∈ 𝒫 V ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y
24 19 22 23 ovmpog ⊢ X ∈ 𝒫 V ∧ Y ∈ 𝒫 V ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y ∈ V → X x ∈ 𝒫 V , y ∈ 𝒫 V ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y Y = ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y
25 12 15 16 24 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ V ∧ Y ⊆ V → X x ∈ 𝒫 V , y ∈ 𝒫 V ⟼ ⊥ ˙ ⁡ ⊥ ˙ ⁡ x ∩ ⊥ ˙ ⁡ y Y = ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y
26 8 25 eqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ X ⊆ V ∧ Y ⊆ V → X ∨ ˙ Y = ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∩ ⊥ ˙ ⁡ Y