Proof of Theorem ip0i
| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | 2cn 12342 | . . . 4
⊢ 2 ∈
ℂ | 
| 2 |  | ip1i.1 | . . . . . . 7
⊢ 𝑋 = (BaseSet‘𝑈) | 
| 3 |  | ip1i.6 | . . . . . . 7
⊢ 𝑁 =
(normCV‘𝑈) | 
| 4 |  | ip1i.9 | . . . . . . . 8
⊢ 𝑈 ∈
CPreHilOLD | 
| 5 | 4 | phnvi 30836 | . . . . . . 7
⊢ 𝑈 ∈ NrmCVec | 
| 6 |  | ip1i.a | . . . . . . . 8
⊢ 𝐴 ∈ 𝑋 | 
| 7 |  | ip0i.j | . . . . . . . . 9
⊢ 𝐽 ∈ ℂ | 
| 8 |  | ip1i.c | . . . . . . . . 9
⊢ 𝐶 ∈ 𝑋 | 
| 9 |  | ip1i.4 | . . . . . . . . . 10
⊢ 𝑆 = (
·𝑠OLD ‘𝑈) | 
| 10 | 2, 9 | nvscl 30646 | . . . . . . . . 9
⊢ ((𝑈 ∈ NrmCVec ∧ 𝐽 ∈ ℂ ∧ 𝐶 ∈ 𝑋) → (𝐽𝑆𝐶) ∈ 𝑋) | 
| 11 | 5, 7, 8, 10 | mp3an 1462 | . . . . . . . 8
⊢ (𝐽𝑆𝐶) ∈ 𝑋 | 
| 12 |  | ip1i.2 | . . . . . . . . 9
⊢ 𝐺 = ( +𝑣
‘𝑈) | 
| 13 | 2, 12 | nvgcl 30640 | . . . . . . . 8
⊢ ((𝑈 ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ (𝐽𝑆𝐶) ∈ 𝑋) → (𝐴𝐺(𝐽𝑆𝐶)) ∈ 𝑋) | 
| 14 | 5, 6, 11, 13 | mp3an 1462 | . . . . . . 7
⊢ (𝐴𝐺(𝐽𝑆𝐶)) ∈ 𝑋 | 
| 15 | 2, 3, 5, 14 | nvcli 30682 | . . . . . 6
⊢ (𝑁‘(𝐴𝐺(𝐽𝑆𝐶))) ∈ ℝ | 
| 16 | 15 | recni 11276 | . . . . 5
⊢ (𝑁‘(𝐴𝐺(𝐽𝑆𝐶))) ∈ ℂ | 
| 17 | 16 | sqcli 14221 | . . . 4
⊢ ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2) ∈ ℂ | 
| 18 | 7 | negcli 11578 | . . . . . . . . 9
⊢ -𝐽 ∈ ℂ | 
| 19 | 2, 9 | nvscl 30646 | . . . . . . . . 9
⊢ ((𝑈 ∈ NrmCVec ∧ -𝐽 ∈ ℂ ∧ 𝐶 ∈ 𝑋) → (-𝐽𝑆𝐶) ∈ 𝑋) | 
| 20 | 5, 18, 8, 19 | mp3an 1462 | . . . . . . . 8
⊢ (-𝐽𝑆𝐶) ∈ 𝑋 | 
| 21 | 2, 12 | nvgcl 30640 | . . . . . . . 8
⊢ ((𝑈 ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ (-𝐽𝑆𝐶) ∈ 𝑋) → (𝐴𝐺(-𝐽𝑆𝐶)) ∈ 𝑋) | 
| 22 | 5, 6, 20, 21 | mp3an 1462 | . . . . . . 7
⊢ (𝐴𝐺(-𝐽𝑆𝐶)) ∈ 𝑋 | 
| 23 | 2, 3, 5, 22 | nvcli 30682 | . . . . . 6
⊢ (𝑁‘(𝐴𝐺(-𝐽𝑆𝐶))) ∈ ℝ | 
| 24 | 23 | recni 11276 | . . . . 5
⊢ (𝑁‘(𝐴𝐺(-𝐽𝑆𝐶))) ∈ ℂ | 
| 25 | 24 | sqcli 14221 | . . . 4
⊢ ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2) ∈ ℂ | 
| 26 | 1, 17, 25 | subdii 11713 | . . 3
⊢ (2
· (((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2) − ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2))) = ((2 · ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) − (2 · ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2))) | 
| 27 | 1, 17 | mulcli 11269 | . . . 4
⊢ (2
· ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) ∈ ℂ | 
| 28 | 1, 25 | mulcli 11269 | . . . 4
⊢ (2
· ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2)) ∈ ℂ | 
| 29 |  | ip1i.b | . . . . . . . 8
⊢ 𝐵 ∈ 𝑋 | 
| 30 | 2, 3, 5, 29 | nvcli 30682 | . . . . . . 7
⊢ (𝑁‘𝐵) ∈ ℝ | 
| 31 | 30 | recni 11276 | . . . . . 6
⊢ (𝑁‘𝐵) ∈ ℂ | 
| 32 | 31 | sqcli 14221 | . . . . 5
⊢ ((𝑁‘𝐵)↑2) ∈ ℂ | 
| 33 | 1, 32 | mulcli 11269 | . . . 4
⊢ (2
· ((𝑁‘𝐵)↑2)) ∈
ℂ | 
| 34 |  | pnpcan2 11550 | . . . 4
⊢ (((2
· ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) ∈ ℂ ∧ (2
· ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2)) ∈ ℂ ∧ (2
· ((𝑁‘𝐵)↑2)) ∈ ℂ)
→ (((2 · ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2))) − ((2 · ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2)))) = ((2 · ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) − (2 · ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2)))) | 
| 35 | 27, 28, 33, 34 | mp3an 1462 | . . 3
⊢ (((2
· ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2))) − ((2 · ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2)))) = ((2 · ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) − (2 · ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2))) | 
| 36 | 26, 35 | eqtr4i 2767 | . 2
⊢ (2
· (((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2) − ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2))) = (((2 · ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2))) − ((2 · ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2)))) | 
| 37 |  | eqid 2736 | . . . . . . . . . 10
⊢
(1st ‘𝑈) = (1st ‘𝑈) | 
| 38 | 37 | nvvc 30635 | . . . . . . . . 9
⊢ (𝑈 ∈ NrmCVec →
(1st ‘𝑈)
∈ CVecOLD) | 
| 39 | 12 | vafval 30623 | . . . . . . . . . 10
⊢ 𝐺 = (1st
‘(1st ‘𝑈)) | 
| 40 | 39 | vcablo 30589 | . . . . . . . . 9
⊢
((1st ‘𝑈) ∈ CVecOLD → 𝐺 ∈ AbelOp) | 
| 41 | 5, 38, 40 | mp2b 10 | . . . . . . . 8
⊢ 𝐺 ∈ AbelOp | 
| 42 | 6, 29, 11 | 3pm3.2i 1339 | . . . . . . . 8
⊢ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ (𝐽𝑆𝐶) ∈ 𝑋) | 
| 43 | 2, 12 | bafval 30624 | . . . . . . . . 9
⊢ 𝑋 = ran 𝐺 | 
| 44 | 43 | ablo32 30569 | . . . . . . . 8
⊢ ((𝐺 ∈ AbelOp ∧ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ (𝐽𝑆𝐶) ∈ 𝑋)) → ((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)) = ((𝐴𝐺(𝐽𝑆𝐶))𝐺𝐵)) | 
| 45 | 41, 42, 44 | mp2an 692 | . . . . . . 7
⊢ ((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)) = ((𝐴𝐺(𝐽𝑆𝐶))𝐺𝐵) | 
| 46 | 45 | fveq2i 6908 | . . . . . 6
⊢ (𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶))) = (𝑁‘((𝐴𝐺(𝐽𝑆𝐶))𝐺𝐵)) | 
| 47 | 46 | oveq1i 7442 | . . . . 5
⊢ ((𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)))↑2) = ((𝑁‘((𝐴𝐺(𝐽𝑆𝐶))𝐺𝐵))↑2) | 
| 48 |  | neg1cn 12381 | . . . . . . . . . 10
⊢ -1 ∈
ℂ | 
| 49 | 2, 9 | nvscl 30646 | . . . . . . . . . 10
⊢ ((𝑈 ∈ NrmCVec ∧ -1 ∈
ℂ ∧ 𝐵 ∈
𝑋) → (-1𝑆𝐵) ∈ 𝑋) | 
| 50 | 5, 48, 29, 49 | mp3an 1462 | . . . . . . . . 9
⊢ (-1𝑆𝐵) ∈ 𝑋 | 
| 51 | 6, 50, 11 | 3pm3.2i 1339 | . . . . . . . 8
⊢ (𝐴 ∈ 𝑋 ∧ (-1𝑆𝐵) ∈ 𝑋 ∧ (𝐽𝑆𝐶) ∈ 𝑋) | 
| 52 | 43 | ablo32 30569 | . . . . . . . 8
⊢ ((𝐺 ∈ AbelOp ∧ (𝐴 ∈ 𝑋 ∧ (-1𝑆𝐵) ∈ 𝑋 ∧ (𝐽𝑆𝐶) ∈ 𝑋)) → ((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)) = ((𝐴𝐺(𝐽𝑆𝐶))𝐺(-1𝑆𝐵))) | 
| 53 | 41, 51, 52 | mp2an 692 | . . . . . . 7
⊢ ((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)) = ((𝐴𝐺(𝐽𝑆𝐶))𝐺(-1𝑆𝐵)) | 
| 54 | 53 | fveq2i 6908 | . . . . . 6
⊢ (𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶))) = (𝑁‘((𝐴𝐺(𝐽𝑆𝐶))𝐺(-1𝑆𝐵))) | 
| 55 | 54 | oveq1i 7442 | . . . . 5
⊢ ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)))↑2) = ((𝑁‘((𝐴𝐺(𝐽𝑆𝐶))𝐺(-1𝑆𝐵)))↑2) | 
| 56 | 47, 55 | oveq12i 7444 | . . . 4
⊢ (((𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)))↑2) + ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)))↑2)) = (((𝑁‘((𝐴𝐺(𝐽𝑆𝐶))𝐺𝐵))↑2) + ((𝑁‘((𝐴𝐺(𝐽𝑆𝐶))𝐺(-1𝑆𝐵)))↑2)) | 
| 57 | 2, 12, 9, 3 | phpar 30844 | . . . . 5
⊢ ((𝑈 ∈ CPreHilOLD
∧ (𝐴𝐺(𝐽𝑆𝐶)) ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (((𝑁‘((𝐴𝐺(𝐽𝑆𝐶))𝐺𝐵))↑2) + ((𝑁‘((𝐴𝐺(𝐽𝑆𝐶))𝐺(-1𝑆𝐵)))↑2)) = (2 · (((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2) + ((𝑁‘𝐵)↑2)))) | 
| 58 | 4, 14, 29, 57 | mp3an 1462 | . . . 4
⊢ (((𝑁‘((𝐴𝐺(𝐽𝑆𝐶))𝐺𝐵))↑2) + ((𝑁‘((𝐴𝐺(𝐽𝑆𝐶))𝐺(-1𝑆𝐵)))↑2)) = (2 · (((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2) + ((𝑁‘𝐵)↑2))) | 
| 59 | 1, 17, 32 | adddii 11274 | . . . 4
⊢ (2
· (((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2) + ((𝑁‘𝐵)↑2))) = ((2 · ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2))) | 
| 60 | 56, 58, 59 | 3eqtri 2768 | . . 3
⊢ (((𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)))↑2) + ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)))↑2)) = ((2 · ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2))) | 
| 61 | 6, 29, 20 | 3pm3.2i 1339 | . . . . . . . 8
⊢ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ (-𝐽𝑆𝐶) ∈ 𝑋) | 
| 62 | 43 | ablo32 30569 | . . . . . . . 8
⊢ ((𝐺 ∈ AbelOp ∧ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ (-𝐽𝑆𝐶) ∈ 𝑋)) → ((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)) = ((𝐴𝐺(-𝐽𝑆𝐶))𝐺𝐵)) | 
| 63 | 41, 61, 62 | mp2an 692 | . . . . . . 7
⊢ ((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)) = ((𝐴𝐺(-𝐽𝑆𝐶))𝐺𝐵) | 
| 64 | 63 | fveq2i 6908 | . . . . . 6
⊢ (𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶))) = (𝑁‘((𝐴𝐺(-𝐽𝑆𝐶))𝐺𝐵)) | 
| 65 | 64 | oveq1i 7442 | . . . . 5
⊢ ((𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)))↑2) = ((𝑁‘((𝐴𝐺(-𝐽𝑆𝐶))𝐺𝐵))↑2) | 
| 66 | 6, 50, 20 | 3pm3.2i 1339 | . . . . . . . 8
⊢ (𝐴 ∈ 𝑋 ∧ (-1𝑆𝐵) ∈ 𝑋 ∧ (-𝐽𝑆𝐶) ∈ 𝑋) | 
| 67 | 43 | ablo32 30569 | . . . . . . . 8
⊢ ((𝐺 ∈ AbelOp ∧ (𝐴 ∈ 𝑋 ∧ (-1𝑆𝐵) ∈ 𝑋 ∧ (-𝐽𝑆𝐶) ∈ 𝑋)) → ((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)) = ((𝐴𝐺(-𝐽𝑆𝐶))𝐺(-1𝑆𝐵))) | 
| 68 | 41, 66, 67 | mp2an 692 | . . . . . . 7
⊢ ((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)) = ((𝐴𝐺(-𝐽𝑆𝐶))𝐺(-1𝑆𝐵)) | 
| 69 | 68 | fveq2i 6908 | . . . . . 6
⊢ (𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶))) = (𝑁‘((𝐴𝐺(-𝐽𝑆𝐶))𝐺(-1𝑆𝐵))) | 
| 70 | 69 | oveq1i 7442 | . . . . 5
⊢ ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)))↑2) = ((𝑁‘((𝐴𝐺(-𝐽𝑆𝐶))𝐺(-1𝑆𝐵)))↑2) | 
| 71 | 65, 70 | oveq12i 7444 | . . . 4
⊢ (((𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)))↑2) + ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)))↑2)) = (((𝑁‘((𝐴𝐺(-𝐽𝑆𝐶))𝐺𝐵))↑2) + ((𝑁‘((𝐴𝐺(-𝐽𝑆𝐶))𝐺(-1𝑆𝐵)))↑2)) | 
| 72 | 2, 12, 9, 3 | phpar 30844 | . . . . 5
⊢ ((𝑈 ∈ CPreHilOLD
∧ (𝐴𝐺(-𝐽𝑆𝐶)) ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (((𝑁‘((𝐴𝐺(-𝐽𝑆𝐶))𝐺𝐵))↑2) + ((𝑁‘((𝐴𝐺(-𝐽𝑆𝐶))𝐺(-1𝑆𝐵)))↑2)) = (2 · (((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2) + ((𝑁‘𝐵)↑2)))) | 
| 73 | 4, 22, 29, 72 | mp3an 1462 | . . . 4
⊢ (((𝑁‘((𝐴𝐺(-𝐽𝑆𝐶))𝐺𝐵))↑2) + ((𝑁‘((𝐴𝐺(-𝐽𝑆𝐶))𝐺(-1𝑆𝐵)))↑2)) = (2 · (((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2) + ((𝑁‘𝐵)↑2))) | 
| 74 | 1, 25, 32 | adddii 11274 | . . . 4
⊢ (2
· (((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2) + ((𝑁‘𝐵)↑2))) = ((2 · ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2))) | 
| 75 | 71, 73, 74 | 3eqtri 2768 | . . 3
⊢ (((𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)))↑2) + ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)))↑2)) = ((2 · ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2))) | 
| 76 | 60, 75 | oveq12i 7444 | . 2
⊢ ((((𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)))↑2) + ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)))↑2)) − (((𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)))↑2) + ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)))↑2))) = (((2 · ((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2))) − ((2 · ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2)) + (2 · ((𝑁‘𝐵)↑2)))) | 
| 77 | 2, 12 | nvgcl 30640 | . . . . . . . 8
⊢ ((𝑈 ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐴𝐺𝐵) ∈ 𝑋) | 
| 78 | 5, 6, 29, 77 | mp3an 1462 | . . . . . . 7
⊢ (𝐴𝐺𝐵) ∈ 𝑋 | 
| 79 | 2, 12 | nvgcl 30640 | . . . . . . 7
⊢ ((𝑈 ∈ NrmCVec ∧ (𝐴𝐺𝐵) ∈ 𝑋 ∧ (𝐽𝑆𝐶) ∈ 𝑋) → ((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)) ∈ 𝑋) | 
| 80 | 5, 78, 11, 79 | mp3an 1462 | . . . . . 6
⊢ ((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)) ∈ 𝑋 | 
| 81 | 2, 3, 5, 80 | nvcli 30682 | . . . . 5
⊢ (𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶))) ∈ ℝ | 
| 82 | 81 | recni 11276 | . . . 4
⊢ (𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶))) ∈ ℂ | 
| 83 | 82 | sqcli 14221 | . . 3
⊢ ((𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)))↑2) ∈ ℂ | 
| 84 | 2, 12 | nvgcl 30640 | . . . . . . . 8
⊢ ((𝑈 ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ (-1𝑆𝐵) ∈ 𝑋) → (𝐴𝐺(-1𝑆𝐵)) ∈ 𝑋) | 
| 85 | 5, 6, 50, 84 | mp3an 1462 | . . . . . . 7
⊢ (𝐴𝐺(-1𝑆𝐵)) ∈ 𝑋 | 
| 86 | 2, 12 | nvgcl 30640 | . . . . . . 7
⊢ ((𝑈 ∈ NrmCVec ∧ (𝐴𝐺(-1𝑆𝐵)) ∈ 𝑋 ∧ (𝐽𝑆𝐶) ∈ 𝑋) → ((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)) ∈ 𝑋) | 
| 87 | 5, 85, 11, 86 | mp3an 1462 | . . . . . 6
⊢ ((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)) ∈ 𝑋 | 
| 88 | 2, 3, 5, 87 | nvcli 30682 | . . . . 5
⊢ (𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶))) ∈ ℝ | 
| 89 | 88 | recni 11276 | . . . 4
⊢ (𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶))) ∈ ℂ | 
| 90 | 89 | sqcli 14221 | . . 3
⊢ ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)))↑2) ∈ ℂ | 
| 91 | 2, 12 | nvgcl 30640 | . . . . . . 7
⊢ ((𝑈 ∈ NrmCVec ∧ (𝐴𝐺𝐵) ∈ 𝑋 ∧ (-𝐽𝑆𝐶) ∈ 𝑋) → ((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)) ∈ 𝑋) | 
| 92 | 5, 78, 20, 91 | mp3an 1462 | . . . . . 6
⊢ ((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)) ∈ 𝑋 | 
| 93 | 2, 3, 5, 92 | nvcli 30682 | . . . . 5
⊢ (𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶))) ∈ ℝ | 
| 94 | 93 | recni 11276 | . . . 4
⊢ (𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶))) ∈ ℂ | 
| 95 | 94 | sqcli 14221 | . . 3
⊢ ((𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)))↑2) ∈ ℂ | 
| 96 | 2, 12 | nvgcl 30640 | . . . . . . 7
⊢ ((𝑈 ∈ NrmCVec ∧ (𝐴𝐺(-1𝑆𝐵)) ∈ 𝑋 ∧ (-𝐽𝑆𝐶) ∈ 𝑋) → ((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)) ∈ 𝑋) | 
| 97 | 5, 85, 20, 96 | mp3an 1462 | . . . . . 6
⊢ ((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)) ∈ 𝑋 | 
| 98 | 2, 3, 5, 97 | nvcli 30682 | . . . . 5
⊢ (𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶))) ∈ ℝ | 
| 99 | 98 | recni 11276 | . . . 4
⊢ (𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶))) ∈ ℂ | 
| 100 | 99 | sqcli 14221 | . . 3
⊢ ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)))↑2) ∈ ℂ | 
| 101 | 83, 90, 95, 100 | addsub4i 11606 | . 2
⊢ ((((𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)))↑2) + ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)))↑2)) − (((𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)))↑2) + ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)))↑2))) = ((((𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)))↑2) − ((𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)))↑2)) + (((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)))↑2) − ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)))↑2))) | 
| 102 | 36, 76, 101 | 3eqtr2ri 2771 | 1
⊢ ((((𝑁‘((𝐴𝐺𝐵)𝐺(𝐽𝑆𝐶)))↑2) − ((𝑁‘((𝐴𝐺𝐵)𝐺(-𝐽𝑆𝐶)))↑2)) + (((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(𝐽𝑆𝐶)))↑2) − ((𝑁‘((𝐴𝐺(-1𝑆𝐵))𝐺(-𝐽𝑆𝐶)))↑2))) = (2 · (((𝑁‘(𝐴𝐺(𝐽𝑆𝐶)))↑2) − ((𝑁‘(𝐴𝐺(-𝐽𝑆𝐶)))↑2))) |