nmoleub2lem3 - Metamath Proof Explorer

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

Theorem nmoleub2lem3 25436

Description: Lemma for nmoleub2a 25438 and similar theorems. (Contributed by Mario Carneiro, 19-Oct-2015.) (Proof shortened by AV, 29-Sep-2021.)

**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	⊢ (𝜑 → 𝑅 ∈ ℝ⁺)
nmoleub2a.5	⊢ (𝜑 → ℚ ⊆ 𝐾)
nmoleub2lem3.p	⊢ · = ( ·_𝑠 ‘𝑆)
nmoleub2lem3.1	⊢ (𝜑 → 𝐴 ∈ ℝ)
nmoleub2lem3.2	⊢ (𝜑 → 0 ≤ 𝐴)
nmoleub2lem3.3	⊢ (𝜑 → 𝐵 ∈ 𝑉)
nmoleub2lem3.4	⊢ (𝜑 → 𝐵 ≠ (0_g‘𝑆))
nmoleub2lem3.5	⊢ (𝜑 → ((𝑟 · 𝐵) ∈ 𝑉 → ((𝐿‘(𝑟 · 𝐵)) < 𝑅 → ((𝑀‘(𝐹‘(𝑟 · 𝐵))) / 𝑅) ≤ 𝐴)))
nmoleub2lem3.6	⊢ (𝜑 → ¬ (𝑀‘(𝐹‘𝐵)) ≤ (𝐴 · (𝐿‘𝐵)))

**Assertion**
Ref	Expression
nmoleub2lem3	⊢ ¬ 𝜑

Distinct variable groups: 𝐴,𝑟 𝐹,𝑟 𝐿,𝑟 𝑀,𝑟 𝜑,𝑟 𝐵,𝑟 𝑅,𝑟 Allowed substitution hints: 𝑆(𝑟) 𝑇(𝑟) · (𝑟) 𝐺(𝑟) 𝐾(𝑟) 𝑁(𝑟) 𝑉(𝑟)

