Proof of Theorem osumlem3
| Step | Hyp | Ref
| Expression |
| 1 | | osumlem1.4 |
. 2
⊢ (φ
↔ (((C ∈ A ∧ D ∈
B) ∧ R = (C
+v D)) ∧ ((x ∈ A ∧
y ∈ (⊥ ‘A)) ∧ z =
(x +v y)))) |
| 2 | | osumlem1.1 |
. . . . . . 7
⊢ A
∈ Cℋ |
| 3 | | osumlem1.2 |
. . . . . . 7
⊢ B
∈ Cℋ |
| 4 | | osumlem1.3 |
. . . . . . 7
⊢ B
⊆ (⊥ ‘A) |
| 5 | | pm4.2 148 |
. . . . . . 7
⊢ ((((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y))) ↔ (((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y)))) |
| 6 | 2, 3, 4, 5 | osumlem1 5530 |
. . . . . 6
⊢ ((((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y))) → (((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ ))) |
| 7 | | hvsubclt 4998 |
. . . . . . . . . . 11
⊢ ((C
∈ ℋ ∧ x ∈ ℋ )
→ (C −v
x) ∈ ℋ ) |
| 8 | 7 | adantrr 312 |
. . . . . . . . . 10
⊢ ((C
∈ ℋ ∧ (x ∈ ℋ
∧ y ∈ ℋ )) → (C −v x) ∈ ℋ ) |
| 9 | 8 | adantlr 310 |
. . . . . . . . 9
⊢ (((C
∈ ℋ ∧ D ∈ ℋ )
∧ (x ∈ ℋ ∧ y ∈ ℋ )) → (C −v x) ∈ ℋ ) |
| 10 | 9 | adantrr 312 |
. . . . . . . 8
⊢ (((C
∈ ℋ ∧ D ∈ ℋ )
∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → (C −v x) ∈ ℋ ) |
| 11 | 10 | adantlr 310 |
. . . . . . 7
⊢ ((((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → (C −v x) ∈ ℋ ) |
| 12 | | normclt 5076 |
. . . . . . 7
⊢ ((C
−v x) ∈
ℋ → (norm ‘(C
−v x)) ∈
ℝ) |
| 13 | 11, 12 | syl 12 |
. . . . . 6
⊢ ((((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → (norm ‘(C −v x)) ∈ ℝ) |
| 14 | | sqege0t 4708 |
. . . . . 6
⊢ ((norm ‘(C −v x)) ∈ ℝ → 0 ≤ ((norm
‘(C −v
x))↑2)) |
| 15 | 6, 13, 14 | 3syl 21 |
. . . . 5
⊢ ((((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y))) → 0 ≤ ((norm ‘(C −v x))↑2)) |
| 16 | | ax0re 4063 |
. . . . . . . 8
⊢ 0 ∈ ℝ |
| 17 | 16 | a1i 7 |
. . . . . . 7
⊢ ((((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → 0 ∈
ℝ) |
| 18 | | sqreclt 4697 |
. . . . . . . 8
⊢ ((norm ‘(C −v x)) ∈ ℝ → ((norm ‘(C −v x))↑2) ∈ ℝ) |
| 19 | 11, 12, 18 | 3syl 21 |
. . . . . . 7
⊢ ((((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → ((norm ‘(C −v x))↑2) ∈ ℝ) |
| 20 | | hvsubclt 4998 |
. . . . . . . . . . . 12
⊢ ((D
∈ ℋ ∧ y ∈ ℋ )
→ (D −v
y) ∈ ℋ ) |
| 21 | 20 | adantrl 311 |
. . . . . . . . . . 11
⊢ ((D
∈ ℋ ∧ (x ∈ ℋ
∧ y ∈ ℋ )) → (D −v y) ∈ ℋ ) |
| 22 | 21 | adantll 309 |
. . . . . . . . . 10
⊢ (((C
∈ ℋ ∧ D ∈ ℋ )
∧ (x ∈ ℋ ∧ y ∈ ℋ )) → (D −v y) ∈ ℋ ) |
| 23 | 22 | adantrr 312 |
. . . . . . . . 9
⊢ (((C
∈ ℋ ∧ D ∈ ℋ )
∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → (D −v y) ∈ ℋ ) |
| 24 | 23 | adantlr 310 |
. . . . . . . 8
⊢ ((((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → (D −v y) ∈ ℋ ) |
| 25 | | normclt 5076 |
. . . . . . . 8
⊢ ((D
−v y) ∈
ℋ → (norm ‘(D
−v y)) ∈
ℝ) |
| 26 | | sqreclt 4697 |
. . . . . . . 8
⊢ ((norm ‘(D −v y)) ∈ ℝ → ((norm ‘(D −v y))↑2) ∈ ℝ) |
| 27 | 24, 25, 26 | 3syl 21 |
. . . . . . 7
⊢ ((((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → ((norm ‘(D −v y))↑2) ∈ ℝ) |
| 28 | 17, 19, 27 | 3jca 604 |
. . . . . 6
⊢ ((((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → (0 ∈ ℝ ∧
((norm ‘(C −v
x))↑2) ∈ ℝ ∧ ((norm
‘(D −v
y))↑2) ∈ ℝ)) |
| 29 | | leadd1t 4350 |
. . . . . 6
⊢ ((0 ∈ ℝ ∧ ((norm
‘(C −v
x))↑2) ∈ ℝ ∧ ((norm
‘(D −v
y))↑2) ∈ ℝ) → (0 ≤
((norm ‘(C −v
x))↑2) ↔ (0 + ((norm
‘(D −v
y))↑2)) ≤ (((norm ‘(C −v x))↑2) + ((norm ‘(D −v y))↑2)))) |
| 30 | 6, 28, 29 | 3syl 21 |
. . . . 5
⊢ ((((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y))) → (0 ≤ ((norm ‘(C −v x))↑2) ↔ (0 + ((norm ‘(D −v y))↑2)) ≤ (((norm ‘(C −v x))↑2) + ((norm ‘(D −v y))↑2)))) |
| 31 | 15, 30 | mpbid 170 |
. . . 4
⊢ ((((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y))) → (0 + ((norm ‘(D −v y))↑2)) ≤ (((norm ‘(C −v x))↑2) + ((norm ‘(D −v y))↑2))) |
| 32 | 27 | recnd 4099 |
. . . . 5
⊢ ((((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → ((norm ‘(D −v y))↑2) ∈ ℂ) |
| 33 | | addid2t 4132 |
. . . . 5
⊢ (((norm ‘(D −v y))↑2) ∈ ℂ → (0 + ((norm
‘(D −v
y))↑2)) = ((norm ‘(D −v y))↑2)) |
| 34 | 6, 32, 33 | 3syl 21 |
. . . 4
⊢ ((((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y))) → (0 + ((norm ‘(D −v y))↑2)) = ((norm ‘(D −v y))↑2)) |
| 35 | 2, 3, 4, 5 | osumlem2 5531 |
. . . 4
⊢ ((((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y))) → (((norm ‘(C −v x))↑2) + ((norm ‘(D −v y))↑2)) = ((norm ‘(R −v z))↑2)) |
| 36 | 31, 34, 35 | 3brtr3d 2086 |
. . 3
⊢ ((((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y))) → ((norm ‘(D −v y))↑2) ≤ ((norm ‘(R −v z))↑2)) |
| 37 | | hvsubclt 4998 |
. . . . . . 7
⊢ ((R
∈ ℋ ∧ z ∈ ℋ )
→ (R −v
z) ∈ ℋ ) |
| 38 | 37 | adantrl 311 |
. . . . . 6
⊢ ((R
∈ ℋ ∧ ((x ∈ ℋ
∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → (R −v z) ∈ ℋ ) |
| 39 | 38 | adantll 309 |
. . . . 5
⊢ ((((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → (R −v z) ∈ ℋ ) |
| 40 | 24, 39 | jca 236 |
. . . 4
⊢ ((((C
∈ ℋ ∧ D ∈ ℋ )
∧ R ∈ ℋ ) ∧ ((x ∈ ℋ ∧ y ∈ ℋ ) ∧ z ∈ ℋ )) → ((D −v y) ∈ ℋ ∧ (R −v z) ∈ ℋ )) |
| 41 | | le2sqet 4707 |
. . . . 5
⊢ (((norm ‘(D −v y)) ∈ ℝ ∧ (norm ‘(R −v z)) ∈ ℝ) → ((0 ≤ (norm
‘(D −v
y)) ∧ 0 ≤ (norm ‘(R −v z))) → ((norm ‘(D −v y)) ≤ (norm ‘(R −v z)) ↔ ((norm ‘(D −v y))↑2) ≤ ((norm ‘(R −v z))↑2)))) |
| 42 | | normclt 5076 |
. . . . . 6
⊢ ((R
−v z) ∈
ℋ → (norm ‘(R
−v z)) ∈
ℝ) |
| 43 | 25, 42 | anim12i 268 |
. . . . 5
⊢ (((D
−v y) ∈
ℋ ∧ (R −v
z) ∈ ℋ ) → ((norm
‘(D −v
y)) ∈ ℝ ∧ (norm
‘(R −v
z)) ∈ ℝ)) |
| 44 | | normge0t 5077 |
. . . . . 6
⊢ ((D
−v y) ∈
ℋ → 0 ≤ (norm ‘(D
−v y))) |
| 45 | | normge0t 5077 |
. . . . . 6
⊢ ((R
−v z) ∈
ℋ → 0 ≤ (norm ‘(R
−v z))) |
| 46 | 44, 45 | anim12i 268 |
. . . . 5
⊢ (((D
−v y) ∈
ℋ ∧ (R −v
z) ∈ ℋ ) → (0 ≤ (norm
‘(D −v
y)) ∧ 0 ≤ (norm ‘(R −v z)))) |
| 47 | 41, 43, 46 | sylc 62 |
. . . 4
⊢ (((D
−v y) ∈
ℋ ∧ (R −v
z) ∈ ℋ ) → ((norm
‘(D −v
y)) ≤ (norm ‘(R −v z)) ↔ ((norm ‘(D −v y))↑2) ≤ ((norm ‘(R −v z))↑2))) |
| 48 | 6, 40, 47 | 3syl 21 |
. . 3
⊢ ((((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y))) → ((norm ‘(D −v y)) ≤ (norm ‘(R −v z)) ↔ ((norm ‘(D −v y))↑2) ≤ ((norm ‘(R −v z))↑2))) |
| 49 | 36, 48 | mpbird 171 |
. 2
⊢ ((((C
∈ A ∧ D ∈ B)
∧ R = (C +v D)) ∧ ((x
∈ A ∧ y ∈ (⊥ ‘A)) ∧ z =
(x +v y))) → (norm ‘(D −v y)) ≤ (norm ‘(R −v z))) |
| 50 | 1, 49 | sylbi 174 |
1
⊢ (φ
→ (norm ‘(D
−v y)) ≤ (norm
‘(R −v
z))) |