nmoleub2lem - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > nmoleub2lem		Structured version Visualization version GIF version

Theorem nmoleub2lem 24637

Description: Lemma for nmoleub2a 24640 and similar theorems. (Contributed by Mario Carneiro, 19-Oct-2015.)

**Hypotheses**
Ref	Expression
nmoleub2.n	⊢ 𝑁 = (𝑆 normOp 𝑇)
nmoleub2.v	⊢ 𝑉 = (Base‘𝑆)
nmoleub2.l	⊢ 𝐿 = (norm‘𝑆)
nmoleub2.m	⊢ 𝑀 = (norm‘𝑇)
nmoleub2.g	⊢ 𝐺 = (Scalar‘𝑆)
nmoleub2.w	⊢ 𝐾 = (Base‘𝐺)
nmoleub2.s	⊢ (𝜑 → 𝑆 ∈ (NrmMod ∩ ℂMod))
nmoleub2.t	⊢ (𝜑 → 𝑇 ∈ (NrmMod ∩ ℂMod))
nmoleub2.f	⊢ (𝜑 → 𝐹 ∈ (𝑆 LMHom 𝑇))
nmoleub2.a	⊢ (𝜑 → 𝐴 ∈ ℝ^*)
nmoleub2.r	⊢ (𝜑 → 𝑅 ∈ ℝ⁺)
nmoleub2lem.5	⊢ ((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) → 0 ≤ 𝐴)
nmoleub2lem.6	⊢ ((((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 ∈ ℝ) ∧ (𝑦 ∈ 𝑉 ∧ 𝑦 ≠ (0_g‘𝑆))) → (𝑀‘(𝐹‘𝑦)) ≤ (𝐴 · (𝐿‘𝑦)))
nmoleub2lem.7	⊢ ((𝜑 ∧ 𝑥 ∈ 𝑉) → (𝜓 → (𝐿‘𝑥) ≤ 𝑅))

**Assertion**
Ref	Expression
nmoleub2lem	⊢ (𝜑 → ((𝑁‘𝐹) ≤ 𝐴 ↔ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)))

Distinct variable groups: 𝑥,𝑦,𝐴 𝑥,𝐹,𝑦 𝑥,𝐿,𝑦 𝑥,𝑁,𝑦 𝑥,𝑀,𝑦 𝜑,𝑥,𝑦 𝜓,𝑦 𝑥,𝑆,𝑦 𝑥,𝑉,𝑦 𝑥,𝑅,𝑦 𝑦,𝑇 Allowed substitution hints: 𝜓(𝑥) 𝑇(𝑥) 𝐺(𝑥,𝑦) 𝐾(𝑥,𝑦)