**Proof of Theorem nmoleub2lem3**
Step	Hyp	Ref	Expression
1		simprl 783	. . . 4 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟)
2		qre 13080	. . . . . 6 ⊢ (𝑟 ∈ ℚ → 𝑟 ∈ ℝ)
3	2	ad2antlr 740	. . . . 5 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝑟 ∈ ℝ)
4		nmoleub2lem3.1	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ∈ ℝ)
5		nmoleub2.r	. . . . . . . . 9 ⊢ (𝜑 → 𝑅 ∈ ℝ⁺)
6	5	rpred 13164	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ ℝ)
7	4, 6	remulcld 11339	. . . . . . 7 ⊢ (𝜑 → (𝐴 · 𝑅) ∈ ℝ)
8		nmoleub2.t	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑇 ∈ (NrmMod ∩ ℂMod))
9	8	elin1d 4150	. . . . . . . . . 10 ⊢ (𝜑 → 𝑇 ∈ NrmMod)
10		nlmngp 24996	. . . . . . . . . 10 ⊢ (𝑇 ∈ NrmMod → 𝑇 ∈ NrmGrp)
11	9, 10	syl 18	. . . . . . . . 9 ⊢ (𝜑 → 𝑇 ∈ NrmGrp)
12		nmoleub2.f	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹 ∈ (𝑆 LMHom 𝑇))
13		nmoleub2.v	. . . . . . . . . . . 12 ⊢ 𝑉 = (Base‘𝑆)
14		eqid 2761	. . . . . . . . . . . 12 ⊢ (Base‘𝑇) = (Base‘𝑇)
15	13, 14	lmhmf 21309	. . . . . . . . . . 11 ⊢ (𝐹 ∈ (𝑆 LMHom 𝑇) → 𝐹:𝑉⟶(Base‘𝑇))
16	12, 15	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹:𝑉⟶(Base‘𝑇))
17		nmoleub2lem3.3	. . . . . . . . . 10 ⊢ (𝜑 → 𝐵 ∈ 𝑉)
18	16, 17	ffvelcdmd 7085	. . . . . . . . 9 ⊢ (𝜑 → (𝐹‘𝐵) ∈ (Base‘𝑇))
19		nmoleub2.m	. . . . . . . . . 10 ⊢ 𝑀 = (norm‘𝑇)
20	14, 19	nmcl 24935	. . . . . . . . 9 ⊢ ((𝑇 ∈ NrmGrp ∧ (𝐹‘𝐵) ∈ (Base‘𝑇)) → (𝑀‘(𝐹‘𝐵)) ∈ ℝ)
21	11, 18, 20	syl2anc 596	. . . . . . . 8 ⊢ (𝜑 → (𝑀‘(𝐹‘𝐵)) ∈ ℝ)
22		0red 11311	. . . . . . . . 9 ⊢ (𝜑 → 0 ∈ ℝ)
23		nmoleub2.s	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑆 ∈ (NrmMod ∩ ℂMod))
24	23	elin1d 4150	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆 ∈ NrmMod)
25		nlmngp 24996	. . . . . . . . . . . 12 ⊢ (𝑆 ∈ NrmMod → 𝑆 ∈ NrmGrp)
26	24, 25	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑆 ∈ NrmGrp)
27		nmoleub2.l	. . . . . . . . . . . 12 ⊢ 𝐿 = (norm‘𝑆)
28	13, 27	nmcl 24935	. . . . . . . . . . 11 ⊢ ((𝑆 ∈ NrmGrp ∧ 𝐵 ∈ 𝑉) → (𝐿‘𝐵) ∈ ℝ)
29	26, 17, 28	syl2anc 596	. . . . . . . . . 10 ⊢ (𝜑 → (𝐿‘𝐵) ∈ ℝ)
30	4, 29	remulcld 11339	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 · (𝐿‘𝐵)) ∈ ℝ)
31		nmoleub2lem3.2	. . . . . . . . . 10 ⊢ (𝜑 → 0 ≤ 𝐴)
32	13, 27	nmge0 24936	. . . . . . . . . . 11 ⊢ ((𝑆 ∈ NrmGrp ∧ 𝐵 ∈ 𝑉) → 0 ≤ (𝐿‘𝐵))
33	26, 17, 32	syl2anc 596	. . . . . . . . . 10 ⊢ (𝜑 → 0 ≤ (𝐿‘𝐵))
34	4, 29, 31, 33	mulge0d 11893	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ (𝐴 · (𝐿‘𝐵)))
35		nmoleub2lem3.6	. . . . . . . . . 10 ⊢ (𝜑 → ¬ (𝑀‘(𝐹‘𝐵)) ≤ (𝐴 · (𝐿‘𝐵)))
36	30, 21	ltnled 11457	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐴 · (𝐿‘𝐵)) < (𝑀‘(𝐹‘𝐵)) ↔ ¬ (𝑀‘(𝐹‘𝐵)) ≤ (𝐴 · (𝐿‘𝐵))))
37	35, 36	mpbird 260	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 · (𝐿‘𝐵)) < (𝑀‘(𝐹‘𝐵)))
38	22, 30, 21, 34, 37	lelttrd 11468	. . . . . . . 8 ⊢ (𝜑 → 0 < (𝑀‘(𝐹‘𝐵)))
39	21, 38	elrpd 13161	. . . . . . 7 ⊢ (𝜑 → (𝑀‘(𝐹‘𝐵)) ∈ ℝ⁺)
40	7, 39	rerpdivcld 13195	. . . . . 6 ⊢ (𝜑 → ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) ∈ ℝ)
41	40	ad2antrr 739	. . . . 5 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) ∈ ℝ)
42	12	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝐹 ∈ (𝑆 LMHom 𝑇))
43		nmoleub2a.5	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ℚ ⊆ 𝐾)
44	43	sselda 3931	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑟 ∈ ℚ) → 𝑟 ∈ 𝐾)
45	44	adantr 486	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝑟 ∈ 𝐾)
46	17	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝐵 ∈ 𝑉)
47		nmoleub2.g	. . . . . . . . . . . . 13 ⊢ 𝐺 = (Scalar‘𝑆)
48		nmoleub2.w	. . . . . . . . . . . . 13 ⊢ 𝐾 = (Base‘𝐺)
49		nmoleub2lem3.p	. . . . . . . . . . . . 13 ⊢ · = ( ·_𝑠 ‘𝑆)
50		eqid 2761	. . . . . . . . . . . . 13 ⊢ ( ·_𝑠 ‘𝑇) = ( ·_𝑠 ‘𝑇)
51	47, 48, 13, 49, 50	lmhmlin 21310	. . . . . . . . . . . 12 ⊢ ((𝐹 ∈ (𝑆 LMHom 𝑇) ∧ 𝑟 ∈ 𝐾 ∧ 𝐵 ∈ 𝑉) → (𝐹‘(𝑟 · 𝐵)) = (𝑟( ·_𝑠 ‘𝑇)(𝐹‘𝐵)))
52	42, 45, 46, 51	syl3anc 1398	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝐹‘(𝑟 · 𝐵)) = (𝑟( ·_𝑠 ‘𝑇)(𝐹‘𝐵)))
53	52	fveq2d 6889	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝑀‘(𝐹‘(𝑟 · 𝐵))) = (𝑀‘(𝑟( ·_𝑠 ‘𝑇)(𝐹‘𝐵))))
54	9	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝑇 ∈ NrmMod)
55		eqid 2761	. . . . . . . . . . . . . . . 16 ⊢ (Scalar‘𝑇) = (Scalar‘𝑇)
56	47, 55	lmhmsca 21305	. . . . . . . . . . . . . . 15 ⊢ (𝐹 ∈ (𝑆 LMHom 𝑇) → (Scalar‘𝑇) = 𝐺)
57	42, 56	syl 18	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (Scalar‘𝑇) = 𝐺)
58	57	fveq2d 6889	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (Base‘(Scalar‘𝑇)) = (Base‘𝐺))
59	58, 48	eqtr4di 2814	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (Base‘(Scalar‘𝑇)) = 𝐾)
60	45, 59	eleqtrrd 2864	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝑟 ∈ (Base‘(Scalar‘𝑇)))
61	18	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝐹‘𝐵) ∈ (Base‘𝑇))
62		eqid 2761	. . . . . . . . . . . 12 ⊢ (Base‘(Scalar‘𝑇)) = (Base‘(Scalar‘𝑇))
63		eqid 2761	. . . . . . . . . . . 12 ⊢ (norm‘(Scalar‘𝑇)) = (norm‘(Scalar‘𝑇))
64	14, 19, 50, 55, 62, 63	nmvs 24995	. . . . . . . . . . 11 ⊢ ((𝑇 ∈ NrmMod ∧ 𝑟 ∈ (Base‘(Scalar‘𝑇)) ∧ (𝐹‘𝐵) ∈ (Base‘𝑇)) → (𝑀‘(𝑟( ·_𝑠 ‘𝑇)(𝐹‘𝐵))) = (((norm‘(Scalar‘𝑇))‘𝑟) · (𝑀‘(𝐹‘𝐵))))
65	54, 60, 61, 64	syl3anc 1398	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝑀‘(𝑟( ·_𝑠 ‘𝑇)(𝐹‘𝐵))) = (((norm‘(Scalar‘𝑇))‘𝑟) · (𝑀‘(𝐹‘𝐵))))
66	57	fveq2d 6889	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (norm‘(Scalar‘𝑇)) = (norm‘𝐺))
67	66	fveq1d 6887	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((norm‘(Scalar‘𝑇))‘𝑟) = ((norm‘𝐺)‘𝑟))
68	23	elin2d 4151	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑆 ∈ ℂMod)
69	68	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝑆 ∈ ℂMod)
70	47, 48	clmabs 25404	. . . . . . . . . . . . . 14 ⊢ ((𝑆 ∈ ℂMod ∧ 𝑟 ∈ 𝐾) → (abs‘𝑟) = ((norm‘𝐺)‘𝑟))
71	69, 45, 70	syl2anc 596	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (abs‘𝑟) = ((norm‘𝐺)‘𝑟))
72		0red 11311	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 0 ∈ ℝ)
73	5	rpge0d 13168	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 0 ≤ 𝑅)
74	4, 6, 31, 73	mulge0d 11893	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 0 ≤ (𝐴 · 𝑅))
75		divge0 12186	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐴 · 𝑅) ∈ ℝ ∧ 0 ≤ (𝐴 · 𝑅)) ∧ ((𝑀‘(𝐹‘𝐵)) ∈ ℝ ∧ 0 < (𝑀‘(𝐹‘𝐵)))) → 0 ≤ ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))))
76	7, 74, 21, 38, 75	syl22anc 852	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 0 ≤ ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))))
77	76	ad2antrr 739	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 0 ≤ ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))))
78	72, 41, 3, 77, 1	lelttrd 11468	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 0 < 𝑟)
79	72, 3, 78	ltled 11458	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 0 ≤ 𝑟)
80	3, 79	absidd 15590	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (abs‘𝑟) = 𝑟)
81	71, 80	eqtr3d 2798	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((norm‘𝐺)‘𝑟) = 𝑟)
82	67, 81	eqtrd 2796	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((norm‘(Scalar‘𝑇))‘𝑟) = 𝑟)
83	82	oveq1d 7435	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (((norm‘(Scalar‘𝑇))‘𝑟) · (𝑀‘(𝐹‘𝐵))) = (𝑟 · (𝑀‘(𝐹‘𝐵))))
84	53, 65, 83	3eqtrd 2800	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝑀‘(𝐹‘(𝑟 · 𝐵))) = (𝑟 · (𝑀‘(𝐹‘𝐵))))
85	84	oveq1d 7435	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((𝑀‘(𝐹‘(𝑟 · 𝐵))) / 𝑅) = ((𝑟 · (𝑀‘(𝐹‘𝐵))) / 𝑅))
86	13, 47, 49, 48	clmvscl 25409	. . . . . . . . . 10 ⊢ ((𝑆 ∈ ℂMod ∧ 𝑟 ∈ 𝐾 ∧ 𝐵 ∈ 𝑉) → (𝑟 · 𝐵) ∈ 𝑉)
87	69, 45, 46, 86	syl3anc 1398	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝑟 · 𝐵) ∈ 𝑉)
88	24	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝑆 ∈ NrmMod)
89		eqid 2761	. . . . . . . . . . . . 13 ⊢ (norm‘𝐺) = (norm‘𝐺)
90	13, 27, 49, 47, 48, 89	nmvs 24995	. . . . . . . . . . . 12 ⊢ ((𝑆 ∈ NrmMod ∧ 𝑟 ∈ 𝐾 ∧ 𝐵 ∈ 𝑉) → (𝐿‘(𝑟 · 𝐵)) = (((norm‘𝐺)‘𝑟) · (𝐿‘𝐵)))
91	88, 45, 46, 90	syl3anc 1398	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝐿‘(𝑟 · 𝐵)) = (((norm‘𝐺)‘𝑟) · (𝐿‘𝐵)))
92	81	oveq1d 7435	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (((norm‘𝐺)‘𝑟) · (𝐿‘𝐵)) = (𝑟 · (𝐿‘𝐵)))
93	91, 92	eqtrd 2796	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝐿‘(𝑟 · 𝐵)) = (𝑟 · (𝐿‘𝐵)))
94		simprr 785	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝑟 < (𝑅 / (𝐿‘𝐵)))
95	6	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝑅 ∈ ℝ)
96		nmoleub2lem3.4	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐵 ≠ (0_g‘𝑆))
97		eqid 2761	. . . . . . . . . . . . . . . 16 ⊢ (0_g‘𝑆) = (0_g‘𝑆)
98	13, 27, 97	nmrpcl 24939	. . . . . . . . . . . . . . 15 ⊢ ((𝑆 ∈ NrmGrp ∧ 𝐵 ∈ 𝑉 ∧ 𝐵 ≠ (0_g‘𝑆)) → (𝐿‘𝐵) ∈ ℝ⁺)
99	26, 17, 96, 98	syl3anc 1398	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐿‘𝐵) ∈ ℝ⁺)
100	99	rpregt0d 13170	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐿‘𝐵) ∈ ℝ ∧ 0 < (𝐿‘𝐵)))
101	100	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((𝐿‘𝐵) ∈ ℝ ∧ 0 < (𝐿‘𝐵)))
102		ltmuldiv 12190	. . . . . . . . . . . 12 ⊢ ((𝑟 ∈ ℝ ∧ 𝑅 ∈ ℝ ∧ ((𝐿‘𝐵) ∈ ℝ ∧ 0 < (𝐿‘𝐵))) → ((𝑟 · (𝐿‘𝐵)) < 𝑅 ↔ 𝑟 < (𝑅 / (𝐿‘𝐵))))
103	3, 95, 101, 102	syl3anc 1398	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((𝑟 · (𝐿‘𝐵)) < 𝑅 ↔ 𝑟 < (𝑅 / (𝐿‘𝐵))))
104	94, 103	mpbird 260	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝑟 · (𝐿‘𝐵)) < 𝑅)
105	93, 104	eqbrtrd 5127	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝐿‘(𝑟 · 𝐵)) < 𝑅)
106		nmoleub2lem3.5	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑟 · 𝐵) ∈ 𝑉 → ((𝐿‘(𝑟 · 𝐵)) < 𝑅 → ((𝑀‘(𝐹‘(𝑟 · 𝐵))) / 𝑅) ≤ 𝐴)))
107	106	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((𝑟 · 𝐵) ∈ 𝑉 → ((𝐿‘(𝑟 · 𝐵)) < 𝑅 → ((𝑀‘(𝐹‘(𝑟 · 𝐵))) / 𝑅) ≤ 𝐴)))
108	87, 105, 107	mp2d 50	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((𝑀‘(𝐹‘(𝑟 · 𝐵))) / 𝑅) ≤ 𝐴)
109	85, 108	eqbrtrrd 5129	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((𝑟 · (𝑀‘(𝐹‘𝐵))) / 𝑅) ≤ 𝐴)
110	21	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝑀‘(𝐹‘𝐵)) ∈ ℝ)
111	3, 110	remulcld 11339	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝑟 · (𝑀‘(𝐹‘𝐵))) ∈ ℝ)
112	4	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝐴 ∈ ℝ)
113	5	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝑅 ∈ ℝ⁺)
114	111, 112, 113	ledivmul2d 13218	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (((𝑟 · (𝑀‘(𝐹‘𝐵))) / 𝑅) ≤ 𝐴 ↔ (𝑟 · (𝑀‘(𝐹‘𝐵))) ≤ (𝐴 · 𝑅)))
115	109, 114	mpbid 235	. . . . . 6 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝑟 · (𝑀‘(𝐹‘𝐵))) ≤ (𝐴 · 𝑅))
116	112, 95	remulcld 11339	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝐴 · 𝑅) ∈ ℝ)
117	21, 38	jca 521	. . . . . . . 8 ⊢ (𝜑 → ((𝑀‘(𝐹‘𝐵)) ∈ ℝ ∧ 0 < (𝑀‘(𝐹‘𝐵))))
118	117	ad2antrr 739	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((𝑀‘(𝐹‘𝐵)) ∈ ℝ ∧ 0 < (𝑀‘(𝐹‘𝐵))))
119		lemuldiv 12197	. . . . . . 7 ⊢ ((𝑟 ∈ ℝ ∧ (𝐴 · 𝑅) ∈ ℝ ∧ ((𝑀‘(𝐹‘𝐵)) ∈ ℝ ∧ 0 < (𝑀‘(𝐹‘𝐵)))) → ((𝑟 · (𝑀‘(𝐹‘𝐵))) ≤ (𝐴 · 𝑅) ↔ 𝑟 ≤ ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵)))))
120	3, 116, 118, 119	syl3anc 1398	. . . . . 6 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ((𝑟 · (𝑀‘(𝐹‘𝐵))) ≤ (𝐴 · 𝑅) ↔ 𝑟 ≤ ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵)))))
121	115, 120	mpbid 235	. . . . 5 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → 𝑟 ≤ ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))))
122	3, 41, 121	lensymd 11461	. . . 4 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → ¬ ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟)
123	1, 122	pm2.21dd 198	. . 3 ⊢ (((𝜑 ∧ 𝑟 ∈ ℚ) ∧ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵)))) → (𝑀‘(𝐹‘𝐵)) ≤ (𝐴 · (𝐿‘𝐵)))
124	6, 99	rerpdivcld 13195	. . . 4 ⊢ (𝜑 → (𝑅 / (𝐿‘𝐵)) ∈ ℝ)
125	4	recnd 11337	. . . . . . 7 ⊢ (𝜑 → 𝐴 ∈ ℂ)
126	6	recnd 11337	. . . . . . 7 ⊢ (𝜑 → 𝑅 ∈ ℂ)
127	29	recnd 11337	. . . . . . 7 ⊢ (𝜑 → (𝐿‘𝐵) ∈ ℂ)
128		mulass 11288	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑅 ∈ ℂ ∧ (𝐿‘𝐵) ∈ ℂ) → ((𝐴 · 𝑅) · (𝐿‘𝐵)) = (𝐴 · (𝑅 · (𝐿‘𝐵))))
129		mul12 11475	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑅 ∈ ℂ ∧ (𝐿‘𝐵) ∈ ℂ) → (𝐴 · (𝑅 · (𝐿‘𝐵))) = (𝑅 · (𝐴 · (𝐿‘𝐵))))
130	128, 129	eqtrd 2796	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑅 ∈ ℂ ∧ (𝐿‘𝐵) ∈ ℂ) → ((𝐴 · 𝑅) · (𝐿‘𝐵)) = (𝑅 · (𝐴 · (𝐿‘𝐵))))
131	125, 126, 127, 130	syl3anc 1398	. . . . . 6 ⊢ (𝜑 → ((𝐴 · 𝑅) · (𝐿‘𝐵)) = (𝑅 · (𝐴 · (𝐿‘𝐵))))
132	30, 21, 5, 37	ltmul2dd 13220	. . . . . 6 ⊢ (𝜑 → (𝑅 · (𝐴 · (𝐿‘𝐵))) < (𝑅 · (𝑀‘(𝐹‘𝐵))))
133	131, 132	eqbrtrd 5127	. . . . 5 ⊢ (𝜑 → ((𝐴 · 𝑅) · (𝐿‘𝐵)) < (𝑅 · (𝑀‘(𝐹‘𝐵))))
134		lt2mul2div 12195	. . . . . 6 ⊢ ((((𝐴 · 𝑅) ∈ ℝ ∧ ((𝐿‘𝐵) ∈ ℝ ∧ 0 < (𝐿‘𝐵))) ∧ (𝑅 ∈ ℝ ∧ ((𝑀‘(𝐹‘𝐵)) ∈ ℝ ∧ 0 < (𝑀‘(𝐹‘𝐵))))) → (((𝐴 · 𝑅) · (𝐿‘𝐵)) < (𝑅 · (𝑀‘(𝐹‘𝐵))) ↔ ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < (𝑅 / (𝐿‘𝐵))))
135	7, 100, 6, 117, 134	syl22anc 852	. . . . 5 ⊢ (𝜑 → (((𝐴 · 𝑅) · (𝐿‘𝐵)) < (𝑅 · (𝑀‘(𝐹‘𝐵))) ↔ ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < (𝑅 / (𝐿‘𝐵))))
136	133, 135	mpbid 235	. . . 4 ⊢ (𝜑 → ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < (𝑅 / (𝐿‘𝐵)))
137		qbtwnre 13329	. . . 4 ⊢ ((((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) ∈ ℝ ∧ (𝑅 / (𝐿‘𝐵)) ∈ ℝ ∧ ((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < (𝑅 / (𝐿‘𝐵))) → ∃𝑟 ∈ ℚ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵))))
138	40, 124, 136, 137	syl3anc 1398	. . 3 ⊢ (𝜑 → ∃𝑟 ∈ ℚ (((𝐴 · 𝑅) / (𝑀‘(𝐹‘𝐵))) < 𝑟 ∧ 𝑟 < (𝑅 / (𝐿‘𝐵))))
139	123, 138	r19.29a 3171	. 2 ⊢ (𝜑 → (𝑀‘(𝐹‘𝐵)) ≤ (𝐴 · (𝐿‘𝐵)))
140	139, 35	pm2.65i 196	1 ⊢ ¬ 𝜑

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1570 ∈ wcel 2145 ≠ wne 2956 ∃wrex 3087 ∩ cin 3898 ⊆ wss 3899 class class class wbr 5103 ⟶wf 6534 ‘cfv 6538 (class class class)co 7420 ℂcc 11198 ℝcr 11199 0cc0 11200 · cmul 11205 ℝ^*cxr 11342 < clt 11343 ≤ cle 11344 / cdiv 11973 ℚcq 13075 ℝ⁺crp 13120 abscabs 15401 Basecbs 17387 Scalarcsca 17431 ·_𝑠 cvsca 17432 0_gc0g 17610 LMHom clmhm 21294 normcnm 24895 NrmGrpcngp 24896 NrmModcnlm 24899 normOp cnmo 25024 ℂModcclm 25383

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2733 ax-sep 5249 ax-nul 5260 ax-pow 5327 ax-pr 5391 ax-un 7751 ax-cnex 11256 ax-resscn 11257 ax-1cn 11258 ax-icn 11259 ax-addcl 11260 ax-addrcl 11261 ax-mulcl 11262 ax-mulrcl 11263 ax-mulcom 11264 ax-addass 11265 ax-mulass 11266 ax-distr 11267 ax-i2m1 11268 ax-1ne0 11269 ax-1rid 11270 ax-rnegex 11271 ax-rrecex 11272 ax-cnre 11273 ax-pre-lttri 11274 ax-pre-lttrn 11275 ax-pre-ltadd 11276 ax-pre-mulgt0 11277 ax-pre-sup 11278 ax-addf 11279

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3063 df-ral 3078 df-rex 3088 df-rmo 3366 df-reu 3367 df-rab 3414 df-v 3453 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-tp 4589 df-op 4591 df-uni 4868 df-iun 4953 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5546 df-eprel 5551 df-po 5559 df-so 5560 df-fr 5604 df-we 5606 df-xp 5657 df-rel 5658 df-cnv 5659 df-co 5660 df-dm 5661 df-rn 5662 df-res 5663 df-ima 5664 df-pred 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6540 df-fn 6541 df-f 6542 df-f1 6543 df-fo 6544 df-f1o 6545 df-fv 6546 df-riota 7377 df-ov 7423 df-oprab 7424 df-mpo 7425 df-om 7878 df-1st 8001 df-2nd 8002 df-frecs 8299 df-wrecs 8330 df-recs 8379 df-rdg 8418 df-1o 8476 df-er 8717 df-map 8849 df-en 8974 df-dom 8975 df-sdom 8976 df-fin 8977 df-sup 9434 df-inf 9435 df-pnf 11345 df-mnf 11346 df-xr 11347 df-ltxr 11348 df-le 11349 df-sub 11543 df-neg 11544 df-div 11974 df-nn 12336 df-2 12405 df-3 12406 df-4 12407 df-5 12408 df-6 12409 df-7 12410 df-8 12411 df-9 12412 df-n0 12607 df-z 12694 df-dec 12815 df-uz 12966 df-q 13076 df-rp 13121 df-xneg 13241 df-xadd 13242 df-xmul 13243 df-fz 13640 df-seq 14145 df-exp 14205 df-cj 15266 df-re 15267 df-im 15268 df-sqrt 15402 df-abs 15403 df-struct 17325 df-sets 17342 df-slot 17360 df-ndx 17372 df-base 17388 df-ress 17409 df-plusg 17441 df-mulr 17442 df-starv 17443 df-tset 17447 df-ple 17448 df-ds 17450 df-unif 17451 df-0g 17612 df-topgen 17614 df-mgm 18816 df-sgrp 18908 df-mnd 18924 df-grp 19147 df-subg 19333 df-ghm 19428 df-cmn 19996 df-mgp 20361 df-ring 20461 df-cring 20462 df-subrg 20822 df-lmod 21137 df-lmhm 21297 df-psmet 21670 df-xmet 21671 df-met 21672 df-bl 21673 df-mopn 21674 df-cnfld 21679 df-top 23212 df-topon 23229 df-topsp 23251 df-bases 23264 df-xms 24639 df-ms 24640 df-nm 24901 df-ngp 24902 df-nlm 24905 df-clm 25384

This theorem is used by: nmoleub2lem2 25437

W3C validator