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 31545

Description: Equality case of Bunjakovaskij-Cauchy-Schwarz inequality. Specifically, in the equality case the two vectors are collinear. Compare bcsiHIL 31605. (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 31506	. . . . . . 7 ⊢ (𝐵 ·_ih 𝐵) ∈ ℂ
3		normlem7t.1	. . . . . . 7 ⊢ 𝐴 ∈ ℋ
4	2, 3	hvmulcli 31439	. . . . . 6 ⊢ ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ∈ ℋ
5	3, 1	hicli 31506	. . . . . . 7 ⊢ (𝐴 ·_ih 𝐵) ∈ ℂ
6	5, 1	hvmulcli 31439	. . . . . 6 ⊢ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ∈ ℋ
7	4, 6, 4, 6	normlem9 31543	. . . . 5 ⊢ ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ·_ih (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) = (((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) − ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴))))
8		oveq1 7426	. . . . . . . . . 10 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵)) = (((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐵)))
9	8	eqcomd 2771	. . . . . . . . 9 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐵)) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵)))
10		his5 31511	. . . . . . . . . . 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 31520	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ ℋ → (𝐵 ·_ih 𝐵) ∈ ℝ)
13		cjre 15216	. . . . . . . . . . . 12 ⊢ ((𝐵 ·_ih 𝐵) ∈ ℝ → (∗‘(𝐵 ·_ih 𝐵)) = (𝐵 ·_ih 𝐵))
14	1, 12, 13	mp2b 10	. . . . . . . . . . 11 ⊢ (∗‘(𝐵 ·_ih 𝐵)) = (𝐵 ·_ih 𝐵)
15		ax-his3 31509	. . . . . . . . . . . 12 ⊢ (((𝐵 ·_ih 𝐵) ∈ ℂ ∧ 𝐴 ∈ ℋ ∧ 𝐴 ∈ ℋ) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴) = ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴)))
16	2, 3, 3, 15	mp3an 1490	. . . . . . . . . . 11 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴) = ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴))
17	14, 16	oveq12i 7431	. . . . . . . . . 10 ⊢ ((∗‘(𝐵 ·_ih 𝐵)) · (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴)) = ((𝐵 ·_ih 𝐵) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴)))
18	3, 3	hicli 31506	. . . . . . . . . . . . 13 ⊢ (𝐴 ·_ih 𝐴) ∈ ℂ
19	2, 18	mulcli 11233	. . . . . . . . . . . 12 ⊢ ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴)) ∈ ℂ
20	2, 19	mulcomi 11234	. . . . . . . . . . 11 ⊢ ((𝐵 ·_ih 𝐵) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴))) = (((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
21	18, 2	mulcomi 11234	. . . . . . . . . . . 12 ⊢ ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) = ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴))
22	21	oveq1i 7429	. . . . . . . . . . 11 ⊢ (((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐵)) = (((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
23	20, 22	eqtr4i 2791	. . . . . . . . . 10 ⊢ ((𝐵 ·_ih 𝐵) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐴))) = (((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐵))
24	11, 17, 23	3eqtri 2792	. . . . . . . . 9 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) = (((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐵))
25		his5 31511	. . . . . . . . . . 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 31525	. . . . . . . . . . . 12 ⊢ (𝐵 ·_ih 𝐴) = (∗‘(𝐴 ·_ih 𝐵))
28	27	eqcomi 2774	. . . . . . . . . . 11 ⊢ (∗‘(𝐴 ·_ih 𝐵)) = (𝐵 ·_ih 𝐴)
29		ax-his3 31509	. . . . . . . . . . . 12 ⊢ (((𝐵 ·_ih 𝐵) ∈ ℂ ∧ 𝐴 ∈ ℋ ∧ 𝐵 ∈ ℋ) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐵) = ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵)))
30	2, 3, 1, 29	mp3an 1490	. . . . . . . . . . 11 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐵) = ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵))
31	28, 30	oveq12i 7431	. . . . . . . . . 10 ⊢ ((∗‘(𝐴 ·_ih 𝐵)) · (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐵)) = ((𝐵 ·_ih 𝐴) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵)))
32	1, 3	hicli 31506	. . . . . . . . . . . 12 ⊢ (𝐵 ·_ih 𝐴) ∈ ℂ
33	2, 5	mulcli 11233	. . . . . . . . . . . 12 ⊢ ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵)) ∈ ℂ
34	32, 33	mulcomi 11234	. . . . . . . . . . 11 ⊢ ((𝐵 ·_ih 𝐴) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵))) = (((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵)) · (𝐵 ·_ih 𝐴))
35	2, 5, 32	mulassi 11237	. . . . . . . . . . 11 ⊢ (((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵)) · (𝐵 ·_ih 𝐴)) = ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
36	5, 32	mulcli 11233	. . . . . . . . . . . 12 ⊢ ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) ∈ ℂ
37	2, 36	mulcomi 11234	. . . . . . . . . . 11 ⊢ ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴))) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
38	34, 35, 37	3eqtri 2792	. . . . . . . . . 10 ⊢ ((𝐵 ·_ih 𝐴) · ((𝐵 ·_ih 𝐵) · (𝐴 ·_ih 𝐵))) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
39	26, 31, 38	3eqtri 2792	. . . . . . . . 9 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
40	9, 24, 39	3eqtr4g 2825	. . . . . . . 8 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) = (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)))
41		ax-his3 31509	. . . . . . . . . . . 12 ⊢ (((𝐴 ·_ih 𝐵) ∈ ℂ ∧ 𝐵 ∈ ℋ ∧ 𝐴 ∈ ℋ) → (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴) = ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
42	5, 1, 3, 41	mp3an 1490	. . . . . . . . . . 11 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴) = ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴))
43	14, 42	oveq12i 7431	. . . . . . . . . 10 ⊢ ((∗‘(𝐵 ·_ih 𝐵)) · (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴)) = ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
44		his5 31511	. . . . . . . . . . 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 31511	. . . . . . . . . . . 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 31509	. . . . . . . . . . . . 13 ⊢ (((𝐴 ·_ih 𝐵) ∈ ℂ ∧ 𝐵 ∈ ℋ ∧ 𝐵 ∈ ℋ) → (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐵) = ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵)))
49	5, 1, 1, 48	mp3an 1490	. . . . . . . . . . . 12 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐵) = ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵))
50	28, 49	oveq12i 7431	. . . . . . . . . . 11 ⊢ ((∗‘(𝐴 ·_ih 𝐵)) · (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐵)) = ((𝐵 ·_ih 𝐴) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵)))
51	5, 2	mulcli 11233	. . . . . . . . . . . . 13 ⊢ ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵)) ∈ ℂ
52	32, 51	mulcomi 11234	. . . . . . . . . . . 12 ⊢ ((𝐵 ·_ih 𝐴) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵))) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐴))
53	5, 2, 32	mul32i 11423	. . . . . . . . . . . 12 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵)) · (𝐵 ·_ih 𝐴)) = (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵))
54	36, 2	mulcomi 11234	. . . . . . . . . . . 12 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) · (𝐵 ·_ih 𝐵)) = ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
55	52, 53, 54	3eqtri 2792	. . . . . . . . . . 11 ⊢ ((𝐵 ·_ih 𝐴) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐵))) = ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
56	47, 50, 55	3eqtri 2792	. . . . . . . . . 10 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = ((𝐵 ·_ih 𝐵) · ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
57	43, 45, 56	3eqtr4ri 2799	. . . . . . . . 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 7437	. . . . . . 7 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) = ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴))))
60	59	oveq1d 7434	. . . . . 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 31506	. . . . . . . 8 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ∈ ℂ
62	6, 4	hicli 31506	. . . . . . . 8 ⊢ (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) ∈ ℂ
63	61, 62	addcli 11232	. . . . . . 7 ⊢ ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴))) ∈ ℂ
64	63	subidi 11546	. . . . . 6 ⊢ (((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴))) − ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)))) = 0
65	60, 64	eqtrdi 2816	. . . . 5 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → (((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) − ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) + (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴)))) = 0)
66	7, 65	eqtrid 2812	. . . 4 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ·_ih (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))) = 0)
67	4, 6	hvsubcli 31446	. . . . 5 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) ∈ ℋ
68		his6 31524	. . . . 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 31488	. . 3 ⊢ ((((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) −_ℎ ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵)) = 0_ℎ ↔ ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))
72	70, 71	sylib 221	. 2 ⊢ (((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) → ((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵))
73		oveq1 7426	. . . 4 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) → (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴) = (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴))
74	21, 16	eqtr4i 2791	. . . 4 ⊢ ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) = (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) ·_ih 𝐴)
75	42	eqcomi 2774	. . . 4 ⊢ ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)) = (((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) ·_ih 𝐴)
76	73, 74, 75	3eqtr4g 2825	. . 3 ⊢ (((𝐵 ·_ih 𝐵) ·_ℎ 𝐴) = ((𝐴 ·_ih 𝐵) ·_ℎ 𝐵) → ((𝐴 ·_ih 𝐴) · (𝐵 ·_ih 𝐵)) = ((𝐴 ·_ih 𝐵) · (𝐵 ·_ih 𝐴)))
77	76	eqcomd 2771	. 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 2146 ‘cfv 6540 (class class class)co 7419 ℂcc 11115 ℝcr 11116 0cc0 11117 + caddc 11120 · cmul 11122 − cmin 11458 ∗ccj 15173 ℋchba 31344 ·_ℎ csm 31346 ·_ih csp 31347 0_ℎc0v 31349 −_ℎ cmv 31350

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 2148 ax-9 2156 ax-10 2179 ax-11 2195 ax-12 2216 ax-ext 2737 ax-sep 5259 ax-nul 5271 ax-pow 5338 ax-pr 5406 ax-un 7742 ax-resscn 11174 ax-1cn 11175 ax-icn 11176 ax-addcl 11177 ax-addrcl 11178 ax-mulcl 11179 ax-mulrcl 11180 ax-mulcom 11181 ax-addass 11182 ax-mulass 11183 ax-distr 11184 ax-i2m1 11185 ax-1ne0 11186 ax-1rid 11187 ax-rnegex 11188 ax-rrecex 11189 ax-cnre 11190 ax-pre-lttri 11191 ax-pre-lttrn 11192 ax-pre-ltadd 11193 ax-pre-mulgt0 11194 ax-hfvadd 31425 ax-hvcom 31426 ax-hvass 31427 ax-hv0cl 31428 ax-hvaddid 31429 ax-hfvmul 31430 ax-hvmulid 31431 ax-hvdistr2 31434 ax-hvmul0 31435 ax-hfi 31504 ax-his1 31507 ax-his2 31508 ax-his3 31509 ax-his4 31510

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 2569 df-eu 2599 df-clab 2744 df-cleq 2757 df-clel 2840 df-nfc 2914 df-ne 2961 df-nel 3067 df-ral 3082 df-rex 3092 df-rmo 3371 df-reu 3372 df-rab 3419 df-v 3459 df-sbc 3747 df-csb 3855 df-dif 3909 df-un 3911 df-in 3913 df-ss 3923 df-pss 3926 df-nul 4287 df-if 4490 df-pw 4566 df-sn 4592 df-pr 4594 df-op 4598 df-uni 4875 df-iun 4960 df-br 5112 df-opab 5176 df-mpt 5195 df-tr 5221 df-id 5558 df-eprel 5563 df-po 5571 df-so 5572 df-fr 5616 df-we 5618 df-xp 5669 df-rel 5670 df-cnv 5671 df-co 5672 df-dm 5673 df-rn 5674 df-res 5675 df-ima 5676 df-pred 6306 df-ord 6367 df-on 6368 df-lim 6369 df-suc 6370 df-iota 6496 df-fun 6542 df-fn 6543 df-f 6544 df-f1 6545 df-fo 6546 df-f1o 6547 df-fv 6548 df-riota 7376 df-ov 7422 df-oprab 7423 df-mpo 7424 df-om 7869 df-2nd 7993 df-frecs 8284 df-wrecs 8315 df-recs 8364 df-rdg 8403 df-er 8700 df-en 8950 df-dom 8951 df-sdom 8952 df-pnf 11262 df-mnf 11263 df-xr 11264 df-ltxr 11265 df-le 11266 df-sub 11460 df-neg 11461 df-div 11889 df-nn 12251 df-2 12320 df-cj 15176 df-re 15177 df-im 15178 df-hvsub 31396

This theorem is used by: h1de2i 31978

W3C validator