pjclem1 - Hilbert Space Explorer

	Hilbert Space Explorer		< Previous Next > Nearby theorems
Mirrors > Home > HSE Home > Th. List > pjclem1		Structured version Visualization version GIF version

Theorem pjclem1 32223

Description: Lemma for projection commutation theorem. (Contributed by NM, 16-Nov-2000.) (New usage is discouraged.)

**Hypotheses**
Ref	Expression
pjclem1.1	⊢ 𝐺 ∈ C_ℋ
pjclem1.2	⊢ 𝐻 ∈ C_ℋ

**Assertion**
Ref	Expression
pjclem1	⊢ (𝐺 𝐶_ℋ 𝐻 → ((proj_ℎ‘𝐺) ∘ (proj_ℎ‘𝐻)) = (proj_ℎ‘(𝐺 ∩ 𝐻)))

**Proof of Theorem pjclem1**
Step	Hyp	Ref	Expression
1		pjclem1.1	. . . . . 6 ⊢ 𝐺 ∈ C_ℋ
2		pjclem1.2	. . . . . 6 ⊢ 𝐻 ∈ C_ℋ
3	1, 2	cmbri 31618	. . . . 5 ⊢ (𝐺 𝐶_ℋ 𝐻 ↔ 𝐺 = ((𝐺 ∩ 𝐻) ∨_ℋ (𝐺 ∩ (⊥‘𝐻))))
4		fveq2 6906	. . . . 5 ⊢ (𝐺 = ((𝐺 ∩ 𝐻) ∨_ℋ (𝐺 ∩ (⊥‘𝐻))) → (proj_ℎ‘𝐺) = (proj_ℎ‘((𝐺 ∩ 𝐻) ∨_ℋ (𝐺 ∩ (⊥‘𝐻)))))
5	3, 4	sylbi 217	. . . 4 ⊢ (𝐺 𝐶_ℋ 𝐻 → (proj_ℎ‘𝐺) = (proj_ℎ‘((𝐺 ∩ 𝐻) ∨_ℋ (𝐺 ∩ (⊥‘𝐻)))))
6		inss2 4245	. . . . . . . 8 ⊢ (𝐺 ∩ 𝐻) ⊆ 𝐻
7	1	choccli 31335	. . . . . . . . . 10 ⊢ (⊥‘𝐺) ∈ C_ℋ
8	2, 7	chub2i 31498	. . . . . . . . 9 ⊢ 𝐻 ⊆ ((⊥‘𝐺) ∨_ℋ 𝐻)
9	1, 2	chdmm3i 31507	. . . . . . . . 9 ⊢ (⊥‘(𝐺 ∩ (⊥‘𝐻))) = ((⊥‘𝐺) ∨_ℋ 𝐻)
10	8, 9	sseqtrri 4032	. . . . . . . 8 ⊢ 𝐻 ⊆ (⊥‘(𝐺 ∩ (⊥‘𝐻)))
11	6, 10	sstri 4004	. . . . . . 7 ⊢ (𝐺 ∩ 𝐻) ⊆ (⊥‘(𝐺 ∩ (⊥‘𝐻)))
12	1, 2	chincli 31488	. . . . . . . 8 ⊢ (𝐺 ∩ 𝐻) ∈ C_ℋ
13	2	choccli 31335	. . . . . . . . 9 ⊢ (⊥‘𝐻) ∈ C_ℋ
14	1, 13	chincli 31488	. . . . . . . 8 ⊢ (𝐺 ∩ (⊥‘𝐻)) ∈ C_ℋ
15	12, 14	pjscji 32198	. . . . . . 7 ⊢ ((𝐺 ∩ 𝐻) ⊆ (⊥‘(𝐺 ∩ (⊥‘𝐻))) → (proj_ℎ‘((𝐺 ∩ 𝐻) ∨_ℋ (𝐺 ∩ (⊥‘𝐻)))) = ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻)))))
16	11, 15	ax-mp 5	. . . . . 6 ⊢ (proj_ℎ‘((𝐺 ∩ 𝐻) ∨_ℋ (𝐺 ∩ (⊥‘𝐻)))) = ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻))))
17	16	eqeq2i 2747	. . . . 5 ⊢ ((proj_ℎ‘𝐺) = (proj_ℎ‘((𝐺 ∩ 𝐻) ∨_ℋ (𝐺 ∩ (⊥‘𝐻)))) ↔ (proj_ℎ‘𝐺) = ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻)))))
18		coeq2 5871	. . . . . 6 ⊢ ((proj_ℎ‘𝐺) = ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻)))) → ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) = ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻))))))
19	12	pjfi 31732	. . . . . . . . . 10 ⊢ (proj_ℎ‘(𝐺 ∩ 𝐻)): ℋ⟶ ℋ
20	14	pjfi 31732	. . . . . . . . . 10 ⊢ (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻))): ℋ⟶ ℋ
21	2, 19, 20	pjsdii 32183	. . . . . . . . 9 ⊢ ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻))))) = (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(𝐺 ∩ 𝐻))) +_op ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻)))))
22	12, 2	pjss1coi 32191	. . . . . . . . . . 11 ⊢ ((𝐺 ∩ 𝐻) ⊆ 𝐻 ↔ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(𝐺 ∩ 𝐻))) = (proj_ℎ‘(𝐺 ∩ 𝐻)))
23	6, 22	mpbi 230	. . . . . . . . . 10 ⊢ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(𝐺 ∩ 𝐻))) = (proj_ℎ‘(𝐺 ∩ 𝐻))
24	2, 14	pjorthcoi 32197	. . . . . . . . . . 11 ⊢ (𝐻 ⊆ (⊥‘(𝐺 ∩ (⊥‘𝐻))) → ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻)))) = 0_hop )
25	10, 24	ax-mp 5	. . . . . . . . . 10 ⊢ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻)))) = 0_hop
26	23, 25	oveq12i 7442	. . . . . . . . 9 ⊢ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(𝐺 ∩ 𝐻))) +_op ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻))))) = ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op 0_hop )
27	19	hoaddridi 31814	. . . . . . . . 9 ⊢ ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op 0_hop ) = (proj_ℎ‘(𝐺 ∩ 𝐻))
28	21, 26, 27	3eqtri 2766	. . . . . . . 8 ⊢ ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻))))) = (proj_ℎ‘(𝐺 ∩ 𝐻))
29	28	eqeq2i 2747	. . . . . . 7 ⊢ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) = ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻))))) ↔ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) = (proj_ℎ‘(𝐺 ∩ 𝐻)))
30		coeq2 5871	. . . . . . . 8 ⊢ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) = (proj_ℎ‘(𝐺 ∩ 𝐻)) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺))) = ((proj_ℎ‘𝐺) ∘ (proj_ℎ‘(𝐺 ∩ 𝐻))))
31		inss1 4244	. . . . . . . . 9 ⊢ (𝐺 ∩ 𝐻) ⊆ 𝐺
32	12, 1	pjss1coi 32191	. . . . . . . . 9 ⊢ ((𝐺 ∩ 𝐻) ⊆ 𝐺 ↔ ((proj_ℎ‘𝐺) ∘ (proj_ℎ‘(𝐺 ∩ 𝐻))) = (proj_ℎ‘(𝐺 ∩ 𝐻)))
33	31, 32	mpbi 230	. . . . . . . 8 ⊢ ((proj_ℎ‘𝐺) ∘ (proj_ℎ‘(𝐺 ∩ 𝐻))) = (proj_ℎ‘(𝐺 ∩ 𝐻))
34	30, 33	eqtrdi 2790	. . . . . . 7 ⊢ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) = (proj_ℎ‘(𝐺 ∩ 𝐻)) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺))) = (proj_ℎ‘(𝐺 ∩ 𝐻)))
35	29, 34	sylbi 217	. . . . . 6 ⊢ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) = ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻))))) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺))) = (proj_ℎ‘(𝐺 ∩ 𝐻)))
36	18, 35	syl 17	. . . . 5 ⊢ ((proj_ℎ‘𝐺) = ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op (proj_ℎ‘(𝐺 ∩ (⊥‘𝐻)))) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺))) = (proj_ℎ‘(𝐺 ∩ 𝐻)))
37	17, 36	sylbi 217	. . . 4 ⊢ ((proj_ℎ‘𝐺) = (proj_ℎ‘((𝐺 ∩ 𝐻) ∨_ℋ (𝐺 ∩ (⊥‘𝐻)))) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺))) = (proj_ℎ‘(𝐺 ∩ 𝐻)))
38	5, 37	syl 17	. . 3 ⊢ (𝐺 𝐶_ℋ 𝐻 → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺))) = (proj_ℎ‘(𝐺 ∩ 𝐻)))
39	1, 2	cmcm3i 31622	. . . . 5 ⊢ (𝐺 𝐶_ℋ 𝐻 ↔ (⊥‘𝐺) 𝐶_ℋ 𝐻)
40	7, 2	cmbri 31618	. . . . 5 ⊢ ((⊥‘𝐺) 𝐶_ℋ 𝐻 ↔ (⊥‘𝐺) = (((⊥‘𝐺) ∩ 𝐻) ∨_ℋ ((⊥‘𝐺) ∩ (⊥‘𝐻))))
41	39, 40	bitri 275	. . . 4 ⊢ (𝐺 𝐶_ℋ 𝐻 ↔ (⊥‘𝐺) = (((⊥‘𝐺) ∩ 𝐻) ∨_ℋ ((⊥‘𝐺) ∩ (⊥‘𝐻))))
42		fveq2 6906	. . . . 5 ⊢ ((⊥‘𝐺) = (((⊥‘𝐺) ∩ 𝐻) ∨_ℋ ((⊥‘𝐺) ∩ (⊥‘𝐻))) → (proj_ℎ‘(⊥‘𝐺)) = (proj_ℎ‘(((⊥‘𝐺) ∩ 𝐻) ∨_ℋ ((⊥‘𝐺) ∩ (⊥‘𝐻)))))
43		inss2 4245	. . . . . . . . 9 ⊢ ((⊥‘𝐺) ∩ 𝐻) ⊆ 𝐻
44	2, 1	chub2i 31498	. . . . . . . . . 10 ⊢ 𝐻 ⊆ (𝐺 ∨_ℋ 𝐻)
45	1, 2	chdmm4i 31508	. . . . . . . . . 10 ⊢ (⊥‘((⊥‘𝐺) ∩ (⊥‘𝐻))) = (𝐺 ∨_ℋ 𝐻)
46	44, 45	sseqtrri 4032	. . . . . . . . 9 ⊢ 𝐻 ⊆ (⊥‘((⊥‘𝐺) ∩ (⊥‘𝐻)))
47	43, 46	sstri 4004	. . . . . . . 8 ⊢ ((⊥‘𝐺) ∩ 𝐻) ⊆ (⊥‘((⊥‘𝐺) ∩ (⊥‘𝐻)))
48	7, 2	chincli 31488	. . . . . . . . 9 ⊢ ((⊥‘𝐺) ∩ 𝐻) ∈ C_ℋ
49	7, 13	chincli 31488	. . . . . . . . 9 ⊢ ((⊥‘𝐺) ∩ (⊥‘𝐻)) ∈ C_ℋ
50	48, 49	pjscji 32198	. . . . . . . 8 ⊢ (((⊥‘𝐺) ∩ 𝐻) ⊆ (⊥‘((⊥‘𝐺) ∩ (⊥‘𝐻))) → (proj_ℎ‘(((⊥‘𝐺) ∩ 𝐻) ∨_ℋ ((⊥‘𝐺) ∩ (⊥‘𝐻)))) = ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻)))))
51	47, 50	ax-mp 5	. . . . . . 7 ⊢ (proj_ℎ‘(((⊥‘𝐺) ∩ 𝐻) ∨_ℋ ((⊥‘𝐺) ∩ (⊥‘𝐻)))) = ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻))))
52	51	eqeq2i 2747	. . . . . 6 ⊢ ((proj_ℎ‘(⊥‘𝐺)) = (proj_ℎ‘(((⊥‘𝐺) ∩ 𝐻) ∨_ℋ ((⊥‘𝐺) ∩ (⊥‘𝐻)))) ↔ (proj_ℎ‘(⊥‘𝐺)) = ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻)))))
53		coeq2 5871	. . . . . . 7 ⊢ ((proj_ℎ‘(⊥‘𝐺)) = ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻)))) → ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))) = ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻))))))
54	48	pjfi 31732	. . . . . . . . . . 11 ⊢ (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)): ℋ⟶ ℋ
55	49	pjfi 31732	. . . . . . . . . . 11 ⊢ (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻))): ℋ⟶ ℋ
56	2, 54, 55	pjsdii 32183	. . . . . . . . . 10 ⊢ ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻))))) = (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻))) +_op ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻)))))
57	48, 2	pjss1coi 32191	. . . . . . . . . . . 12 ⊢ (((⊥‘𝐺) ∩ 𝐻) ⊆ 𝐻 ↔ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻))) = (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)))
58	43, 57	mpbi 230	. . . . . . . . . . 11 ⊢ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻))) = (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻))
59	2, 49	pjorthcoi 32197	. . . . . . . . . . . 12 ⊢ (𝐻 ⊆ (⊥‘((⊥‘𝐺) ∩ (⊥‘𝐻))) → ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻)))) = 0_hop )
60	46, 59	ax-mp 5	. . . . . . . . . . 11 ⊢ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻)))) = 0_hop
61	58, 60	oveq12i 7442	. . . . . . . . . 10 ⊢ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻))) +_op ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻))))) = ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op 0_hop )
62	54	hoaddridi 31814	. . . . . . . . . 10 ⊢ ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op 0_hop ) = (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻))
63	56, 61, 62	3eqtri 2766	. . . . . . . . 9 ⊢ ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻))))) = (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻))
64	63	eqeq2i 2747	. . . . . . . 8 ⊢ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))) = ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻))))) ↔ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))) = (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)))
65		coeq2 5871	. . . . . . . . 9 ⊢ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))) = (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺)))) = ((proj_ℎ‘𝐺) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻))))
66	1, 13	chub1i 31497	. . . . . . . . . . 11 ⊢ 𝐺 ⊆ (𝐺 ∨_ℋ (⊥‘𝐻))
67	1, 2	chdmm2i 31506	. . . . . . . . . . 11 ⊢ (⊥‘((⊥‘𝐺) ∩ 𝐻)) = (𝐺 ∨_ℋ (⊥‘𝐻))
68	66, 67	sseqtrri 4032	. . . . . . . . . 10 ⊢ 𝐺 ⊆ (⊥‘((⊥‘𝐺) ∩ 𝐻))
69	1, 48	pjorthcoi 32197	. . . . . . . . . 10 ⊢ (𝐺 ⊆ (⊥‘((⊥‘𝐺) ∩ 𝐻)) → ((proj_ℎ‘𝐺) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻))) = 0_hop )
70	68, 69	ax-mp 5	. . . . . . . . 9 ⊢ ((proj_ℎ‘𝐺) ∘ (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻))) = 0_hop
71	65, 70	eqtrdi 2790	. . . . . . . 8 ⊢ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))) = (proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺)))) = 0_hop )
72	64, 71	sylbi 217	. . . . . . 7 ⊢ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))) = ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻))))) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺)))) = 0_hop )
73	53, 72	syl 17	. . . . . 6 ⊢ ((proj_ℎ‘(⊥‘𝐺)) = ((proj_ℎ‘((⊥‘𝐺) ∩ 𝐻)) +_op (proj_ℎ‘((⊥‘𝐺) ∩ (⊥‘𝐻)))) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺)))) = 0_hop )
74	52, 73	sylbi 217	. . . . 5 ⊢ ((proj_ℎ‘(⊥‘𝐺)) = (proj_ℎ‘(((⊥‘𝐺) ∩ 𝐻) ∨_ℋ ((⊥‘𝐺) ∩ (⊥‘𝐻)))) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺)))) = 0_hop )
75	42, 74	syl 17	. . . 4 ⊢ ((⊥‘𝐺) = (((⊥‘𝐺) ∩ 𝐻) ∨_ℋ ((⊥‘𝐺) ∩ (⊥‘𝐻))) → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺)))) = 0_hop )
76	41, 75	sylbi 217	. . 3 ⊢ (𝐺 𝐶_ℋ 𝐻 → ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺)))) = 0_hop )
77	38, 76	oveq12d 7448	. 2 ⊢ (𝐺 𝐶_ℋ 𝐻 → (((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺))) +_op ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))))) = ((proj_ℎ‘(𝐺 ∩ 𝐻)) +_op 0_hop ))
78		df-iop 31777	. . . . . . 7 ⊢ I_op = (proj_ℎ‘ ℋ)
79	78	coeq2i 5873	. . . . . 6 ⊢ ((proj_ℎ‘𝐻) ∘ I_op ) = ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘ ℋ))
80	2	pjfi 31732	. . . . . . 7 ⊢ (proj_ℎ‘𝐻): ℋ⟶ ℋ
81	80	hoid1i 31817	. . . . . 6 ⊢ ((proj_ℎ‘𝐻) ∘ I_op ) = (proj_ℎ‘𝐻)
82	79, 81	eqtr3i 2764	. . . . 5 ⊢ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘ ℋ)) = (proj_ℎ‘𝐻)
83	1	pjtoi 32207	. . . . . . 7 ⊢ ((proj_ℎ‘𝐺) +_op (proj_ℎ‘(⊥‘𝐺))) = (proj_ℎ‘ ℋ)
84	83	coeq2i 5873	. . . . . 6 ⊢ ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘𝐺) +_op (proj_ℎ‘(⊥‘𝐺)))) = ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘ ℋ))
85	1	pjfi 31732	. . . . . . 7 ⊢ (proj_ℎ‘𝐺): ℋ⟶ ℋ
86	7	pjfi 31732	. . . . . . 7 ⊢ (proj_ℎ‘(⊥‘𝐺)): ℋ⟶ ℋ
87	2, 85, 86	pjsdii 32183	. . . . . 6 ⊢ ((proj_ℎ‘𝐻) ∘ ((proj_ℎ‘𝐺) +_op (proj_ℎ‘(⊥‘𝐺)))) = (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) +_op ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))))
88	84, 87	eqtr3i 2764	. . . . 5 ⊢ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘ ℋ)) = (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) +_op ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))))
89	82, 88	eqtr3i 2764	. . . 4 ⊢ (proj_ℎ‘𝐻) = (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) +_op ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))))
90	89	coeq2i 5873	. . 3 ⊢ ((proj_ℎ‘𝐺) ∘ (proj_ℎ‘𝐻)) = ((proj_ℎ‘𝐺) ∘ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) +_op ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺)))))
91	80, 85	hocofi 31794	. . . 4 ⊢ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)): ℋ⟶ ℋ
92	80, 86	hocofi 31794	. . . 4 ⊢ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))): ℋ⟶ ℋ
93	1, 91, 92	pjsdii 32183	. . 3 ⊢ ((proj_ℎ‘𝐺) ∘ (((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺)) +_op ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))))) = (((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺))) +_op ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺)))))
94	90, 93	eqtr2i 2763	. 2 ⊢ (((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘𝐺))) +_op ((proj_ℎ‘𝐺) ∘ ((proj_ℎ‘𝐻) ∘ (proj_ℎ‘(⊥‘𝐺))))) = ((proj_ℎ‘𝐺) ∘ (proj_ℎ‘𝐻))
95	77, 94, 27	3eqtr3g 2797	1 ⊢ (𝐺 𝐶_ℋ 𝐻 → ((proj_ℎ‘𝐺) ∘ (proj_ℎ‘𝐻)) = (proj_ℎ‘(𝐺 ∩ 𝐻)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 = wceq 1536 ∈ wcel 2105 ∩ cin 3961 ⊆ wss 3962 class class class wbr 5147 ∘ ccom 5692 ‘cfv 6562 (class class class)co 7430 ℋchba 30947 C_ℋ cch 30957 ⊥cort 30958 ∨_ℋ chj 30961 𝐶_ℋ ccm 30964 proj_ℎcpjh 30965 +_op chos 30966 0_hop ch0o 30971 I_op chio 30972

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1791 ax-4 1805 ax-5 1907 ax-6 1964 ax-7 2004 ax-8 2107 ax-9 2115 ax-10 2138 ax-11 2154 ax-12 2174 ax-ext 2705 ax-rep 5284 ax-sep 5301 ax-nul 5311 ax-pow 5370 ax-pr 5437 ax-un 7753 ax-inf2 9678 ax-cc 10472 ax-cnex 11208 ax-resscn 11209 ax-1cn 11210 ax-icn 11211 ax-addcl 11212 ax-addrcl 11213 ax-mulcl 11214 ax-mulrcl 11215 ax-mulcom 11216 ax-addass 11217 ax-mulass 11218 ax-distr 11219 ax-i2m1 11220 ax-1ne0 11221 ax-1rid 11222 ax-rnegex 11223 ax-rrecex 11224 ax-cnre 11225 ax-pre-lttri 11226 ax-pre-lttrn 11227 ax-pre-ltadd 11228 ax-pre-mulgt0 11229 ax-pre-sup 11230 ax-addf 11231 ax-mulf 11232 ax-hilex 31027 ax-hfvadd 31028 ax-hvcom 31029 ax-hvass 31030 ax-hv0cl 31031 ax-hvaddid 31032 ax-hfvmul 31033 ax-hvmulid 31034 ax-hvmulass 31035 ax-hvdistr1 31036 ax-hvdistr2 31037 ax-hvmul0 31038 ax-hfi 31107 ax-his1 31110 ax-his2 31111 ax-his3 31112 ax-his4 31113 ax-hcompl 31230

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1539 df-fal 1549 df-ex 1776 df-nf 1780 df-sb 2062 df-mo 2537 df-eu 2566 df-clab 2712 df-cleq 2726 df-clel 2813 df-nfc 2889 df-ne 2938 df-nel 3044 df-ral 3059 df-rex 3068 df-rmo 3377 df-reu 3378 df-rab 3433 df-v 3479 df-sbc 3791 df-csb 3908 df-dif 3965 df-un 3967 df-in 3969 df-ss 3979 df-pss 3982 df-nul 4339 df-if 4531 df-pw 4606 df-sn 4631 df-pr 4633 df-tp 4635 df-op 4637 df-uni 4912 df-int 4951 df-iun 4997 df-iin 4998 df-br 5148 df-opab 5210 df-mpt 5231 df-tr 5265 df-id 5582 df-eprel 5588 df-po 5596 df-so 5597 df-fr 5640 df-se 5641 df-we 5642 df-xp 5694 df-rel 5695 df-cnv 5696 df-co 5697 df-dm 5698 df-rn 5699 df-res 5700 df-ima 5701 df-pred 6322 df-ord 6388 df-on 6389 df-lim 6390 df-suc 6391 df-iota 6515 df-fun 6564 df-fn 6565 df-f 6566 df-f1 6567 df-fo 6568 df-f1o 6569 df-fv 6570 df-isom 6571 df-riota 7387 df-ov 7433 df-oprab 7434 df-mpo 7435 df-of 7696 df-om 7887 df-1st 8012 df-2nd 8013 df-supp 8184 df-frecs 8304 df-wrecs 8335 df-recs 8409 df-rdg 8448 df-1o 8504 df-2o 8505 df-oadd 8508 df-omul 8509 df-er 8743 df-map 8866 df-pm 8867 df-ixp 8936 df-en 8984 df-dom 8985 df-sdom 8986 df-fin 8987 df-fsupp 9399 df-fi 9448 df-sup 9479 df-inf 9480 df-oi 9547 df-card 9976 df-acn 9979 df-pnf 11294 df-mnf 11295 df-xr 11296 df-ltxr 11297 df-le 11298 df-sub 11491 df-neg 11492 df-div 11918 df-nn 12264 df-2 12326 df-3 12327 df-4 12328 df-5 12329 df-6 12330 df-7 12331 df-8 12332 df-9 12333 df-n0 12524 df-z 12611 df-dec 12731 df-uz 12876 df-q 12988 df-rp 13032 df-xneg 13151 df-xadd 13152 df-xmul 13153 df-ioo 13387 df-ico 13389 df-icc 13390 df-fz 13544 df-fzo 13691 df-fl 13828 df-seq 14039 df-exp 14099 df-hash 14366 df-cj 15134 df-re 15135 df-im 15136 df-sqrt 15270 df-abs 15271 df-clim 15520 df-rlim 15521 df-sum 15719 df-struct 17180 df-sets 17197 df-slot 17215 df-ndx 17227 df-base 17245 df-ress 17274 df-plusg 17310 df-mulr 17311 df-starv 17312 df-sca 17313 df-vsca 17314 df-ip 17315 df-tset 17316 df-ple 17317 df-ds 17319 df-unif 17320 df-hom 17321 df-cco 17322 df-rest 17468 df-topn 17469 df-0g 17487 df-gsum 17488 df-topgen 17489 df-pt 17490 df-prds 17493 df-xrs 17548 df-qtop 17553 df-imas 17554 df-xps 17556 df-mre 17630 df-mrc 17631 df-acs 17633 df-mgm 18665 df-sgrp 18744 df-mnd 18760 df-submnd 18809 df-mulg 19098 df-cntz 19347 df-cmn 19814 df-psmet 21373 df-xmet 21374 df-met 21375 df-bl 21376 df-mopn 21377 df-fbas 21378 df-fg 21379 df-cnfld 21382 df-top 22915 df-topon 22932 df-topsp 22954 df-bases 22968 df-cld 23042 df-ntr 23043 df-cls 23044 df-nei 23121 df-cn 23250 df-cnp 23251 df-lm 23252 df-haus 23338 df-tx 23585 df-hmeo 23778 df-fil 23869 df-fm 23961 df-flim 23962 df-flf 23963 df-xms 24345 df-ms 24346 df-tms 24347 df-cfil 25302 df-cau 25303 df-cmet 25304 df-grpo 30521 df-gid 30522 df-ginv 30523 df-gdiv 30524 df-ablo 30573 df-vc 30587 df-nv 30620 df-va 30623 df-ba 30624 df-sm 30625 df-0v 30626 df-vs 30627 df-nmcv 30628 df-ims 30629 df-dip 30729 df-ssp 30750 df-ph 30841 df-cbn 30891 df-hnorm 30996 df-hba 30997 df-hvsub 30999 df-hlim 31000 df-hcau 31001 df-sh 31235 df-ch 31249 df-oc 31280 df-ch0 31281 df-shs 31336 df-chj 31338 df-pjh 31423 df-cm 31611 df-hosum 31758 df-h0op 31776 df-iop 31777

This theorem is referenced by: pjclem2 32224

W3C validator