| Step | Hyp | Ref | Expression | 
						
							| 0 |  | cdjh | ⊢ joinH | 
						
							| 1 |  | vk | ⊢ 𝑘 | 
						
							| 2 |  | cvv | ⊢ V | 
						
							| 3 |  | vw | ⊢ 𝑤 | 
						
							| 4 |  | clh | ⊢ LHyp | 
						
							| 5 | 1 | cv | ⊢ 𝑘 | 
						
							| 6 | 5 4 | cfv | ⊢ ( LHyp ‘ 𝑘 ) | 
						
							| 7 |  | vx | ⊢ 𝑥 | 
						
							| 8 |  | cbs | ⊢ Base | 
						
							| 9 |  | cdvh | ⊢ DVecH | 
						
							| 10 | 5 9 | cfv | ⊢ ( DVecH ‘ 𝑘 ) | 
						
							| 11 | 3 | cv | ⊢ 𝑤 | 
						
							| 12 | 11 10 | cfv | ⊢ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) | 
						
							| 13 | 12 8 | cfv | ⊢ ( Base ‘ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) ) | 
						
							| 14 | 13 | cpw | ⊢ 𝒫  ( Base ‘ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) ) | 
						
							| 15 |  | vy | ⊢ 𝑦 | 
						
							| 16 |  | coch | ⊢ ocH | 
						
							| 17 | 5 16 | cfv | ⊢ ( ocH ‘ 𝑘 ) | 
						
							| 18 | 11 17 | cfv | ⊢ ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) | 
						
							| 19 | 7 | cv | ⊢ 𝑥 | 
						
							| 20 | 19 18 | cfv | ⊢ ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑥 ) | 
						
							| 21 | 15 | cv | ⊢ 𝑦 | 
						
							| 22 | 21 18 | cfv | ⊢ ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑦 ) | 
						
							| 23 | 20 22 | cin | ⊢ ( ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑥 )  ∩  ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑦 ) ) | 
						
							| 24 | 23 18 | cfv | ⊢ ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ ( ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑥 )  ∩  ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑦 ) ) ) | 
						
							| 25 | 7 15 14 14 24 | cmpo | ⊢ ( 𝑥  ∈  𝒫  ( Base ‘ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) ) ,  𝑦  ∈  𝒫  ( Base ‘ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) )  ↦  ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ ( ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑥 )  ∩  ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑦 ) ) ) ) | 
						
							| 26 | 3 6 25 | cmpt | ⊢ ( 𝑤  ∈  ( LHyp ‘ 𝑘 )  ↦  ( 𝑥  ∈  𝒫  ( Base ‘ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) ) ,  𝑦  ∈  𝒫  ( Base ‘ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) )  ↦  ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ ( ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑥 )  ∩  ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑦 ) ) ) ) ) | 
						
							| 27 | 1 2 26 | cmpt | ⊢ ( 𝑘  ∈  V  ↦  ( 𝑤  ∈  ( LHyp ‘ 𝑘 )  ↦  ( 𝑥  ∈  𝒫  ( Base ‘ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) ) ,  𝑦  ∈  𝒫  ( Base ‘ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) )  ↦  ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ ( ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑥 )  ∩  ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑦 ) ) ) ) ) ) | 
						
							| 28 | 0 27 | wceq | ⊢ joinH  =  ( 𝑘  ∈  V  ↦  ( 𝑤  ∈  ( LHyp ‘ 𝑘 )  ↦  ( 𝑥  ∈  𝒫  ( Base ‘ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) ) ,  𝑦  ∈  𝒫  ( Base ‘ ( ( DVecH ‘ 𝑘 ) ‘ 𝑤 ) )  ↦  ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ ( ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑥 )  ∩  ( ( ( ocH ‘ 𝑘 ) ‘ 𝑤 ) ‘ 𝑦 ) ) ) ) ) ) |