bcseqi - Hilbert Space Explorer

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

Theorem bcseqi 31722

Description: Equality case of Bunjakovaskij-Cauchy-Schwarz inequality. Specifically, in the equality case the two vectors are collinear. Compare bcsiHIL 31782. (Contributed by NM, 16-Jul-2001.) (New usage is discouraged.)

**Hypotheses**
Ref	Expression
normlem7t.1	⊢ 𝐴 ∈ ℋ
normlem7t.2	⊢ 𝐵 ∈ ℋ

**Assertion**
Ref	Expression
bcseqi	⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) ↔ ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))

**Proof of Theorem bcseqi**
Step	Hyp	Ref	Expression
1		normlem7t.2	. . . . . . . 8 ⊢ 𝐵 ∈ ℋ
2	1, 1	hicli 31683	. . . . . . 7 ⊢ (𝐵 ·_ih 𝐵) ∈ ℂ
3		normlem7t.1	. . . . . . 7 ⊢ 𝐴 ∈ ℋ
4	2, 3	hvmulcli 31616	. . . . . 6 ⊢ ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ∈ ℋ
5	3, 1	hicli 31683	. . . . . . 7 ⊢ (𝐴 ·_ih 𝐵) ∈ ℂ
6	5, 1	hvmulcli 31616	. . . . . 6 ⊢ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ∈ ℋ
7	4, 6, 4, 6	normlem9 31720	. . . . 5 ⊢ ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ·_ih (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) = (((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) − ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴))))
8		oveq1 7427	. . . . . . . . . 10 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵)) = (((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐵)))
9	8	eqcomd 2767	. . . . . . . . 9 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐵)) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵)))
10		his5 31688	. . . . . . . . . . 11 ⊢ (((𝐵 ·_ih 𝐵) ∈ ℂ ∧ ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ∈ ℋ ∧ 𝐴 ∈ ℋ) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) = ((∗‘(𝐵 ·_ih 𝐵)) · (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴)))
11	2, 4, 3, 10	mp3an 1490	. . . . . . . . . 10 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) = ((∗‘(𝐵 ·_ih 𝐵)) · (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴))
12		hiidrcl 31697	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ ℋ → (𝐵 ·_ih 𝐵) ∈ ℝ)
13		cjre 15306	. . . . . . . . . . . 12 ⊢ ((𝐵 ·_ih 𝐵) ∈ ℝ → (∗‘(𝐵 ·_ih 𝐵)) = (𝐵 ·_ih 𝐵))
14	1, 12, 13	mp2b 10	. . . . . . . . . . 11 ⊢ (∗‘(𝐵 ·_ih 𝐵)) = (𝐵 ·_ih 𝐵)
15		ax-his3 31686	. . . . . . . . . . . 12 ⊢ (((𝐵 ·_ih 𝐵) ∈ ℂ ∧ 𝐴 ∈ ℋ ∧ 𝐴 ∈ ℋ) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴) = ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴)))
16	2, 3, 3, 15	mp3an 1490	. . . . . . . . . . 11 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴) = ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴))
17	14, 16	oveq12i 7432	. . . . . . . . . 10 ⊢ ((∗‘(𝐵 ·_ih 𝐵)) · (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴)) = ((𝐵 ·_ih 𝐵) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴)))
18	3, 3	hicli 31683	. . . . . . . . . . . . 13 ⊢ (𝐴 ·_ih 𝐴) ∈ ℂ
19	2, 18	mulcli 11316	. . . . . . . . . . . 12 ⊢ ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴)) ∈ ℂ
20	2, 19	mulcomi 11317	. . . . . . . . . . 11 ⊢ ((𝐵 ·_ih 𝐵) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴))) = (((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
21	18, 2	mulcomi 11317	. . . . . . . . . . . 12 ⊢ ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) = ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴))
22	21	oveq1i 7430	. . . . . . . . . . 11 ⊢ (((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐵)) = (((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
23	20, 22	eqtr4i 2787	. . . . . . . . . 10 ⊢ ((𝐵 ·_ih 𝐵) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴))) = (((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐵))
24	11, 17, 23	3eqtri 2788	. . . . . . . . 9 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) = (((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐵))
25		his5 31688	. . . . . . . . . . 11 ⊢ (((𝐴 ·_ih 𝐵) ∈ ℂ ∧ ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ∈ ℋ ∧ 𝐵 ∈ ℋ) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = ((∗‘(𝐴 ·_ih 𝐵)) · (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐵)))
26	5, 4, 1, 25	mp3an 1490	. . . . . . . . . 10 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = ((∗‘(𝐴 ·_ih 𝐵)) · (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐵))
27	1, 3	his1i 31702	. . . . . . . . . . . 12 ⊢ (𝐵 ·_ih 𝐴) = (∗‘(𝐴 ·_ih 𝐵))
28	27	eqcomi 2770	. . . . . . . . . . 11 ⊢ (∗‘(𝐴 ·_ih 𝐵)) = (𝐵 ·_ih 𝐴)
29		ax-his3 31686	. . . . . . . . . . . 12 ⊢ (((𝐵 ·_ih 𝐵) ∈ ℂ ∧ 𝐴 ∈ ℋ ∧ 𝐵 ∈ ℋ) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐵) = ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵)))
30	2, 3, 1, 29	mp3an 1490	. . . . . . . . . . 11 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐵) = ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵))
31	28, 30	oveq12i 7432	. . . . . . . . . 10 ⊢ ((∗‘(𝐴 ·_ih 𝐵)) · (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐵)) = ((𝐵 ·_ih 𝐴) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵)))
32	1, 3	hicli 31683	. . . . . . . . . . . 12 ⊢ (𝐵 ·_ih 𝐴) ∈ ℂ
33	2, 5	mulcli 11316	. . . . . . . . . . . 12 ⊢ ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵)) ∈ ℂ
34	32, 33	mulcomi 11317	. . . . . . . . . . 11 ⊢ ((𝐵 ·_ih 𝐴) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵))) = (((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵)) · (𝐵 ·_ih 𝐴))
35	2, 5, 32	mulassi 11320	. . . . . . . . . . 11 ⊢ (((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵)) · (𝐵 ·_ih 𝐴)) = ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
36	5, 32	mulcli 11316	. . . . . . . . . . . 12 ⊢ ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) ∈ ℂ
37	2, 36	mulcomi 11317	. . . . . . . . . . 11 ⊢ ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴))) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
38	34, 35, 37	3eqtri 2788	. . . . . . . . . 10 ⊢ ((𝐵 ·_ih 𝐴) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵))) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
39	26, 31, 38	3eqtri 2788	. . . . . . . . 9 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
40	9, 24, 39	3eqtr4g 2821	. . . . . . . 8 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) = (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)))
41		ax-his3 31686	. . . . . . . . . . . 12 ⊢ (((𝐴 ·_ih 𝐵) ∈ ℂ ∧ 𝐵 ∈ ℋ ∧ 𝐴 ∈ ℋ) → (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴) = ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
42	5, 1, 3, 41	mp3an 1490	. . . . . . . . . . 11 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴) = ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴))
43	14, 42	oveq12i 7432	. . . . . . . . . 10 ⊢ ((∗‘(𝐵 ·_ih 𝐵)) · (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴)) = ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
44		his5 31688	. . . . . . . . . . 11 ⊢ (((𝐵 ·_ih 𝐵) ∈ ℂ ∧ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ∈ ℋ ∧ 𝐴 ∈ ℋ) → (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) = ((∗‘(𝐵 ·_ih 𝐵)) · (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴)))
45	2, 6, 3, 44	mp3an 1490	. . . . . . . . . 10 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) = ((∗‘(𝐵 ·_ih 𝐵)) · (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴))
46		his5 31688	. . . . . . . . . . . 12 ⊢ (((𝐴 ·_ih 𝐵) ∈ ℂ ∧ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ∈ ℋ ∧ 𝐵 ∈ ℋ) → (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = ((∗‘(𝐴 ·_ih 𝐵)) · (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐵)))
47	5, 6, 1, 46	mp3an 1490	. . . . . . . . . . 11 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = ((∗‘(𝐴 ·_ih 𝐵)) · (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐵))
48		ax-his3 31686	. . . . . . . . . . . . 13 ⊢ (((𝐴 ·_ih 𝐵) ∈ ℂ ∧ 𝐵 ∈ ℋ ∧ 𝐵 ∈ ℋ) → (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐵) = ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵)))
49	5, 1, 1, 48	mp3an 1490	. . . . . . . . . . . 12 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐵) = ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵))
50	28, 49	oveq12i 7432	. . . . . . . . . . 11 ⊢ ((∗‘(𝐴 ·_ih 𝐵)) · (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐵)) = ((𝐵 ·_ih 𝐴) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵)))
51	5, 2	mulcli 11316	. . . . . . . . . . . . 13 ⊢ ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵)) ∈ ℂ
52	32, 51	mulcomi 11317	. . . . . . . . . . . 12 ⊢ ((𝐵 ·_ih 𝐴) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵))) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐴))
53	5, 2, 32	mul32i 11506	. . . . . . . . . . . 12 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐴)) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
54	36, 2	mulcomi 11317	. . . . . . . . . . . 12 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵)) = ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
55	52, 53, 54	3eqtri 2788	. . . . . . . . . . 11 ⊢ ((𝐵 ·_ih 𝐴) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵))) = ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
56	47, 50, 55	3eqtri 2788	. . . . . . . . . 10 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
57	43, 45, 56	3eqtr4ri 2795	. . . . . . . . 9 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴))
58	57	a1i 11	. . . . . . . 8 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)))
59	40, 58	oveq12d 7438	. . . . . . 7 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) = ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴))))
60	59	oveq1d 7435	. . . . . 6 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) − ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)))) = (((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴))) − ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)))))
61	4, 6	hicli 31683	. . . . . . . 8 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ∈ ℂ
62	6, 4	hicli 31683	. . . . . . . 8 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) ∈ ℂ
63	61, 62	addcli 11315	. . . . . . 7 ⊢ ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴))) ∈ ℂ
64	63	subidi 11629	. . . . . 6 ⊢ (((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴))) − ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)))) = 0
65	60, 64	eqtrdi 2812	. . . . 5 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) − ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)))) = 0)
66	7, 65	eqtrid 2808	. . . 4 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ·_ih (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) = 0)
67	4, 6	hvsubcli 31623	. . . . 5 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ∈ ℋ
68		his6 31701	. . . . 5 ⊢ ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ∈ ℋ → (((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ·_ih (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) = 0 ↔ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = 0_ℎ))
69	67, 68	ax-mp 5	. . . 4 ⊢ (((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ·_ih (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) = 0 ↔ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = 0_ℎ)
70	66, 69	sylib 221	. . 3 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = 0_ℎ)
71	4, 6	hvsubeq0i 31665	. . 3 ⊢ ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = 0_ℎ ↔ ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))
72	70, 71	sylib 221	. 2 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))
73		oveq1 7427	. . . 4 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴) = (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴))
74	21, 16	eqtr4i 2787	. . . 4 ⊢ ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) = (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴)
75	42	eqcomi 2770	. . . 4 ⊢ ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴)
76	73, 74, 75	3eqtr4g 2821	. . 3 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) → ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) = ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
77	76	eqcomd 2767	. 2 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) → ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)))
78	72, 77	impbii 212	1 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) ↔ ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ↔ wb 209 = wceq 1570 ∈ wcel 2145 ‘cfv 6538 (class class class)co 7420 ℂcc 11198 ℝcr 11199 0cc0 11200 + caddc 11203 · cmul 11205 − cmin 11541 ∗ccj 15263 ℋchba 31521 ·_ℎ csm 31523 ·_ih csp 31524 0_ℎc0v 31526 −_ℎ cmv 31527

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2733 ax-sep 5249 ax-nul 5260 ax-pow 5327 ax-pr 5391 ax-un 7751 ax-resscn 11257 ax-1cn 11258 ax-icn 11259 ax-addcl 11260 ax-addrcl 11261 ax-mulcl 11262 ax-mulrcl 11263 ax-mulcom 11264 ax-addass 11265 ax-mulass 11266 ax-distr 11267 ax-i2m1 11268 ax-1ne0 11269 ax-1rid 11270 ax-rnegex 11271 ax-rrecex 11272 ax-cnre 11273 ax-pre-lttri 11274 ax-pre-lttrn 11275 ax-pre-ltadd 11276 ax-pre-mulgt0 11277 ax-hfvadd 31602 ax-hvcom 31603 ax-hvass 31604 ax-hv0cl 31605 ax-hvaddid 31606 ax-hfvmul 31607 ax-hvmulid 31608 ax-hvdistr2 31611 ax-hvmul0 31612 ax-hfi 31681 ax-his1 31684 ax-his2 31685 ax-his3 31686 ax-his4 31687

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3063 df-ral 3078 df-rex 3088 df-rmo 3366 df-reu 3367 df-rab 3414 df-v 3453 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-op 4591 df-uni 4868 df-iun 4953 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5546 df-eprel 5551 df-po 5559 df-so 5560 df-fr 5604 df-we 5606 df-xp 5657 df-rel 5658 df-cnv 5659 df-co 5660 df-dm 5661 df-rn 5662 df-res 5663 df-ima 5664 df-pred 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6540 df-fn 6541 df-f 6542 df-f1 6543 df-fo 6544 df-f1o 6545 df-fv 6546 df-riota 7377 df-ov 7423 df-oprab 7424 df-mpo 7425 df-om 7878 df-2nd 8002 df-frecs 8299 df-wrecs 8330 df-recs 8379 df-rdg 8418 df-er 8717 df-en 8974 df-dom 8975 df-sdom 8976 df-pnf 11345 df-mnf 11346 df-xr 11347 df-ltxr 11348 df-le 11349 df-sub 11543 df-neg 11544 df-div 11974 df-nn 12336 df-2 12405 df-cj 15266 df-re 15267 df-im 15268 df-hvsub 31573

This theorem is used by: h1de2i 32155

W3C validator