Proof of Theorem strlem1
| Step | Hyp | Ref
| Expression |
| 1 | | ssdif0 1748 |
. . . 4
⊢ (A
⊆ B ↔ (A ∖ B) =
∅) |
| 2 | 1 | negbii 162 |
. . 3
⊢ (¬ A ⊆ B
↔ ¬ (A ∖ B) = ∅) |
| 3 | | n0 1714 |
. . 3
⊢ (¬ (A ∖ B) =
∅ ↔ ∃x x ∈ (A
∖ B)) |
| 4 | 2, 3 | bitr 151 |
. 2
⊢ (¬ A ⊆ B
↔ ∃x x ∈ (A
∖ B)) |
| 5 | | fveq2 2832 |
. . . . . 6
⊢ (u =
((1 / (norm ‘x))
·s x)
→ (norm ‘u) = (norm ‘((1 /
(norm ‘x))
·s x))) |
| 6 | 5 | cleq1d 1109 |
. . . . 5
⊢ (u =
((1 / (norm ‘x))
·s x)
→ ((norm ‘u) = 1 ↔ (norm
‘((1 / (norm ‘x))
·s x)) =
1)) |
| 7 | 6 | rcla4ev 1403 |
. . . 4
⊢ ((((1 / (norm ‘x)) ·s x) ∈ (A
∖ B) ∧ (norm ‘((1 / (norm
‘x))
·s x)) = 1)
→ ∃u ∈ (A ∖ B)(norm ‘u) = 1) |
| 8 | | ax1re 4064 |
. . . . . . . . . . 11
⊢ 1 ∈ ℝ |
| 9 | | redivclt 4276 |
. . . . . . . . . . 11
⊢ (((1 ∈ ℝ ∧ (norm
‘x) ∈ ℝ) ∧ (norm
‘x) ≠ 0) → (1 / (norm
‘x)) ∈ ℝ) |
| 10 | 8, 9 | mpan11 529 |
. . . . . . . . . 10
⊢ (((norm ‘x) ∈ ℝ ∧ (norm ‘x) ≠ 0) → (1 / (norm ‘x)) ∈ ℝ) |
| 11 | | eldifi 1591 |
. . . . . . . . . . 11
⊢ (x
∈ (A ∖ B) → x
∈ A) |
| 12 | | strlem1.1 |
. . . . . . . . . . . 12
⊢ A
∈ Cℋ |
| 13 | 12 | chel 5137 |
. . . . . . . . . . 11
⊢ (x
∈ A → x ∈ ℋ ) |
| 14 | | normclt 5076 |
. . . . . . . . . . 11
⊢ (x
∈ ℋ → (norm ‘x)
∈ ℝ) |
| 15 | 11, 13, 14 | 3syl 21 |
. . . . . . . . . 10
⊢ (x
∈ (A ∖ B) → (norm ‘x) ∈ ℝ) |
| 16 | | strlem1.2 |
. . . . . . . . . . . . . . . 16
⊢ B
∈ Cℋ |
| 17 | | ch0 5133 |
. . . . . . . . . . . . . . . 16
⊢ (B
∈ Cℋ → 0v ∈ B) |
| 18 | 16, 17 | ax-mp 6 |
. . . . . . . . . . . . . . 15
⊢ 0v ∈ B |
| 19 | | eldifn 1592 |
. . . . . . . . . . . . . . 15
⊢ (0v ∈ (A ∖ B)
→ ¬ 0v ∈ B) |
| 20 | 18, 19 | mt2 96 |
. . . . . . . . . . . . . 14
⊢ ¬ 0v ∈
(A ∖ B) |
| 21 | | eleq1 1149 |
. . . . . . . . . . . . . 14
⊢ (x =
0v → (x ∈
(A ∖ B) ↔ 0v ∈ (A ∖ B))) |
| 22 | 20, 21 | mtbiri 539 |
. . . . . . . . . . . . 13
⊢ (x =
0v → ¬ x ∈
(A ∖ B)) |
| 23 | 22 | con2i 89 |
. . . . . . . . . . . 12
⊢ (x
∈ (A ∖ B) → ¬ x = 0v) |
| 24 | | norm-it 5080 |
. . . . . . . . . . . . 13
⊢ (x
∈ ℋ → ((norm ‘x) = 0
↔ x = 0v)) |
| 25 | 11, 13, 24 | 3syl 21 |
. . . . . . . . . . . 12
⊢ (x
∈ (A ∖ B) → ((norm ‘x) = 0 ↔ x
= 0v)) |
| 26 | 23, 25 | mtbird 537 |
. . . . . . . . . . 11
⊢ (x
∈ (A ∖ B) → ¬ (norm ‘x) = 0) |
| 27 | | df-ne 1192 |
. . . . . . . . . . 11
⊢ ((norm ‘x) ≠ 0 ↔ ¬ (norm ‘x) = 0) |
| 28 | 26, 27 | sylibr 175 |
. . . . . . . . . 10
⊢ (x
∈ (A ∖ B) → (norm ‘x) ≠ 0) |
| 29 | 10, 15, 28 | sylanc 361 |
. . . . . . . . 9
⊢ (x
∈ (A ∖ B) → (1 / (norm ‘x)) ∈ ℝ) |
| 30 | 29 | recnd 4099 |
. . . . . . . 8
⊢ (x
∈ (A ∖ B) → (1 / (norm ‘x)) ∈ ℂ) |
| 31 | 12 | chshi 5132 |
. . . . . . . . . 10
⊢ A
∈ Sℋ |
| 32 | | shmulclt 5124 |
. . . . . . . . . 10
⊢ (A
∈ Sℋ → (((1 / (norm ‘x)) ∈ ℂ ∧ x ∈ A)
→ ((1 / (norm ‘x))
·s x)
∈ A)) |
| 33 | 31, 32 | ax-mp 6 |
. . . . . . . . 9
⊢ (((1 / (norm ‘x)) ∈ ℂ ∧ x ∈ A)
→ ((1 / (norm ‘x))
·s x)
∈ A) |
| 34 | 33 | exp 291 |
. . . . . . . 8
⊢ ((1 / (norm ‘x)) ∈ ℂ → (x ∈ A
→ ((1 / (norm ‘x))
·s x)
∈ A)) |
| 35 | 30, 34 | syl 12 |
. . . . . . 7
⊢ (x
∈ (A ∖ B) → (x
∈ A → ((1 / (norm ‘x)) ·s x) ∈ A)) |
| 36 | 15 | recnd 4099 |
. . . . . . . . . 10
⊢ (x
∈ (A ∖ B) → (norm ‘x) ∈ ℂ) |
| 37 | 16 | chshi 5132 |
. . . . . . . . . . . 12
⊢ B
∈ Sℋ |
| 38 | | shmulclt 5124 |
. . . . . . . . . . . 12
⊢ (B
∈ Sℋ → (((norm ‘x) ∈ ℂ ∧ ((1 / (norm ‘x)) ·s x) ∈ B)
→ ((norm ‘x)
·s ((1 / (norm ‘x)) ·s x)) ∈ B)) |
| 39 | 37, 38 | ax-mp 6 |
. . . . . . . . . . 11
⊢ (((norm ‘x) ∈ ℂ ∧ ((1 / (norm ‘x)) ·s x) ∈ B)
→ ((norm ‘x)
·s ((1 / (norm ‘x)) ·s x)) ∈ B) |
| 40 | 39 | exp 291 |
. . . . . . . . . 10
⊢ ((norm ‘x) ∈ ℂ → (((1 / (norm
‘x))
·s x)
∈ B → ((norm ‘x) ·s ((1 / (norm
‘x))
·s x))
∈ B)) |
| 41 | 36, 40 | syl 12 |
. . . . . . . . 9
⊢ (x
∈ (A ∖ B) → (((1 / (norm ‘x)) ·s x) ∈ B
→ ((norm ‘x)
·s ((1 / (norm ‘x)) ·s x)) ∈ B)) |
| 42 | | recidt 4235 |
. . . . . . . . . . . . 13
⊢ (((norm ‘x) ∈ ℂ ∧ (norm ‘x) ≠ 0) → ((norm ‘x) · (1 / (norm ‘x))) = 1) |
| 43 | 42, 36, 28 | sylanc 361 |
. . . . . . . . . . . 12
⊢ (x
∈ (A ∖ B) → ((norm ‘x) · (1 / (norm ‘x))) = 1) |
| 44 | 43 | opreq1d 3012 |
. . . . . . . . . . 11
⊢ (x
∈ (A ∖ B) → (((norm ‘x) · (1 / (norm ‘x))) ·s x) = (1 ·s x)) |
| 45 | | ax-hvmulass 4992 |
. . . . . . . . . . . 12
⊢ (((norm ‘x) ∈ ℂ ∧ (1 / (norm ‘x)) ∈ ℂ ∧ x ∈ ℋ ) → (((norm ‘x) · (1 / (norm ‘x))) ·s x) = ((norm ‘x) ·s ((1 / (norm
‘x))
·s x))) |
| 46 | 11, 13 | syl 12 |
. . . . . . . . . . . 12
⊢ (x
∈ (A ∖ B) → x
∈ ℋ ) |
| 47 | 45, 36, 30, 46 | syl3anc 629 |
. . . . . . . . . . 11
⊢ (x
∈ (A ∖ B) → (((norm ‘x) · (1 / (norm ‘x))) ·s x) = ((norm ‘x) ·s ((1 / (norm
‘x))
·s x))) |
| 48 | | ax-hvmulid 4991 |
. . . . . . . . . . . 12
⊢ (x
∈ ℋ → (1 ·s x) = x) |
| 49 | 11, 13, 48 | 3syl 21 |
. . . . . . . . . . 11
⊢ (x
∈ (A ∖ B) → (1 ·s
x) = x) |
| 50 | 44, 47, 49 | 3eqtr3d 1133 |
. . . . . . . . . 10
⊢ (x
∈ (A ∖ B) → ((norm ‘x) ·s ((1 / (norm
‘x))
·s x)) =
x) |
| 51 | 50 | eleq1d 1155 |
. . . . . . . . 9
⊢ (x
∈ (A ∖ B) → (((norm ‘x) ·s ((1 / (norm
‘x))
·s x))
∈ B ↔ x ∈ B)) |
| 52 | 41, 51 | sylibd 177 |
. . . . . . . 8
⊢ (x
∈ (A ∖ B) → (((1 / (norm ‘x)) ·s x) ∈ B
→ x ∈ B)) |
| 53 | 52 | con3d 87 |
. . . . . . 7
⊢ (x
∈ (A ∖ B) → (¬ x ∈ B
→ ¬ ((1 / (norm ‘x))
·s x)
∈ B)) |
| 54 | 35, 53 | anim12d 431 |
. . . . . 6
⊢ (x
∈ (A ∖ B) → ((x
∈ A ∧ ¬ x ∈ B)
→ (((1 / (norm ‘x))
·s x)
∈ A ∧ ¬ ((1 / (norm
‘x))
·s x)
∈ B))) |
| 55 | | eldif 1496 |
. . . . . 6
⊢ (x
∈ (A ∖ B) ↔ (x
∈ A ∧ ¬ x ∈ B)) |
| 56 | | eldif 1496 |
. . . . . 6
⊢ (((1 / (norm ‘x)) ·s x) ∈ (A
∖ B) ↔ (((1 / (norm
‘x))
·s x)
∈ A ∧ ¬ ((1 / (norm
‘x))
·s x)
∈ B)) |
| 57 | 54, 55, 56 | 3imtr4g 426 |
. . . . 5
⊢ (x
∈ (A ∖ B) → (x
∈ (A ∖ B) → ((1 / (norm ‘x)) ·s x) ∈ (A
∖ B))) |
| 58 | 57 | pm2.43i 58 |
. . . 4
⊢ (x
∈ (A ∖ B) → ((1 / (norm ‘x)) ·s x) ∈ (A
∖ B)) |
| 59 | | norm-iiit 5088 |
. . . . . 6
⊢ (((1 / (norm ‘x)) ∈ ℂ ∧ x ∈ ℋ ) → (norm ‘((1 / (norm
‘x))
·s x)) =
((abs ‘(1 / (norm ‘x)))
· (norm ‘x))) |
| 60 | 59, 30, 46 | sylanc 361 |
. . . . 5
⊢ (x
∈ (A ∖ B) → (norm ‘((1 / (norm ‘x)) ·s x)) = ((abs ‘(1 / (norm ‘x))) · (norm ‘x))) |
| 61 | | absidt 4862 |
. . . . . . 7
⊢ ((1 / (norm ‘x)) ∈ ℝ → (0 ≤ (1 / (norm
‘x)) → (abs ‘(1 / (norm
‘x))) = (1 / (norm ‘x)))) |
| 62 | | divge0t 4403 |
. . . . . . . 8
⊢ ((1 ∈ ℝ ∧ (norm
‘x) ∈ ℝ) → ((0 ≤ 1
∧ 0 < (norm ‘x)) → 0 ≤
(1 / (norm ‘x)))) |
| 63 | 15, 8 | jctil 240 |
. . . . . . . 8
⊢ (x
∈ (A ∖ B) → (1 ∈ ℝ ∧ (norm
‘x) ∈ ℝ)) |
| 64 | | normgt0t 5078 |
. . . . . . . . . . 11
⊢ (x
∈ ℋ → (¬ x =
0v ↔ 0 < (norm ‘x))) |
| 65 | 11, 13, 64 | 3syl 21 |
. . . . . . . . . 10
⊢ (x
∈ (A ∖ B) → (¬ x = 0v ↔ 0 < (norm
‘x))) |
| 66 | 23, 65 | mpbid 170 |
. . . . . . . . 9
⊢ (x
∈ (A ∖ B) → 0 < (norm ‘x)) |
| 67 | | ax0re 4063 |
. . . . . . . . . 10
⊢ 0 ∈ ℝ |
| 68 | | lt01 4377 |
. . . . . . . . . 10
⊢ 0 < 1 |
| 69 | 67, 8, 68 | ltlei 4303 |
. . . . . . . . 9
⊢ 0 ≤ 1 |
| 70 | 66, 69 | jctil 240 |
. . . . . . . 8
⊢ (x
∈ (A ∖ B) → (0 ≤ 1 ∧ 0 < (norm
‘x))) |
| 71 | 62, 63, 70 | sylc 62 |
. . . . . . 7
⊢ (x
∈ (A ∖ B) → 0 ≤ (1 / (norm ‘x))) |
| 72 | 61, 29, 71 | sylc 62 |
. . . . . 6
⊢ (x
∈ (A ∖ B) → (abs ‘(1 / (norm ‘x))) = (1 / (norm ‘x))) |
| 73 | 72 | opreq1d 3012 |
. . . . 5
⊢ (x
∈ (A ∖ B) → ((abs ‘(1 / (norm ‘x))) · (norm ‘x)) = ((1 / (norm ‘x)) · (norm ‘x))) |
| 74 | | axmulcom 4071 |
. . . . . . 7
⊢ (((1 / (norm ‘x)) ∈ ℂ ∧ (norm ‘x) ∈ ℂ) → ((1 / (norm
‘x)) · (norm ‘x)) = ((norm ‘x) · (1 / (norm ‘x)))) |
| 75 | 74, 30, 36 | sylanc 361 |
. . . . . 6
⊢ (x
∈ (A ∖ B) → ((1 / (norm ‘x)) · (norm ‘x)) = ((norm ‘x) · (1 / (norm ‘x)))) |
| 76 | 75, 43 | eqtrd 1128 |
. . . . 5
⊢ (x
∈ (A ∖ B) → ((1 / (norm ‘x)) · (norm ‘x)) = 1) |
| 77 | 60, 73, 76 | 3eqtrd 1132 |
. . . 4
⊢ (x
∈ (A ∖ B) → (norm ‘((1 / (norm ‘x)) ·s x)) = 1) |
| 78 | 7, 58, 77 | sylanc 361 |
. . 3
⊢ (x
∈ (A ∖ B) → ∃u ∈ (A
∖ B)(norm ‘u) = 1) |
| 79 | 78 | 19.23aiv 952 |
. 2
⊢ (∃x x ∈
(A ∖ B) → ∃u ∈ (A
∖ B)(norm ‘u) = 1) |
| 80 | 4, 79 | sylbi 174 |
1
⊢ (¬ A ⊆ B
→ ∃u ∈ (A ∖ B)(norm ‘u) = 1) |