Theorem nmopcoi 32155

Description: Upper bound for the norm of the composition of two bounded linear operators. (Contributed by NM, 10-Mar-2006.) (New usage is discouraged.)

Hypotheses

Ref	Expression
nmoptri.1	⊢ 𝑆 ∈ BndLinOp
nmoptri.2	⊢ 𝑇 ∈ BndLinOp

Assertion

Ref	Expression
nmopcoi	⊢ (normop‘(𝑆 ∘ 𝑇)) ≤ ((normop‘𝑆) · (normop‘𝑇))

Proof of Theorem nmopcoi

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		nmoptri.1	. . . . . 6 ⊢ 𝑆 ∈ BndLinOp
2		bdopln 31921	. . . . . 6 ⊢ (𝑆 ∈ BndLinOp → 𝑆 ∈ LinOp)
3	1, 2	ax-mp 5	. . . . 5 ⊢ 𝑆 ∈ LinOp
4		nmoptri.2	. . . . . 6 ⊢ 𝑇 ∈ BndLinOp
5		bdopln 31921	. . . . . 6 ⊢ (𝑇 ∈ BndLinOp → 𝑇 ∈ LinOp)
6	4, 5	ax-mp 5	. . . . 5 ⊢ 𝑇 ∈ LinOp
7	3, 6	lnopcoi 32063	. . . 4 ⊢ (𝑆 ∘ 𝑇) ∈ LinOp
8	7	lnopfi 32029	. . 3 ⊢ (𝑆 ∘ 𝑇): ℋ⟶ ℋ
9		nmopre 31930	. . . . . 6 ⊢ (𝑆 ∈ BndLinOp → (normop‘𝑆) ∈ ℝ)
10	1, 9	ax-mp 5	. . . . 5 ⊢ (normop‘𝑆) ∈ ℝ
11		nmopre 31930	. . . . . 6 ⊢ (𝑇 ∈ BndLinOp → (normop‘𝑇) ∈ ℝ)
12	4, 11	ax-mp 5	. . . . 5 ⊢ (normop‘𝑇) ∈ ℝ
13	10, 12	remulcli 11149	. . . 4 ⊢ ((normop‘𝑆) · (normop‘𝑇)) ∈ ℝ
14	13	rexri 11191	. . 3 ⊢ ((normop‘𝑆) · (normop‘𝑇)) ∈ ℝ*
15		nmopub 31968	. . 3 ⊢ (((𝑆 ∘ 𝑇): ℋ⟶ ℋ ∧ ((normop‘𝑆) · (normop‘𝑇)) ∈ ℝ*) → ((normop‘(𝑆 ∘ 𝑇)) ≤ ((normop‘𝑆) · (normop‘𝑇)) ↔ ∀𝑥 ∈ ℋ ((normℎ‘𝑥) ≤ 1 → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ≤ ((normop‘𝑆) · (normop‘𝑇)))))
16	8, 14, 15	mp2an 693	. 2 ⊢ ((normop‘(𝑆 ∘ 𝑇)) ≤ ((normop‘𝑆) · (normop‘𝑇)) ↔ ∀𝑥 ∈ ℋ ((normℎ‘𝑥) ≤ 1 → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ≤ ((normop‘𝑆) · (normop‘𝑇))))
17		0le0 12247	. . . . . . 7 ⊢ 0 ≤ 0
18	17	a1i 11	. . . . . 6 ⊢ (((normop‘𝑇) = 0 ∧ 𝑥 ∈ ℋ) → 0 ≤ 0)
19	3, 6	lnopco0i 32064	. . . . . . . 8 ⊢ ((normop‘𝑇) = 0 → (normop‘(𝑆 ∘ 𝑇)) = 0)
20	7	nmlnop0iHIL 32056	. . . . . . . 8 ⊢ ((normop‘(𝑆 ∘ 𝑇)) = 0 ↔ (𝑆 ∘ 𝑇) = 0hop )
21	19, 20	sylib 218	. . . . . . 7 ⊢ ((normop‘𝑇) = 0 → (𝑆 ∘ 𝑇) = 0hop )
22		fveq1 6831	. . . . . . . . 9 ⊢ ((𝑆 ∘ 𝑇) = 0hop → ((𝑆 ∘ 𝑇)‘𝑥) = ( 0hop ‘𝑥))
23	22	fveq2d 6836	. . . . . . . 8 ⊢ ((𝑆 ∘ 𝑇) = 0hop → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) = (normℎ‘( 0hop ‘𝑥)))
24		ho0val 31810	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℋ → ( 0hop ‘𝑥) = 0ℎ)
25	24	fveq2d 6836	. . . . . . . . 9 ⊢ (𝑥 ∈ ℋ → (normℎ‘( 0hop ‘𝑥)) = (normℎ‘0ℎ))
26		norm0 31188	. . . . . . . . 9 ⊢ (normℎ‘0ℎ) = 0
27	25, 26	eqtrdi 2788	. . . . . . . 8 ⊢ (𝑥 ∈ ℋ → (normℎ‘( 0hop ‘𝑥)) = 0)
28	23, 27	sylan9eq 2792	. . . . . . 7 ⊢ (((𝑆 ∘ 𝑇) = 0hop ∧ 𝑥 ∈ ℋ) → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) = 0)
29	21, 28	sylan 581	. . . . . 6 ⊢ (((normop‘𝑇) = 0 ∧ 𝑥 ∈ ℋ) → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) = 0)
30		oveq2 7366	. . . . . . . 8 ⊢ ((normop‘𝑇) = 0 → ((normop‘𝑆) · (normop‘𝑇)) = ((normop‘𝑆) · 0))
31	10	recni 11147	. . . . . . . . 9 ⊢ (normop‘𝑆) ∈ ℂ
32	31	mul01i 11324	. . . . . . . 8 ⊢ ((normop‘𝑆) · 0) = 0
33	30, 32	eqtrdi 2788	. . . . . . 7 ⊢ ((normop‘𝑇) = 0 → ((normop‘𝑆) · (normop‘𝑇)) = 0)
34	33	adantr 480	. . . . . 6 ⊢ (((normop‘𝑇) = 0 ∧ 𝑥 ∈ ℋ) → ((normop‘𝑆) · (normop‘𝑇)) = 0)
35	18, 29, 34	3brtr4d 5118	. . . . 5 ⊢ (((normop‘𝑇) = 0 ∧ 𝑥 ∈ ℋ) → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ≤ ((normop‘𝑆) · (normop‘𝑇)))
36	35	adantrr 718	. . . 4 ⊢ (((normop‘𝑇) = 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ≤ ((normop‘𝑆) · (normop‘𝑇)))
37		df-ne 2934	. . . . 5 ⊢ ((normop‘𝑇) ≠ 0 ↔ ¬ (normop‘𝑇) = 0)
38	8	ffvelcdmi 7027	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ℋ → ((𝑆 ∘ 𝑇)‘𝑥) ∈ ℋ)
39		normcl 31185	. . . . . . . . . . . . . . 15 ⊢ (((𝑆 ∘ 𝑇)‘𝑥) ∈ ℋ → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ∈ ℝ)
40	38, 39	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ ℋ → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ∈ ℝ)
41	40	recnd 11161	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ ℋ → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ∈ ℂ)
42	12	recni 11147	. . . . . . . . . . . . . 14 ⊢ (normop‘𝑇) ∈ ℂ
43		divrec2 11814	. . . . . . . . . . . . . 14 ⊢ (((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ∈ ℂ ∧ (normop‘𝑇) ∈ ℂ ∧ (normop‘𝑇) ≠ 0) → ((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) = ((1 / (normop‘𝑇)) · (normℎ‘((𝑆 ∘ 𝑇)‘𝑥))))
44	42, 43	mp3an2 1452	. . . . . . . . . . . . 13 ⊢ (((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ∈ ℂ ∧ (normop‘𝑇) ≠ 0) → ((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) = ((1 / (normop‘𝑇)) · (normℎ‘((𝑆 ∘ 𝑇)‘𝑥))))
45	41, 44	sylan 581	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℋ ∧ (normop‘𝑇) ≠ 0) → ((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) = ((1 / (normop‘𝑇)) · (normℎ‘((𝑆 ∘ 𝑇)‘𝑥))))
46	45	ancoms 458	. . . . . . . . . . 11 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → ((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) = ((1 / (normop‘𝑇)) · (normℎ‘((𝑆 ∘ 𝑇)‘𝑥))))
47	12	rerecclzi 11906	. . . . . . . . . . . . . 14 ⊢ ((normop‘𝑇) ≠ 0 → (1 / (normop‘𝑇)) ∈ ℝ)
48		bdopf 31922	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑇 ∈ BndLinOp → 𝑇: ℋ⟶ ℋ)
49	4, 48	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ 𝑇: ℋ⟶ ℋ
50		nmopgt0 31972	. . . . . . . . . . . . . . . . 17 ⊢ (𝑇: ℋ⟶ ℋ → ((normop‘𝑇) ≠ 0 ↔ 0 < (normop‘𝑇)))
51	49, 50	ax-mp 5	. . . . . . . . . . . . . . . 16 ⊢ ((normop‘𝑇) ≠ 0 ↔ 0 < (normop‘𝑇))
52	12	recgt0i 12048	. . . . . . . . . . . . . . . 16 ⊢ (0 < (normop‘𝑇) → 0 < (1 / (normop‘𝑇)))
53	51, 52	sylbi 217	. . . . . . . . . . . . . . 15 ⊢ ((normop‘𝑇) ≠ 0 → 0 < (1 / (normop‘𝑇)))
54		0re 11135	. . . . . . . . . . . . . . . 16 ⊢ 0 ∈ ℝ
55		ltle 11222	. . . . . . . . . . . . . . . 16 ⊢ ((0 ∈ ℝ ∧ (1 / (normop‘𝑇)) ∈ ℝ) → (0 < (1 / (normop‘𝑇)) → 0 ≤ (1 / (normop‘𝑇))))
56	54, 55	mpan 691	. . . . . . . . . . . . . . 15 ⊢ ((1 / (normop‘𝑇)) ∈ ℝ → (0 < (1 / (normop‘𝑇)) → 0 ≤ (1 / (normop‘𝑇))))
57	47, 53, 56	sylc 65	. . . . . . . . . . . . . 14 ⊢ ((normop‘𝑇) ≠ 0 → 0 ≤ (1 / (normop‘𝑇)))
58	47, 57	absidd 15347	. . . . . . . . . . . . 13 ⊢ ((normop‘𝑇) ≠ 0 → (abs‘(1 / (normop‘𝑇))) = (1 / (normop‘𝑇)))
59	58	adantr 480	. . . . . . . . . . . 12 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → (abs‘(1 / (normop‘𝑇))) = (1 / (normop‘𝑇)))
60	59	oveq1d 7373	. . . . . . . . . . 11 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → ((abs‘(1 / (normop‘𝑇))) · (normℎ‘((𝑆 ∘ 𝑇)‘𝑥))) = ((1 / (normop‘𝑇)) · (normℎ‘((𝑆 ∘ 𝑇)‘𝑥))))
61	46, 60	eqtr4d 2775	. . . . . . . . . 10 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → ((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) = ((abs‘(1 / (normop‘𝑇))) · (normℎ‘((𝑆 ∘ 𝑇)‘𝑥))))
62	42	recclzi 11867	. . . . . . . . . . 11 ⊢ ((normop‘𝑇) ≠ 0 → (1 / (normop‘𝑇)) ∈ ℂ)
63		norm-iii 31200	. . . . . . . . . . 11 ⊢ (((1 / (normop‘𝑇)) ∈ ℂ ∧ ((𝑆 ∘ 𝑇)‘𝑥) ∈ ℋ) → (normℎ‘((1 / (normop‘𝑇)) ·ℎ ((𝑆 ∘ 𝑇)‘𝑥))) = ((abs‘(1 / (normop‘𝑇))) · (normℎ‘((𝑆 ∘ 𝑇)‘𝑥))))
64	62, 38, 63	syl2an 597	. . . . . . . . . 10 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → (normℎ‘((1 / (normop‘𝑇)) ·ℎ ((𝑆 ∘ 𝑇)‘𝑥))) = ((abs‘(1 / (normop‘𝑇))) · (normℎ‘((𝑆 ∘ 𝑇)‘𝑥))))
65	61, 64	eqtr4d 2775	. . . . . . . . 9 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → ((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) = (normℎ‘((1 / (normop‘𝑇)) ·ℎ ((𝑆 ∘ 𝑇)‘𝑥))))
66	49	ffvelcdmi 7027	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ ℋ → (𝑇‘𝑥) ∈ ℋ)
67	3	lnopmuli 32032	. . . . . . . . . . . 12 ⊢ (((1 / (normop‘𝑇)) ∈ ℂ ∧ (𝑇‘𝑥) ∈ ℋ) → (𝑆‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥))) = ((1 / (normop‘𝑇)) ·ℎ (𝑆‘(𝑇‘𝑥))))
68	62, 66, 67	syl2an 597	. . . . . . . . . . 11 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → (𝑆‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥))) = ((1 / (normop‘𝑇)) ·ℎ (𝑆‘(𝑇‘𝑥))))
69		bdopf 31922	. . . . . . . . . . . . . . 15 ⊢ (𝑆 ∈ BndLinOp → 𝑆: ℋ⟶ ℋ)
70	1, 69	ax-mp 5	. . . . . . . . . . . . . 14 ⊢ 𝑆: ℋ⟶ ℋ
71	70, 49	hocoi 31824	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ ℋ → ((𝑆 ∘ 𝑇)‘𝑥) = (𝑆‘(𝑇‘𝑥)))
72	71	oveq2d 7374	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ ℋ → ((1 / (normop‘𝑇)) ·ℎ ((𝑆 ∘ 𝑇)‘𝑥)) = ((1 / (normop‘𝑇)) ·ℎ (𝑆‘(𝑇‘𝑥))))
73	72	adantl 481	. . . . . . . . . . 11 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → ((1 / (normop‘𝑇)) ·ℎ ((𝑆 ∘ 𝑇)‘𝑥)) = ((1 / (normop‘𝑇)) ·ℎ (𝑆‘(𝑇‘𝑥))))
74	68, 73	eqtr4d 2775	. . . . . . . . . 10 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → (𝑆‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥))) = ((1 / (normop‘𝑇)) ·ℎ ((𝑆 ∘ 𝑇)‘𝑥)))
75	74	fveq2d 6836	. . . . . . . . 9 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → (normℎ‘(𝑆‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)))) = (normℎ‘((1 / (normop‘𝑇)) ·ℎ ((𝑆 ∘ 𝑇)‘𝑥))))
76	65, 75	eqtr4d 2775	. . . . . . . 8 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → ((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) = (normℎ‘(𝑆‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)))))
77	76	adantrr 718	. . . . . . 7 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → ((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) = (normℎ‘(𝑆‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)))))
78		hvmulcl 31073	. . . . . . . . . 10 ⊢ (((1 / (normop‘𝑇)) ∈ ℂ ∧ (𝑇‘𝑥) ∈ ℋ) → ((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)) ∈ ℋ)
79	62, 66, 78	syl2an 597	. . . . . . . . 9 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → ((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)) ∈ ℋ)
80	79	adantrr 718	. . . . . . . 8 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → ((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)) ∈ ℋ)
81		norm-iii 31200	. . . . . . . . . . . 12 ⊢ (((1 / (normop‘𝑇)) ∈ ℂ ∧ (𝑇‘𝑥) ∈ ℋ) → (normℎ‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥))) = ((abs‘(1 / (normop‘𝑇))) · (normℎ‘(𝑇‘𝑥))))
82	62, 66, 81	syl2an 597	. . . . . . . . . . 11 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → (normℎ‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥))) = ((abs‘(1 / (normop‘𝑇))) · (normℎ‘(𝑇‘𝑥))))
83		normcl 31185	. . . . . . . . . . . . . . . 16 ⊢ ((𝑇‘𝑥) ∈ ℋ → (normℎ‘(𝑇‘𝑥)) ∈ ℝ)
84	66, 83	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ℋ → (normℎ‘(𝑇‘𝑥)) ∈ ℝ)
85	84	recnd 11161	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ ℋ → (normℎ‘(𝑇‘𝑥)) ∈ ℂ)
86		divrec2 11814	. . . . . . . . . . . . . . 15 ⊢ (((normℎ‘(𝑇‘𝑥)) ∈ ℂ ∧ (normop‘𝑇) ∈ ℂ ∧ (normop‘𝑇) ≠ 0) → ((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)) = ((1 / (normop‘𝑇)) · (normℎ‘(𝑇‘𝑥))))
87	42, 86	mp3an2 1452	. . . . . . . . . . . . . 14 ⊢ (((normℎ‘(𝑇‘𝑥)) ∈ ℂ ∧ (normop‘𝑇) ≠ 0) → ((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)) = ((1 / (normop‘𝑇)) · (normℎ‘(𝑇‘𝑥))))
88	85, 87	sylan 581	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℋ ∧ (normop‘𝑇) ≠ 0) → ((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)) = ((1 / (normop‘𝑇)) · (normℎ‘(𝑇‘𝑥))))
89	88	ancoms 458	. . . . . . . . . . . 12 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → ((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)) = ((1 / (normop‘𝑇)) · (normℎ‘(𝑇‘𝑥))))
90	59	oveq1d 7373	. . . . . . . . . . . 12 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → ((abs‘(1 / (normop‘𝑇))) · (normℎ‘(𝑇‘𝑥))) = ((1 / (normop‘𝑇)) · (normℎ‘(𝑇‘𝑥))))
91	89, 90	eqtr4d 2775	. . . . . . . . . . 11 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → ((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)) = ((abs‘(1 / (normop‘𝑇))) · (normℎ‘(𝑇‘𝑥))))
92	82, 91	eqtr4d 2775	. . . . . . . . . 10 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → (normℎ‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥))) = ((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)))
93	92	adantrr 718	. . . . . . . . 9 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (normℎ‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥))) = ((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)))
94		nmoplb 31967	. . . . . . . . . . . . 13 ⊢ ((𝑇: ℋ⟶ ℋ ∧ 𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1) → (normℎ‘(𝑇‘𝑥)) ≤ (normop‘𝑇))
95	49, 94	mp3an1 1451	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1) → (normℎ‘(𝑇‘𝑥)) ≤ (normop‘𝑇))
96	42	mullidi 11138	. . . . . . . . . . . 12 ⊢ (1 · (normop‘𝑇)) = (normop‘𝑇)
97	95, 96	breqtrrdi 5128	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1) → (normℎ‘(𝑇‘𝑥)) ≤ (1 · (normop‘𝑇)))
98	97	adantl 481	. . . . . . . . . 10 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (normℎ‘(𝑇‘𝑥)) ≤ (1 · (normop‘𝑇)))
99	84	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℋ ∧ (normop‘𝑇) ≠ 0) → (normℎ‘(𝑇‘𝑥)) ∈ ℝ)
100		1red 11134	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℋ ∧ (normop‘𝑇) ≠ 0) → 1 ∈ ℝ)
101	12	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℋ ∧ (normop‘𝑇) ≠ 0) → (normop‘𝑇) ∈ ℝ)
102	51	biimpi 216	. . . . . . . . . . . . . 14 ⊢ ((normop‘𝑇) ≠ 0 → 0 < (normop‘𝑇))
103	102	adantl 481	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℋ ∧ (normop‘𝑇) ≠ 0) → 0 < (normop‘𝑇))
104		ledivmul2 12022	. . . . . . . . . . . . 13 ⊢ (((normℎ‘(𝑇‘𝑥)) ∈ ℝ ∧ 1 ∈ ℝ ∧ ((normop‘𝑇) ∈ ℝ ∧ 0 < (normop‘𝑇))) → (((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)) ≤ 1 ↔ (normℎ‘(𝑇‘𝑥)) ≤ (1 · (normop‘𝑇))))
105	99, 100, 101, 103, 104	syl112anc 1377	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℋ ∧ (normop‘𝑇) ≠ 0) → (((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)) ≤ 1 ↔ (normℎ‘(𝑇‘𝑥)) ≤ (1 · (normop‘𝑇))))
106	105	ancoms 458	. . . . . . . . . . 11 ⊢ (((normop‘𝑇) ≠ 0 ∧ 𝑥 ∈ ℋ) → (((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)) ≤ 1 ↔ (normℎ‘(𝑇‘𝑥)) ≤ (1 · (normop‘𝑇))))
107	106	adantrr 718	. . . . . . . . . 10 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)) ≤ 1 ↔ (normℎ‘(𝑇‘𝑥)) ≤ (1 · (normop‘𝑇))))
108	98, 107	mpbird 257	. . . . . . . . 9 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → ((normℎ‘(𝑇‘𝑥)) / (normop‘𝑇)) ≤ 1)
109	93, 108	eqbrtrd 5108	. . . . . . . 8 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (normℎ‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥))) ≤ 1)
110		nmoplb 31967	. . . . . . . . 9 ⊢ ((𝑆: ℋ⟶ ℋ ∧ ((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)) ∈ ℋ ∧ (normℎ‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥))) ≤ 1) → (normℎ‘(𝑆‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)))) ≤ (normop‘𝑆))
111	70, 110	mp3an1 1451	. . . . . . . 8 ⊢ ((((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)) ∈ ℋ ∧ (normℎ‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥))) ≤ 1) → (normℎ‘(𝑆‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)))) ≤ (normop‘𝑆))
112	80, 109, 111	syl2anc 585	. . . . . . 7 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (normℎ‘(𝑆‘((1 / (normop‘𝑇)) ·ℎ (𝑇‘𝑥)))) ≤ (normop‘𝑆))
113	77, 112	eqbrtrd 5108	. . . . . 6 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → ((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) ≤ (normop‘𝑆))
114	40	ad2antrl 729	. . . . . . 7 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ∈ ℝ)
115	10	a1i 11	. . . . . . 7 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (normop‘𝑆) ∈ ℝ)
116	102	adantr 480	. . . . . . . 8 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → 0 < (normop‘𝑇))
117	116, 12	jctil 519	. . . . . . 7 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → ((normop‘𝑇) ∈ ℝ ∧ 0 < (normop‘𝑇)))
118		ledivmul2 12022	. . . . . . 7 ⊢ (((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ∈ ℝ ∧ (normop‘𝑆) ∈ ℝ ∧ ((normop‘𝑇) ∈ ℝ ∧ 0 < (normop‘𝑇))) → (((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) ≤ (normop‘𝑆) ↔ (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ≤ ((normop‘𝑆) · (normop‘𝑇))))
119	114, 115, 117, 118	syl3anc 1374	. . . . . 6 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (((normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) / (normop‘𝑇)) ≤ (normop‘𝑆) ↔ (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ≤ ((normop‘𝑆) · (normop‘𝑇))))
120	113, 119	mpbid 232	. . . . 5 ⊢ (((normop‘𝑇) ≠ 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ≤ ((normop‘𝑆) · (normop‘𝑇)))
121	37, 120	sylanbr 583	. . . 4 ⊢ ((¬ (normop‘𝑇) = 0 ∧ (𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1)) → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ≤ ((normop‘𝑆) · (normop‘𝑇)))
122	36, 121	pm2.61ian 812	. . 3 ⊢ ((𝑥 ∈ ℋ ∧ (normℎ‘𝑥) ≤ 1) → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ≤ ((normop‘𝑆) · (normop‘𝑇)))
123	122	ex 412	. 2 ⊢ (𝑥 ∈ ℋ → ((normℎ‘𝑥) ≤ 1 → (normℎ‘((𝑆 ∘ 𝑇)‘𝑥)) ≤ ((normop‘𝑆) · (normop‘𝑇))))
124	16, 123	mprgbir 3059	1 ⊢ (normop‘(𝑆 ∘ 𝑇)) ≤ ((normop‘𝑆) · (normop‘𝑇))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1542   ∈ wcel 2114   ≠ wne 2933  ∀wral 3052   class class class wbr 5086   ∘ ccom 5626  ⟶wf 6486  ‘cfv 6490  (class class class)co 7358  ℂcc 11025  ℝcr 11026  0cc0 11027  1c1 11028   · cmul 11032  ℝ^*cxr 11166   < clt 11167   ≤ cle 11168   / cdiv 11795  abscabs 15158   ℋchba 30979   ·_ℎ csm 30981  norm_ℎcno 30983  0_ℎc0v 30984   0_hop ch0o 31003  norm_opcnop 31005  LinOpclo 31007  BndLinOpcbo 31008

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5300  ax-pr 5368  ax-un 7680  ax-inf2 9551  ax-cc 10346  ax-cnex 11083  ax-resscn 11084  ax-1cn 11085  ax-icn 11086  ax-addcl 11087  ax-addrcl 11088  ax-mulcl 11089  ax-mulrcl 11090  ax-mulcom 11091  ax-addass 11092  ax-mulass 11093  ax-distr 11094  ax-i2m1 11095  ax-1ne0 11096  ax-1rid 11097  ax-rnegex 11098  ax-rrecex 11099  ax-cnre 11100  ax-pre-lttri 11101  ax-pre-lttrn 11102  ax-pre-ltadd 11103  ax-pre-mulgt0 11104  ax-pre-sup 11105  ax-addf 11106  ax-mulf 11107  ax-hilex 31059  ax-hfvadd 31060  ax-hvcom 31061  ax-hvass 31062  ax-hv0cl 31063  ax-hvaddid 31064  ax-hfvmul 31065  ax-hvmulid 31066  ax-hvmulass 31067  ax-hvdistr1 31068  ax-hvdistr2 31069  ax-hvmul0 31070  ax-hfi 31139  ax-his1 31142  ax-his2 31143  ax-his3 31144  ax-his4 31145  ax-hcompl 31262

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-tp 4573  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-iin 4937  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5517  df-eprel 5522  df-po 5530  df-so 5531  df-fr 5575  df-se 5576  df-we 5577  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-pred 6257  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-isom 6499  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-of 7622  df-om 7809  df-1st 7933  df-2nd 7934  df-supp 8102  df-frecs 8222  df-wrecs 8253  df-recs 8302  df-rdg 8340  df-1o 8396  df-2o 8397  df-oadd 8400  df-omul 8401  df-er 8634  df-map 8766  df-pm 8767  df-ixp 8837  df-en 8885  df-dom 8886  df-sdom 8887  df-fin 8888  df-fsupp 9266  df-fi 9315  df-sup 9346  df-inf 9347  df-oi 9416  df-card 9852  df-acn 9855  df-pnf 11169  df-mnf 11170  df-xr 11171  df-ltxr 11172  df-le 11173  df-sub 11367  df-neg 11368  df-div 11796  df-nn 12147  df-2 12209  df-3 12210  df-4 12211  df-5 12212  df-6 12213  df-7 12214  df-8 12215  df-9 12216  df-n0 12403  df-z 12490  df-dec 12609  df-uz 12753  df-q 12863  df-rp 12907  df-xneg 13027  df-xadd 13028  df-xmul 13029  df-ioo 13266  df-ico 13268  df-icc 13269  df-fz 13425  df-fzo 13572  df-fl 13713  df-seq 13926  df-exp 13986  df-hash 14255  df-cj 15023  df-re 15024  df-im 15025  df-sqrt 15159  df-abs 15160  df-clim 15412  df-rlim 15413  df-sum 15611  df-struct 17075  df-sets 17092  df-slot 17110  df-ndx 17122  df-base 17138  df-ress 17159  df-plusg 17191  df-mulr 17192  df-starv 17193  df-sca 17194  df-vsca 17195  df-ip 17196  df-tset 17197  df-ple 17198  df-ds 17200  df-unif 17201  df-hom 17202  df-cco 17203  df-rest 17343  df-topn 17344  df-0g 17362  df-gsum 17363  df-topgen 17364  df-pt 17365  df-prds 17368  df-xrs 17424  df-qtop 17429  df-imas 17430  df-xps 17432  df-mre 17506  df-mrc 17507  df-acs 17509  df-mgm 18566  df-sgrp 18645  df-mnd 18661  df-submnd 18710  df-mulg 19002  df-cntz 19250  df-cmn 19715  df-psmet 21303  df-xmet 21304  df-met 21305  df-bl 21306  df-mopn 21307  df-fbas 21308  df-fg 21309  df-cnfld 21312  df-top 22837  df-topon 22854  df-topsp 22876  df-bases 22889  df-cld 22962  df-ntr 22963  df-cls 22964  df-nei 23041  df-cn 23170  df-cnp 23171  df-lm 23172  df-haus 23258  df-tx 23505  df-hmeo 23698  df-fil 23789  df-fm 23881  df-flim 23882  df-flf 23883  df-xms 24263  df-ms 24264  df-tms 24265  df-cfil 25200  df-cau 25201  df-cmet 25202  df-grpo 30553  df-gid 30554  df-ginv 30555  df-gdiv 30556  df-ablo 30605  df-vc 30619  df-nv 30652  df-va 30655  df-ba 30656  df-sm 30657  df-0v 30658  df-vs 30659  df-nmcv 30660  df-ims 30661  df-dip 30761  df-ssp 30782  df-lno 30804  df-nmoo 30805  df-0o 30807  df-ph 30873  df-cbn 30923  df-hnorm 31028  df-hba 31029  df-hvsub 31031  df-hlim 31032  df-hcau 31033  df-sh 31267  df-ch 31281  df-oc 31312  df-ch0 31313  df-shs 31368  df-pjh 31455  df-h0op 31808  df-nmop 31899  df-lnop 31901  df-bdop 31902  df-hmop 31904

This theorem is referenced by:  bdopcoi  32158  unierri  32164