Proof of Theorem unierr
| Step | Hyp | Ref
| Expression |
| 1 | | unierr.1 |
. . . . . . . 8
⊢ F ∈
UniOp |
| 2 | | unopbdt 9935 |
. . . . . . . 8
⊢ (F ∈ UniOp →
F ∈
BndLinOp) |
| 3 | 1, 2 | ax-mp 7 |
. . . . . . 7
⊢ F ∈
BndLinOp |
| 4 | | bdopft 9784 |
. . . . . . 7
⊢ (F ∈ BndLinOp
→ F: ℋ –→ ℋ ) |
| 5 | 3, 4 | ax-mp 7 |
. . . . . 6
⊢ F: ℋ
–→ ℋ |
| 6 | | unierr.2 |
. . . . . . . 8
⊢ G ∈
UniOp |
| 7 | | unopbdt 9935 |
. . . . . . . 8
⊢ (G ∈ UniOp →
G ∈
BndLinOp) |
| 8 | 6, 7 | ax-mp 7 |
. . . . . . 7
⊢ G ∈
BndLinOp |
| 9 | | bdopft 9784 |
. . . . . . 7
⊢ (G ∈ BndLinOp
→ G: ℋ –→ ℋ ) |
| 10 | 8, 9 | ax-mp 7 |
. . . . . 6
⊢ G: ℋ
–→ ℋ |
| 11 | 5, 10 | hocof 9687 |
. . . . 5
⊢ (F ∘ G): ℋ
–→ ℋ |
| 12 | | unierr.3 |
. . . . . . . 8
⊢ S ∈
UniOp |
| 13 | | unopbdt 9935 |
. . . . . . . 8
⊢ (S ∈ UniOp →
S ∈
BndLinOp) |
| 14 | 12, 13 | ax-mp 7 |
. . . . . . 7
⊢ S ∈
BndLinOp |
| 15 | | bdopft 9784 |
. . . . . . 7
⊢ (S ∈ BndLinOp
→ S: ℋ –→ ℋ ) |
| 16 | 14, 15 | ax-mp 7 |
. . . . . 6
⊢ S: ℋ
–→ ℋ |
| 17 | | unierr.4 |
. . . . . . . 8
⊢ T ∈
UniOp |
| 18 | | unopbdt 9935 |
. . . . . . . 8
⊢ (T ∈ UniOp →
T ∈
BndLinOp) |
| 19 | 17, 18 | ax-mp 7 |
. . . . . . 7
⊢ T ∈
BndLinOp |
| 20 | | bdopft 9784 |
. . . . . . 7
⊢ (T ∈ BndLinOp
→ T: ℋ –→ ℋ ) |
| 21 | 19, 20 | ax-mp 7 |
. . . . . 6
⊢ T: ℋ
–→ ℋ |
| 22 | 16, 21 | hocof 9687 |
. . . . 5
⊢ (S ∘ T): ℋ
–→ ℋ |
| 23 | 11, 22 | hosubcl 9690 |
. . . 4
⊢ ((F ∘ G) −op (S ∘ T)): ℋ
–→ ℋ |
| 24 | | nmop0h 9911 |
. . . 4
⊢ (( ℋ = 0ℋ ⋀
((F ∘
G) −op (S ∘ T)): ℋ
–→ ℋ ) → (normop
‘((F ∘ G)
−op (S ∘ T))) =
0) |
| 25 | 23, 24 | mpan2 698 |
. . 3
⊢ ( ℋ = 0ℋ → (normop
‘((F ∘ G)
−op (S ∘ T))) =
0) |
| 26 | 5, 16 | hosubcl 9690 |
. . . . . 6
⊢ (F −op S): ℋ
–→ ℋ |
| 27 | | nmop0h 9911 |
. . . . . 6
⊢ (( ℋ = 0ℋ ⋀
(F −op S): ℋ
–→ ℋ ) → (normop
‘(F −op S)) = 0) |
| 28 | 26, 27 | mpan2 698 |
. . . . 5
⊢ ( ℋ = 0ℋ → (normop
‘(F −op S)) = 0) |
| 29 | 10, 21 | hosubcl 9690 |
. . . . . 6
⊢ (G −op T): ℋ
–→ ℋ |
| 30 | | nmop0h 9911 |
. . . . . 6
⊢ (( ℋ = 0ℋ ⋀
(G −op T): ℋ
–→ ℋ ) → (normop
‘(G −op T)) = 0) |
| 31 | 29, 30 | mpan2 698 |
. . . . 5
⊢ ( ℋ = 0ℋ → (normop
‘(G −op T)) = 0) |
| 32 | 28, 31 | opreq12d 3984 |
. . . 4
⊢ ( ℋ = 0ℋ → ((normop
‘(F −op S)) + (normop ‘(G −op T))) = (0 + 0)) |
| 33 | | 0re 5452 |
. . . . . 6
⊢ 0 ∈ ℝ |
| 34 | 33 | leid 5622 |
. . . . 5
⊢ 0 ≤ 0 |
| 35 | | 0cn 5340 |
. . . . . 6
⊢ 0 ∈ ℂ |
| 36 | 35 | addid1 5342 |
. . . . 5
⊢ (0 + 0) = 0 |
| 37 | 34, 36 | breqtrr 2645 |
. . . 4
⊢ 0 ≤ (0 + 0) |
| 38 | 32, 37 | syl5breqr 2656 |
. . 3
⊢ ( ℋ = 0ℋ → 0 ≤ ((normop
‘(F −op S)) + (normop ‘(G −op T)))) |
| 39 | 25, 38 | eqbrtrd 2640 |
. 2
⊢ ( ℋ = 0ℋ → (normop
‘((F ∘ G)
−op (S ∘ T))) ≤
((normop ‘(F
−op S)) +
(normop ‘(G
−op T)))) |
| 40 | | nmopunt 9934 |
. . . . . . 7
⊢ (( ℋ ≠ 0ℋ ⋀
G ∈
UniOp) → (normop ‘G)
= 1) |
| 41 | 6, 40 | mpan2 698 |
. . . . . 6
⊢ ( ℋ ≠ 0ℋ → (normop
‘G) = 1) |
| 42 | 41 | opreq2d 3982 |
. . . . 5
⊢ ( ℋ ≠ 0ℋ → ((normop
‘(F −op S)) · (normop ‘G)) = ((normop ‘(F −op S)) · 1)) |
| 43 | 3, 14 | bdophd 10025 |
. . . . . . . 8
⊢ (F −op S) ∈
BndLinOp |
| 44 | | nmopret 9792 |
. . . . . . . 8
⊢ ((F −op S) ∈ BndLinOp
→ (normop ‘(F
−op S)) ∈ ℝ) |
| 45 | 43, 44 | ax-mp 7 |
. . . . . . 7
⊢ (normop
‘(F −op S)) ∈ ℝ |
| 46 | 45 | recn 5326 |
. . . . . 6
⊢ (normop
‘(F −op S)) ∈ ℂ |
| 47 | 46 | mulid1 5344 |
. . . . 5
⊢ ((normop
‘(F −op S)) · 1) = (normop
‘(F −op S)) |
| 48 | 42, 47 | syl6eq 1526 |
. . . 4
⊢ ( ℋ ≠ 0ℋ → ((normop
‘(F −op S)) · (normop ‘G)) = (normop ‘(F −op S))) |
| 49 | | nmopunt 9934 |
. . . . . . 7
⊢ (( ℋ ≠ 0ℋ ⋀
S ∈
UniOp) → (normop ‘S)
= 1) |
| 50 | 12, 49 | mpan2 698 |
. . . . . 6
⊢ ( ℋ ≠ 0ℋ → (normop
‘S) = 1) |
| 51 | 50 | opreq1d 3981 |
. . . . 5
⊢ ( ℋ ≠ 0ℋ → ((normop
‘S) · (normop
‘(G −op T))) = (1 · (normop
‘(G −op T)))) |
| 52 | 8, 19 | bdophd 10025 |
. . . . . . . 8
⊢ (G −op T) ∈
BndLinOp |
| 53 | | nmopret 9792 |
. . . . . . . 8
⊢ ((G −op T) ∈ BndLinOp
→ (normop ‘(G
−op T)) ∈ ℝ) |
| 54 | 52, 53 | ax-mp 7 |
. . . . . . 7
⊢ (normop
‘(G −op T)) ∈ ℝ |
| 55 | 54 | recn 5326 |
. . . . . 6
⊢ (normop
‘(G −op T)) ∈ ℂ |
| 56 | 55 | mulid2 5345 |
. . . . 5
⊢ (1 ·
(normop ‘(G
−op T))) =
(normop ‘(G
−op T)) |
| 57 | 51, 56 | syl6eq 1526 |
. . . 4
⊢ ( ℋ ≠ 0ℋ → ((normop
‘S) · (normop
‘(G −op T))) = (normop ‘(G −op T))) |
| 58 | 48, 57 | opreq12d 3984 |
. . 3
⊢ ( ℋ ≠ 0ℋ → (((normop
‘(F −op S)) · (normop ‘G)) + ((normop ‘S) · (normop ‘(G −op T)))) = ((normop ‘(F −op S)) + (normop ‘(G −op T)))) |
| 59 | 16, 10 | hocof 9687 |
. . . . . 6
⊢ (S ∘ G): ℋ
–→ ℋ |
| 60 | 11, 59, 22 | honpncan 9748 |
. . . . 5
⊢ (((F ∘ G) −op (S ∘ G)) +op ((S ∘ G) −op (S ∘ T))) = ((F ∘ G)
−op (S ∘ T)) |
| 61 | 60 | fveq2i 3733 |
. . . 4
⊢ (normop
‘(((F ∘ G)
−op (S ∘ G))
+op ((S ∘ G)
−op (S ∘ T)))) =
(normop ‘((F ∘ G)
−op (S ∘ T))) |
| 62 | 3, 8 | bdopco 10026 |
. . . . . . 7
⊢ (F ∘ G) ∈
BndLinOp |
| 63 | 14, 8 | bdopco 10026 |
. . . . . . 7
⊢ (S ∘ G) ∈
BndLinOp |
| 64 | 62, 63 | bdophd 10025 |
. . . . . 6
⊢ ((F ∘ G) −op (S ∘ G)) ∈
BndLinOp |
| 65 | 14, 19 | bdopco 10026 |
. . . . . . 7
⊢ (S ∘ T) ∈
BndLinOp |
| 66 | 63, 65 | bdophd 10025 |
. . . . . 6
⊢ ((S ∘ G) −op (S ∘ T)) ∈
BndLinOp |
| 67 | 64, 66 | nmoptri 10022 |
. . . . 5
⊢ (normop
‘(((F ∘ G)
−op (S ∘ G))
+op ((S ∘ G)
−op (S ∘ T)))) ≤
((normop ‘((F ∘ G)
−op (S ∘ G))) +
(normop ‘((S ∘ G)
−op (S ∘ T)))) |
| 68 | 5, 16, 10 | hocsubdir 9701 |
. . . . . . . 8
⊢ ((F −op S) ∘ G) = ((F ∘ G)
−op (S ∘ G)) |
| 69 | 68 | fveq2i 3733 |
. . . . . . 7
⊢ (normop
‘((F −op S) ∘ G)) = (normop ‘((F ∘ G) −op (S ∘ G))) |
| 70 | 43, 8 | nmopco 10023 |
. . . . . . 7
⊢ (normop
‘((F −op S) ∘ G)) ≤ ((normop ‘(F −op S)) · (normop ‘G)) |
| 71 | 69, 70 | eqbrtrr 2641 |
. . . . . 6
⊢ (normop
‘((F ∘ G)
−op (S ∘ G))) ≤
((normop ‘(F
−op S)) ·
(normop ‘G)) |
| 72 | | bdoplnt 9783 |
. . . . . . . . . 10
⊢ (S ∈ BndLinOp
→ S ∈ LinOp) |
| 73 | 14, 72 | ax-mp 7 |
. . . . . . . . 9
⊢ S ∈
LinOp |
| 74 | 73, 10, 21 | hoddi 9909 |
. . . . . . . 8
⊢ (S ∘ (G −op T)) = ((S ∘ G)
−op (S ∘ T)) |
| 75 | 74 | fveq2i 3733 |
. . . . . . 7
⊢ (normop
‘(S ∘ (G
−op T))) =
(normop ‘((S ∘ G)
−op (S ∘ T))) |
| 76 | 14, 52 | nmopco 10023 |
. . . . . . 7
⊢ (normop
‘(S ∘ (G
−op T))) ≤
((normop ‘S) ·
(normop ‘(G
−op T))) |
| 77 | 75, 76 | eqbrtrr 2641 |
. . . . . 6
⊢ (normop
‘((S ∘ G)
−op (S ∘ T))) ≤
((normop ‘S) ·
(normop ‘(G
−op T))) |
| 78 | | nmopret 9792 |
. . . . . . . 8
⊢ (((F ∘ G) −op (S ∘ G)) ∈ BndLinOp
→ (normop ‘((F ∘ G)
−op (S ∘ G))) ∈ ℝ) |
| 79 | 64, 78 | ax-mp 7 |
. . . . . . 7
⊢ (normop
‘((F ∘ G)
−op (S ∘ G))) ∈ ℝ |
| 80 | | nmopret 9792 |
. . . . . . . 8
⊢ (((S ∘ G) −op (S ∘ T)) ∈ BndLinOp
→ (normop ‘((S ∘ G)
−op (S ∘ T))) ∈ ℝ) |
| 81 | 66, 80 | ax-mp 7 |
. . . . . . 7
⊢ (normop
‘((S ∘ G)
−op (S ∘ T))) ∈ ℝ |
| 82 | | nmopret 9792 |
. . . . . . . . 9
⊢ (G ∈ BndLinOp
→ (normop ‘G) ∈ ℝ) |
| 83 | 8, 82 | ax-mp 7 |
. . . . . . . 8
⊢ (normop
‘G) ∈ ℝ |
| 84 | 45, 83 | remulcl 5347 |
. . . . . . 7
⊢ ((normop
‘(F −op S)) · (normop ‘G)) ∈ ℝ |
| 85 | | nmopret 9792 |
. . . . . . . . 9
⊢ (S ∈ BndLinOp
→ (normop ‘S) ∈ ℝ) |
| 86 | 14, 85 | ax-mp 7 |
. . . . . . . 8
⊢ (normop
‘S) ∈ ℝ |
| 87 | 86, 54 | remulcl 5347 |
. . . . . . 7
⊢ ((normop
‘S) · (normop
‘(G −op T))) ∈ ℝ |
| 88 | 79, 81, 84, 87 | le2add 5609 |
. . . . . 6
⊢ (((normop
‘((F ∘ G)
−op (S ∘ G))) ≤
((normop ‘(F
−op S)) ·
(normop ‘G)) ⋀ (normop ‘((S ∘ G) −op (S ∘ T))) ≤ ((normop ‘S) · (normop ‘(G −op T)))) → ((normop ‘((F ∘ G) −op (S ∘ G))) + (normop ‘((S ∘ G) −op (S ∘ T)))) ≤ (((normop ‘(F −op S)) · (normop ‘G)) + ((normop ‘S) · (normop ‘(G −op T))))) |
| 89 | 71, 77, 88 | mp2an 699 |
. . . . 5
⊢ ((normop
‘((F ∘ G)
−op (S ∘ G))) +
(normop ‘((S ∘ G)
−op (S ∘ T)))) ≤
(((normop ‘(F
−op S)) ·
(normop ‘G)) +
((normop ‘S) ·
(normop ‘(G
−op T)))) |
| 90 | 64, 66 | bdophs 10024 |
. . . . . . 7
⊢ (((F ∘ G) −op (S ∘ G)) +op ((S ∘ G) −op (S ∘ T))) ∈
BndLinOp |
| 91 | | nmopret 9792 |
. . . . . . 7
⊢ ((((F ∘ G) −op (S ∘ G)) +op ((S ∘ G) −op (S ∘ T))) ∈ BndLinOp
→ (normop ‘(((F ∘ G)
−op (S ∘ G))
+op ((S ∘ G)
−op (S ∘ T)))) ∈ ℝ) |
| 92 | 90, 91 | ax-mp 7 |
. . . . . 6
⊢ (normop
‘(((F ∘ G)
−op (S ∘ G))
+op ((S ∘ G)
−op (S ∘ T)))) ∈ ℝ |
| 93 | 79, 81 | readdcl 5346 |
. . . . . 6
⊢ ((normop
‘((F ∘ G)
−op (S ∘ G))) +
(normop ‘((S ∘ G)
−op (S ∘ T)))) ∈ ℝ |
| 94 | 84, 87 | readdcl 5346 |
. . . . . 6
⊢ (((normop
‘(F −op S)) · (normop ‘G)) + ((normop ‘S) · (normop ‘(G −op T)))) ∈ ℝ |
| 95 | 92, 93, 94 | letr 5600 |
. . . . 5
⊢ (((normop
‘(((F ∘ G)
−op (S ∘ G))
+op ((S ∘ G)
−op (S ∘ T)))) ≤
((normop ‘((F ∘ G)
−op (S ∘ G))) +
(normop ‘((S ∘ G)
−op (S ∘ T)))) ⋀ ((normop ‘((F ∘ G) −op (S ∘ G))) + (normop ‘((S ∘ G) −op (S ∘ T)))) ≤ (((normop ‘(F −op S)) · (normop ‘G)) + ((normop ‘S) · (normop ‘(G −op T))))) → (normop ‘(((F ∘ G) −op (S ∘ G)) +op ((S ∘ G) −op (S ∘ T)))) ≤ (((normop ‘(F −op S)) · (normop ‘G)) + ((normop ‘S) · (normop ‘(G −op T))))) |
| 96 | 67, 89, 95 | mp2an 699 |
. . . 4
⊢ (normop
‘(((F ∘ G)
−op (S ∘ G))
+op ((S ∘ G)
−op (S ∘ T)))) ≤
(((normop ‘(F
−op S)) ·
(normop ‘G)) +
((normop ‘S) ·
(normop ‘(G
−op T)))) |
| 97 | 61, 96 | eqbrtrr 2641 |
. . 3
⊢ (normop
‘((F ∘ G)
−op (S ∘ T))) ≤
(((normop ‘(F
−op S)) ·
(normop ‘G)) +
((normop ‘S) ·
(normop ‘(G
−op T)))) |
| 98 | 58, 97 | syl5breq 2655 |
. 2
⊢ ( ℋ ≠ 0ℋ → (normop
‘((F ∘ G)
−op (S ∘ T))) ≤
((normop ‘(F
−op S)) +
(normop ‘(G
−op T)))) |
| 99 | 39, 98 | pm2.61ine 1637 |
1
⊢ (normop
‘((F ∘ G)
−op (S ∘ T))) ≤
((normop ‘(F
−op S)) +
(normop ‘(G
−op T))) |