**Proof of Theorem nmoleub2lem**
Step	Hyp	Ref	Expression
1		nmoleub2lem.7	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑉) → (𝜓 → (𝐿‘𝑥) ≤ 𝑅))
2	1	adantlr 713	. . . 4 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ 𝑥 ∈ 𝑉) → (𝜓 → (𝐿‘𝑥) ≤ 𝑅))
3		nmoleub2.t	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑇 ∈ (NrmMod ∩ ℂMod))
4	3	elin1d 4198	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑇 ∈ NrmMod)
5		nlmngp 24201	. . . . . . . . . . 11 ⊢ (𝑇 ∈ NrmMod → 𝑇 ∈ NrmGrp)
6	4, 5	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝑇 ∈ NrmGrp)
7	6	ad2antrr 724	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝑇 ∈ NrmGrp)
8		nmoleub2.f	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐹 ∈ (𝑆 LMHom 𝑇))
9		nmoleub2.v	. . . . . . . . . . . . 13 ⊢ 𝑉 = (Base‘𝑆)
10		eqid 2732	. . . . . . . . . . . . 13 ⊢ (Base‘𝑇) = (Base‘𝑇)
11	9, 10	lmhmf 20650	. . . . . . . . . . . 12 ⊢ (𝐹 ∈ (𝑆 LMHom 𝑇) → 𝐹:𝑉⟶(Base‘𝑇))
12	8, 11	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹:𝑉⟶(Base‘𝑇))
13	12	ad2antrr 724	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝐹:𝑉⟶(Base‘𝑇))
14		simprl 769	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝑥 ∈ 𝑉)
15	13, 14	ffvelcdmd 7087	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝐹‘𝑥) ∈ (Base‘𝑇))
16		nmoleub2.m	. . . . . . . . . 10 ⊢ 𝑀 = (norm‘𝑇)
17	10, 16	nmcl 24132	. . . . . . . . 9 ⊢ ((𝑇 ∈ NrmGrp ∧ (𝐹‘𝑥) ∈ (Base‘𝑇)) → (𝑀‘(𝐹‘𝑥)) ∈ ℝ)
18	7, 15, 17	syl2anc 584	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝑀‘(𝐹‘𝑥)) ∈ ℝ)
19		nmoleub2.r	. . . . . . . . 9 ⊢ (𝜑 → 𝑅 ∈ ℝ⁺)
20	19	ad2antrr 724	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝑅 ∈ ℝ⁺)
21	18, 20	rerpdivcld 13049	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ∈ ℝ)
22	21	rexrd 11266	. . . . . 6 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ∈ ℝ^*)
23		nmoleub2.s	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 ∈ (NrmMod ∩ ℂMod))
24	23	elin1d 4198	. . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ NrmMod)
25		nlmngp 24201	. . . . . . . . 9 ⊢ (𝑆 ∈ NrmMod → 𝑆 ∈ NrmGrp)
26	24, 25	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝑆 ∈ NrmGrp)
27		lmghm 20647	. . . . . . . . 9 ⊢ (𝐹 ∈ (𝑆 LMHom 𝑇) → 𝐹 ∈ (𝑆 GrpHom 𝑇))
28	8, 27	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐹 ∈ (𝑆 GrpHom 𝑇))
29		nmoleub2.n	. . . . . . . . 9 ⊢ 𝑁 = (𝑆 normOp 𝑇)
30	29	nmocl 24244	. . . . . . . 8 ⊢ ((𝑆 ∈ NrmGrp ∧ 𝑇 ∈ NrmGrp ∧ 𝐹 ∈ (𝑆 GrpHom 𝑇)) → (𝑁‘𝐹) ∈ ℝ^*)
31	26, 6, 28, 30	syl3anc 1371	. . . . . . 7 ⊢ (𝜑 → (𝑁‘𝐹) ∈ ℝ^*)
32	31	ad2antrr 724	. . . . . 6 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝑁‘𝐹) ∈ ℝ^*)
33		nmoleub2.a	. . . . . . 7 ⊢ (𝜑 → 𝐴 ∈ ℝ^*)
34	33	ad2antrr 724	. . . . . 6 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝐴 ∈ ℝ^*)
35	20	rpred 13018	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝑅 ∈ ℝ)
36		rexmul 13252	. . . . . . . . . 10 ⊢ ((((𝑀‘(𝐹‘𝑥)) / 𝑅) ∈ ℝ ∧ 𝑅 ∈ ℝ) → (((𝑀‘(𝐹‘𝑥)) / 𝑅) ·_e 𝑅) = (((𝑀‘(𝐹‘𝑥)) / 𝑅) · 𝑅))
37	21, 35, 36	syl2anc 584	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (((𝑀‘(𝐹‘𝑥)) / 𝑅) ·_e 𝑅) = (((𝑀‘(𝐹‘𝑥)) / 𝑅) · 𝑅))
38	18	recnd 11244	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝑀‘(𝐹‘𝑥)) ∈ ℂ)
39	35	recnd 11244	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝑅 ∈ ℂ)
40	20	rpne0d 13023	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝑅 ≠ 0)
41	38, 39, 40	divcan1d 11993	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (((𝑀‘(𝐹‘𝑥)) / 𝑅) · 𝑅) = (𝑀‘(𝐹‘𝑥)))
42	37, 41	eqtrd 2772	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (((𝑀‘(𝐹‘𝑥)) / 𝑅) ·_e 𝑅) = (𝑀‘(𝐹‘𝑥)))
43	18	rexrd 11266	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝑀‘(𝐹‘𝑥)) ∈ ℝ^*)
44	26	ad2antrr 724	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝑆 ∈ NrmGrp)
45		nmoleub2.l	. . . . . . . . . . . . 13 ⊢ 𝐿 = (norm‘𝑆)
46	9, 45	nmcl 24132	. . . . . . . . . . . 12 ⊢ ((𝑆 ∈ NrmGrp ∧ 𝑥 ∈ 𝑉) → (𝐿‘𝑥) ∈ ℝ)
47	44, 14, 46	syl2anc 584	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝐿‘𝑥) ∈ ℝ)
48	47	rexrd 11266	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝐿‘𝑥) ∈ ℝ^*)
49	32, 48	xmulcld 13283	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → ((𝑁‘𝐹) ·_e (𝐿‘𝑥)) ∈ ℝ^*)
50	20	rpxrd 13019	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝑅 ∈ ℝ^*)
51	32, 50	xmulcld 13283	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → ((𝑁‘𝐹) ·_e 𝑅) ∈ ℝ^*)
52	28	ad2antrr 724	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → 𝐹 ∈ (𝑆 GrpHom 𝑇))
53	29, 9, 45, 16	nmoix 24253	. . . . . . . . . 10 ⊢ (((𝑆 ∈ NrmGrp ∧ 𝑇 ∈ NrmGrp ∧ 𝐹 ∈ (𝑆 GrpHom 𝑇)) ∧ 𝑥 ∈ 𝑉) → (𝑀‘(𝐹‘𝑥)) ≤ ((𝑁‘𝐹) ·_e (𝐿‘𝑥)))
54	44, 7, 52, 14, 53	syl31anc 1373	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝑀‘(𝐹‘𝑥)) ≤ ((𝑁‘𝐹) ·_e (𝐿‘𝑥)))
55	29	nmoge0 24245	. . . . . . . . . . . . 13 ⊢ ((𝑆 ∈ NrmGrp ∧ 𝑇 ∈ NrmGrp ∧ 𝐹 ∈ (𝑆 GrpHom 𝑇)) → 0 ≤ (𝑁‘𝐹))
56	26, 6, 28, 55	syl3anc 1371	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 ≤ (𝑁‘𝐹))
57	31, 56	jca 512	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁‘𝐹) ∈ ℝ^* ∧ 0 ≤ (𝑁‘𝐹)))
58	57	ad2antrr 724	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → ((𝑁‘𝐹) ∈ ℝ^* ∧ 0 ≤ (𝑁‘𝐹)))
59		simprr 771	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝐿‘𝑥) ≤ 𝑅)
60		xlemul2a 13270	. . . . . . . . . 10 ⊢ ((((𝐿‘𝑥) ∈ ℝ^* ∧ 𝑅 ∈ ℝ^* ∧ ((𝑁‘𝐹) ∈ ℝ^* ∧ 0 ≤ (𝑁‘𝐹))) ∧ (𝐿‘𝑥) ≤ 𝑅) → ((𝑁‘𝐹) ·_e (𝐿‘𝑥)) ≤ ((𝑁‘𝐹) ·_e 𝑅))
61	48, 50, 58, 59, 60	syl31anc 1373	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → ((𝑁‘𝐹) ·_e (𝐿‘𝑥)) ≤ ((𝑁‘𝐹) ·_e 𝑅))
62	43, 49, 51, 54, 61	xrletrd 13143	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝑀‘(𝐹‘𝑥)) ≤ ((𝑁‘𝐹) ·_e 𝑅))
63	42, 62	eqbrtrd 5170	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (((𝑀‘(𝐹‘𝑥)) / 𝑅) ·_e 𝑅) ≤ ((𝑁‘𝐹) ·_e 𝑅))
64		xlemul1 13271	. . . . . . . 8 ⊢ ((((𝑀‘(𝐹‘𝑥)) / 𝑅) ∈ ℝ^* ∧ (𝑁‘𝐹) ∈ ℝ^* ∧ 𝑅 ∈ ℝ⁺) → (((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ (𝑁‘𝐹) ↔ (((𝑀‘(𝐹‘𝑥)) / 𝑅) ·_e 𝑅) ≤ ((𝑁‘𝐹) ·_e 𝑅)))
65	22, 32, 20, 64	syl3anc 1371	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ (𝑁‘𝐹) ↔ (((𝑀‘(𝐹‘𝑥)) / 𝑅) ·_e 𝑅) ≤ ((𝑁‘𝐹) ·_e 𝑅)))
66	63, 65	mpbird 256	. . . . . 6 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ (𝑁‘𝐹))
67		simplr 767	. . . . . 6 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → (𝑁‘𝐹) ≤ 𝐴)
68	22, 32, 34, 66, 67	xrletrd 13143	. . . . 5 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ (𝑥 ∈ 𝑉 ∧ (𝐿‘𝑥) ≤ 𝑅)) → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)
69	68	expr 457	. . . 4 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ 𝑥 ∈ 𝑉) → ((𝐿‘𝑥) ≤ 𝑅 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴))
70	2, 69	syld 47	. . 3 ⊢ (((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) ∧ 𝑥 ∈ 𝑉) → (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴))
71	70	ralrimiva 3146	. 2 ⊢ ((𝜑 ∧ (𝑁‘𝐹) ≤ 𝐴) → ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴))
72		eqid 2732	. . . 4 ⊢ (0_g‘𝑆) = (0_g‘𝑆)
73	26	ad2antrr 724	. . . 4 ⊢ (((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 ∈ ℝ) → 𝑆 ∈ NrmGrp)
74	6	ad2antrr 724	. . . 4 ⊢ (((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 ∈ ℝ) → 𝑇 ∈ NrmGrp)
75	28	ad2antrr 724	. . . 4 ⊢ (((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 ∈ ℝ) → 𝐹 ∈ (𝑆 GrpHom 𝑇))
76		simpr 485	. . . 4 ⊢ (((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 ∈ ℝ) → 𝐴 ∈ ℝ)
77		nmoleub2lem.5	. . . . 5 ⊢ ((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) → 0 ≤ 𝐴)
78	77	adantr 481	. . . 4 ⊢ (((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 ∈ ℝ) → 0 ≤ 𝐴)
79		nmoleub2lem.6	. . . 4 ⊢ ((((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 ∈ ℝ) ∧ (𝑦 ∈ 𝑉 ∧ 𝑦 ≠ (0_g‘𝑆))) → (𝑀‘(𝐹‘𝑦)) ≤ (𝐴 · (𝐿‘𝑦)))
80	29, 9, 45, 16, 72, 73, 74, 75, 76, 78, 79	nmolb2d 24242	. . 3 ⊢ (((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 ∈ ℝ) → (𝑁‘𝐹) ≤ 𝐴)
81	31	ad2antrr 724	. . . . 5 ⊢ (((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 = +∞) → (𝑁‘𝐹) ∈ ℝ^*)
82		pnfge 13112	. . . . 5 ⊢ ((𝑁‘𝐹) ∈ ℝ^* → (𝑁‘𝐹) ≤ +∞)
83	81, 82	syl 17	. . . 4 ⊢ (((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 = +∞) → (𝑁‘𝐹) ≤ +∞)
84		simpr 485	. . . 4 ⊢ (((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 = +∞) → 𝐴 = +∞)
85	83, 84	breqtrrd 5176	. . 3 ⊢ (((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) ∧ 𝐴 = +∞) → (𝑁‘𝐹) ≤ 𝐴)
86	33	adantr 481	. . . . 5 ⊢ ((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) → 𝐴 ∈ ℝ^*)
87		ge0nemnf 13154	. . . . . 6 ⊢ ((𝐴 ∈ ℝ^* ∧ 0 ≤ 𝐴) → 𝐴 ≠ -∞)
88	86, 77, 87	syl2anc 584	. . . . 5 ⊢ ((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) → 𝐴 ≠ -∞)
89	86, 88	jca 512	. . . 4 ⊢ ((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) → (𝐴 ∈ ℝ^* ∧ 𝐴 ≠ -∞))
90		xrnemnf 13099	. . . 4 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐴 ≠ -∞) ↔ (𝐴 ∈ ℝ ∨ 𝐴 = +∞))
91	89, 90	sylib 217	. . 3 ⊢ ((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) → (𝐴 ∈ ℝ ∨ 𝐴 = +∞))
92	80, 85, 91	mpjaodan 957	. 2 ⊢ ((𝜑 ∧ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)) → (𝑁‘𝐹) ≤ 𝐴)
93	71, 92	impbida 799	1 ⊢ (𝜑 → ((𝑁‘𝐹) ≤ 𝐴 ↔ ∀𝑥 ∈ 𝑉 (𝜓 → ((𝑀‘(𝐹‘𝑥)) / 𝑅) ≤ 𝐴)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 396 ∨ wo 845 = wceq 1541 ∈ wcel 2106 ≠ wne 2940 ∀wral 3061 ∩ cin 3947 class class class wbr 5148 ⟶wf 6539 ‘cfv 6543 (class class class)co 7411 ℝcr 11111 0cc0 11112 · cmul 11117 +∞cpnf 11247 -∞cmnf 11248 ℝ^*cxr 11249 ≤ cle 11251 / cdiv 11873 ℝ⁺crp 12976 ·_e cxmu 13093 Basecbs 17146 Scalarcsca 17202 0_gc0g 17387 GrpHom cghm 19091 LMHom clmhm 20635 normcnm 24092 NrmGrpcngp 24093 NrmModcnlm 24096 normOp cnmo 24229 ℂModcclm 24585

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 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2703 ax-rep 5285 ax-sep 5299 ax-nul 5306 ax-pow 5363 ax-pr 5427 ax-un 7727 ax-cnex 11168 ax-resscn 11169 ax-1cn 11170 ax-icn 11171 ax-addcl 11172 ax-addrcl 11173 ax-mulcl 11174 ax-mulrcl 11175 ax-mulcom 11176 ax-addass 11177 ax-mulass 11178 ax-distr 11179 ax-i2m1 11180 ax-1ne0 11181 ax-1rid 11182 ax-rnegex 11183 ax-rrecex 11184 ax-cnre 11185 ax-pre-lttri 11186 ax-pre-lttrn 11187 ax-pre-ltadd 11188 ax-pre-mulgt0 11189 ax-pre-sup 11190

This theorem depends on definitions: df-bi 206 df-an 397 df-or 846 df-3or 1088 df-3an 1089 df-tru 1544 df-fal 1554 df-ex 1782 df-nf 1786 df-sb 2068 df-mo 2534 df-eu 2563 df-clab 2710 df-cleq 2724 df-clel 2810 df-nfc 2885 df-ne 2941 df-nel 3047 df-ral 3062 df-rex 3071 df-rmo 3376 df-reu 3377 df-rab 3433 df-v 3476 df-sbc 3778 df-csb 3894 df-dif 3951 df-un 3953 df-in 3955 df-ss 3965 df-pss 3967 df-nul 4323 df-if 4529 df-pw 4604 df-sn 4629 df-pr 4631 df-op 4635 df-uni 4909 df-iun 4999 df-br 5149 df-opab 5211 df-mpt 5232 df-tr 5266 df-id 5574 df-eprel 5580 df-po 5588 df-so 5589 df-fr 5631 df-we 5633 df-xp 5682 df-rel 5683 df-cnv 5684 df-co 5685 df-dm 5686 df-rn 5687 df-res 5688 df-ima 5689 df-pred 6300 df-ord 6367 df-on 6368 df-lim 6369 df-suc 6370 df-iota 6495 df-fun 6545 df-fn 6546 df-f 6547 df-f1 6548 df-fo 6549 df-f1o 6550 df-fv 6551 df-riota 7367 df-ov 7414 df-oprab 7415 df-mpo 7416 df-om 7858 df-1st 7977 df-2nd 7978 df-frecs 8268 df-wrecs 8299 df-recs 8373 df-rdg 8412 df-er 8705 df-map 8824 df-en 8942 df-dom 8943 df-sdom 8944 df-sup 9439 df-inf 9440 df-pnf 11252 df-mnf 11253 df-xr 11254 df-ltxr 11255 df-le 11256 df-sub 11448 df-neg 11449 df-div 11874 df-nn 12215 df-2 12277 df-n0 12475 df-z 12561 df-uz 12825 df-q 12935 df-rp 12977 df-xneg 13094 df-xadd 13095 df-xmul 13096 df-ico 13332 df-0g 17389 df-topgen 17391 df-mgm 18563 df-sgrp 18612 df-mnd 18628 df-grp 18824 df-ghm 19092 df-lmhm 20638 df-psmet 20942 df-xmet 20943 df-met 20944 df-bl 20945 df-mopn 20946 df-top 22403 df-topon 22420 df-topsp 22442 df-bases 22456 df-xms 23833 df-ms 23834 df-nm 24098 df-ngp 24099 df-nlm 24102 df-nmo 24232 df-nghm 24233

This theorem is referenced by: nmoleub2lem2 24639 nmoleub3 24642

W3C validator