smfmullem1 - Mathbox for Glauco Siliprandi

	Mathbox for Glauco Siliprandi		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > smfmullem1		Structured version Visualization version GIF version

Theorem smfmullem1 40998

Description: The multiplication of two sigma-measurable functions is measurable: this is the step (i) of the proof of Proposition 121E (d) of [Fremlin1] p. 37 . (Contributed by Glauco Siliprandi, 26-Jun-2021.)

**Hypotheses**
Ref	Expression
smfmullem1.a	⊢ (𝜑 → 𝐴 ∈ ℝ)
smfmullem1.u	⊢ (𝜑 → 𝑈 ∈ ℝ)
smfmullem1.v	⊢ (𝜑 → 𝑉 ∈ ℝ)
smfmullem1.l	⊢ (𝜑 → (𝑈 · 𝑉) < 𝐴)
smfmullem1.x	⊢ 𝑋 = ((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉))))
smfmullem1.y	⊢ 𝑌 = if(1 ≤ 𝑋, 1, 𝑋)
smfmullem1.p	⊢ (𝜑 → 𝑃 ∈ ((𝑈 − 𝑌)(,)𝑈))
smfmullem1.r	⊢ (𝜑 → 𝑅 ∈ (𝑈(,)(𝑈 + 𝑌)))
smfmullem1.s	⊢ (𝜑 → 𝑆 ∈ ((𝑉 − 𝑌)(,)𝑉))
smfmullem1.z	⊢ (𝜑 → 𝑍 ∈ (𝑉(,)(𝑉 + 𝑌)))
smfmullem1.h	⊢ (𝜑 → 𝐻 ∈ (𝑃(,)𝑅))
smfmullem1.i	⊢ (𝜑 → 𝐼 ∈ (𝑆(,)𝑍))

**Assertion**
Ref	Expression
smfmullem1	⊢ (𝜑 → (𝐻 · 𝐼) < 𝐴)

**Proof of Theorem smfmullem1**
Step	Hyp	Ref	Expression
1		smfmullem1.h	. . . . . . . 8 ⊢ (𝜑 → 𝐻 ∈ (𝑃(,)𝑅))
2	1	elioored 39776	. . . . . . 7 ⊢ (𝜑 → 𝐻 ∈ ℝ)
3	2	recnd 10068	. . . . . 6 ⊢ (𝜑 → 𝐻 ∈ ℂ)
4		smfmullem1.u	. . . . . . 7 ⊢ (𝜑 → 𝑈 ∈ ℝ)
5	4	recnd 10068	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ ℂ)
6		smfmullem1.i	. . . . . . . 8 ⊢ (𝜑 → 𝐼 ∈ (𝑆(,)𝑍))
7	6	elioored 39776	. . . . . . 7 ⊢ (𝜑 → 𝐼 ∈ ℝ)
8	7	recnd 10068	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ ℂ)
9		smfmullem1.v	. . . . . . 7 ⊢ (𝜑 → 𝑉 ∈ ℝ)
10	9	recnd 10068	. . . . . 6 ⊢ (𝜑 → 𝑉 ∈ ℂ)
11	3, 5, 8, 10	mulsubd 10490	. . . . 5 ⊢ (𝜑 → ((𝐻 − 𝑈) · (𝐼 − 𝑉)) = (((𝐻 · 𝐼) + (𝑉 · 𝑈)) − ((𝐻 · 𝑉) + (𝐼 · 𝑈))))
12	3, 5, 10	subdird 10487	. . . . . . 7 ⊢ (𝜑 → ((𝐻 − 𝑈) · 𝑉) = ((𝐻 · 𝑉) − (𝑈 · 𝑉)))
13	5, 8, 10	subdid 10486	. . . . . . 7 ⊢ (𝜑 → (𝑈 · (𝐼 − 𝑉)) = ((𝑈 · 𝐼) − (𝑈 · 𝑉)))
14	12, 13	oveq12d 6668	. . . . . 6 ⊢ (𝜑 → (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉))) = (((𝐻 · 𝑉) − (𝑈 · 𝑉)) + ((𝑈 · 𝐼) − (𝑈 · 𝑉))))
15	3, 10	mulcld 10060	. . . . . . . 8 ⊢ (𝜑 → (𝐻 · 𝑉) ∈ ℂ)
16	5, 8	mulcld 10060	. . . . . . . 8 ⊢ (𝜑 → (𝑈 · 𝐼) ∈ ℂ)
17	5, 10	mulcld 10060	. . . . . . . 8 ⊢ (𝜑 → (𝑈 · 𝑉) ∈ ℂ)
18	15, 16, 17, 17	addsub4d 10439	. . . . . . 7 ⊢ (𝜑 → (((𝐻 · 𝑉) + (𝑈 · 𝐼)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉))) = (((𝐻 · 𝑉) − (𝑈 · 𝑉)) + ((𝑈 · 𝐼) − (𝑈 · 𝑉))))
19	18	eqcomd 2628	. . . . . 6 ⊢ (𝜑 → (((𝐻 · 𝑉) − (𝑈 · 𝑉)) + ((𝑈 · 𝐼) − (𝑈 · 𝑉))) = (((𝐻 · 𝑉) + (𝑈 · 𝐼)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉))))
20	5, 8	mulcomd 10061	. . . . . . . 8 ⊢ (𝜑 → (𝑈 · 𝐼) = (𝐼 · 𝑈))
21	20	oveq2d 6666	. . . . . . 7 ⊢ (𝜑 → ((𝐻 · 𝑉) + (𝑈 · 𝐼)) = ((𝐻 · 𝑉) + (𝐼 · 𝑈)))
22	21	oveq1d 6665	. . . . . 6 ⊢ (𝜑 → (((𝐻 · 𝑉) + (𝑈 · 𝐼)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉))) = (((𝐻 · 𝑉) + (𝐼 · 𝑈)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉))))
23	14, 19, 22	3eqtrd 2660	. . . . 5 ⊢ (𝜑 → (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉))) = (((𝐻 · 𝑉) + (𝐼 · 𝑈)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉))))
24	11, 23	oveq12d 6668	. . . 4 ⊢ (𝜑 → (((𝐻 − 𝑈) · (𝐼 − 𝑉)) + (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉)))) = ((((𝐻 · 𝐼) + (𝑉 · 𝑈)) − ((𝐻 · 𝑉) + (𝐼 · 𝑈))) + (((𝐻 · 𝑉) + (𝐼 · 𝑈)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉)))))
25	3, 8	mulcld 10060	. . . . . . . . . 10 ⊢ (𝜑 → (𝐻 · 𝐼) ∈ ℂ)
26	10, 5	mulcld 10060	. . . . . . . . . 10 ⊢ (𝜑 → (𝑉 · 𝑈) ∈ ℂ)
27	25, 26	addcld 10059	. . . . . . . . 9 ⊢ (𝜑 → ((𝐻 · 𝐼) + (𝑉 · 𝑈)) ∈ ℂ)
28	8, 5	mulcld 10060	. . . . . . . . . 10 ⊢ (𝜑 → (𝐼 · 𝑈) ∈ ℂ)
29	15, 28	addcld 10059	. . . . . . . . 9 ⊢ (𝜑 → ((𝐻 · 𝑉) + (𝐼 · 𝑈)) ∈ ℂ)
30	27, 29	npcand 10396	. . . . . . . 8 ⊢ (𝜑 → ((((𝐻 · 𝐼) + (𝑉 · 𝑈)) − ((𝐻 · 𝑉) + (𝐼 · 𝑈))) + ((𝐻 · 𝑉) + (𝐼 · 𝑈))) = ((𝐻 · 𝐼) + (𝑉 · 𝑈)))
31	10, 5	mulcomd 10061	. . . . . . . . 9 ⊢ (𝜑 → (𝑉 · 𝑈) = (𝑈 · 𝑉))
32	31	oveq2d 6666	. . . . . . . 8 ⊢ (𝜑 → ((𝐻 · 𝐼) + (𝑉 · 𝑈)) = ((𝐻 · 𝐼) + (𝑈 · 𝑉)))
33	30, 32	eqtrd 2656	. . . . . . 7 ⊢ (𝜑 → ((((𝐻 · 𝐼) + (𝑉 · 𝑈)) − ((𝐻 · 𝑉) + (𝐼 · 𝑈))) + ((𝐻 · 𝑉) + (𝐼 · 𝑈))) = ((𝐻 · 𝐼) + (𝑈 · 𝑉)))
34	33	eqcomd 2628	. . . . . 6 ⊢ (𝜑 → ((𝐻 · 𝐼) + (𝑈 · 𝑉)) = ((((𝐻 · 𝐼) + (𝑉 · 𝑈)) − ((𝐻 · 𝑉) + (𝐼 · 𝑈))) + ((𝐻 · 𝑉) + (𝐼 · 𝑈))))
35	34	oveq1d 6665	. . . . 5 ⊢ (𝜑 → (((𝐻 · 𝐼) + (𝑈 · 𝑉)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉))) = (((((𝐻 · 𝐼) + (𝑉 · 𝑈)) − ((𝐻 · 𝑉) + (𝐼 · 𝑈))) + ((𝐻 · 𝑉) + (𝐼 · 𝑈))) − ((𝑈 · 𝑉) + (𝑈 · 𝑉))))
36	27, 29	subcld 10392	. . . . . 6 ⊢ (𝜑 → (((𝐻 · 𝐼) + (𝑉 · 𝑈)) − ((𝐻 · 𝑉) + (𝐼 · 𝑈))) ∈ ℂ)
37	17, 17	addcld 10059	. . . . . 6 ⊢ (𝜑 → ((𝑈 · 𝑉) + (𝑈 · 𝑉)) ∈ ℂ)
38	36, 29, 37	addsubassd 10412	. . . . 5 ⊢ (𝜑 → (((((𝐻 · 𝐼) + (𝑉 · 𝑈)) − ((𝐻 · 𝑉) + (𝐼 · 𝑈))) + ((𝐻 · 𝑉) + (𝐼 · 𝑈))) − ((𝑈 · 𝑉) + (𝑈 · 𝑉))) = ((((𝐻 · 𝐼) + (𝑉 · 𝑈)) − ((𝐻 · 𝑉) + (𝐼 · 𝑈))) + (((𝐻 · 𝑉) + (𝐼 · 𝑈)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉)))))
39	35, 38	eqtr2d 2657	. . . 4 ⊢ (𝜑 → ((((𝐻 · 𝐼) + (𝑉 · 𝑈)) − ((𝐻 · 𝑉) + (𝐼 · 𝑈))) + (((𝐻 · 𝑉) + (𝐼 · 𝑈)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉)))) = (((𝐻 · 𝐼) + (𝑈 · 𝑉)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉))))
40	25, 17, 17	pnpcan2d 10430	. . . 4 ⊢ (𝜑 → (((𝐻 · 𝐼) + (𝑈 · 𝑉)) − ((𝑈 · 𝑉) + (𝑈 · 𝑉))) = ((𝐻 · 𝐼) − (𝑈 · 𝑉)))
41	24, 39, 40	3eqtrrd 2661	. . 3 ⊢ (𝜑 → ((𝐻 · 𝐼) − (𝑈 · 𝑉)) = (((𝐻 − 𝑈) · (𝐼 − 𝑉)) + (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉)))))
42	2, 4	jca 554	. . . . . . . . 9 ⊢ (𝜑 → (𝐻 ∈ ℝ ∧ 𝑈 ∈ ℝ))
43		resubcl 10345	. . . . . . . . 9 ⊢ ((𝐻 ∈ ℝ ∧ 𝑈 ∈ ℝ) → (𝐻 − 𝑈) ∈ ℝ)
44	42, 43	syl 17	. . . . . . . 8 ⊢ (𝜑 → (𝐻 − 𝑈) ∈ ℝ)
45	7, 9	jca 554	. . . . . . . . 9 ⊢ (𝜑 → (𝐼 ∈ ℝ ∧ 𝑉 ∈ ℝ))
46		resubcl 10345	. . . . . . . . 9 ⊢ ((𝐼 ∈ ℝ ∧ 𝑉 ∈ ℝ) → (𝐼 − 𝑉) ∈ ℝ)
47	45, 46	syl 17	. . . . . . . 8 ⊢ (𝜑 → (𝐼 − 𝑉) ∈ ℝ)
48	44, 47	jca 554	. . . . . . 7 ⊢ (𝜑 → ((𝐻 − 𝑈) ∈ ℝ ∧ (𝐼 − 𝑉) ∈ ℝ))
49		remulcl 10021	. . . . . . 7 ⊢ (((𝐻 − 𝑈) ∈ ℝ ∧ (𝐼 − 𝑉) ∈ ℝ) → ((𝐻 − 𝑈) · (𝐼 − 𝑉)) ∈ ℝ)
50	48, 49	syl 17	. . . . . 6 ⊢ (𝜑 → ((𝐻 − 𝑈) · (𝐼 − 𝑉)) ∈ ℝ)
51	44, 9	jca 554	. . . . . . . . 9 ⊢ (𝜑 → ((𝐻 − 𝑈) ∈ ℝ ∧ 𝑉 ∈ ℝ))
52		remulcl 10021	. . . . . . . . 9 ⊢ (((𝐻 − 𝑈) ∈ ℝ ∧ 𝑉 ∈ ℝ) → ((𝐻 − 𝑈) · 𝑉) ∈ ℝ)
53	51, 52	syl 17	. . . . . . . 8 ⊢ (𝜑 → ((𝐻 − 𝑈) · 𝑉) ∈ ℝ)
54	4, 47	jca 554	. . . . . . . . 9 ⊢ (𝜑 → (𝑈 ∈ ℝ ∧ (𝐼 − 𝑉) ∈ ℝ))
55		remulcl 10021	. . . . . . . . 9 ⊢ ((𝑈 ∈ ℝ ∧ (𝐼 − 𝑉) ∈ ℝ) → (𝑈 · (𝐼 − 𝑉)) ∈ ℝ)
56	54, 55	syl 17	. . . . . . . 8 ⊢ (𝜑 → (𝑈 · (𝐼 − 𝑉)) ∈ ℝ)
57	53, 56	jca 554	. . . . . . 7 ⊢ (𝜑 → (((𝐻 − 𝑈) · 𝑉) ∈ ℝ ∧ (𝑈 · (𝐼 − 𝑉)) ∈ ℝ))
58		readdcl 10019	. . . . . . 7 ⊢ ((((𝐻 − 𝑈) · 𝑉) ∈ ℝ ∧ (𝑈 · (𝐼 − 𝑉)) ∈ ℝ) → (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉))) ∈ ℝ)
59	57, 58	syl 17	. . . . . 6 ⊢ (𝜑 → (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉))) ∈ ℝ)
60	50, 59	jca 554	. . . . 5 ⊢ (𝜑 → (((𝐻 − 𝑈) · (𝐼 − 𝑉)) ∈ ℝ ∧ (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉))) ∈ ℝ))
61		readdcl 10019	. . . . 5 ⊢ ((((𝐻 − 𝑈) · (𝐼 − 𝑉)) ∈ ℝ ∧ (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉))) ∈ ℝ) → (((𝐻 − 𝑈) · (𝐼 − 𝑉)) + (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉)))) ∈ ℝ)
62	60, 61	syl 17	. . . 4 ⊢ (𝜑 → (((𝐻 − 𝑈) · (𝐼 − 𝑉)) + (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉)))) ∈ ℝ)
63		smfmullem1.y	. . . . . . . . . 10 ⊢ 𝑌 = if(1 ≤ 𝑋, 1, 𝑋)
64	63	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 𝑌 = if(1 ≤ 𝑋, 1, 𝑋))
65		1rp 11836	. . . . . . . . . . 11 ⊢ 1 ∈ ℝ⁺
66	65	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℝ⁺)
67		smfmullem1.x	. . . . . . . . . . . 12 ⊢ 𝑋 = ((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉))))
68	67	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 = ((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉)))))
69		smfmullem1.l	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑈 · 𝑉) < 𝐴)
70	4, 9	remulcld 10070	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑈 · 𝑉) ∈ ℝ)
71		smfmullem1.a	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐴 ∈ ℝ)
72		difrp 11868	. . . . . . . . . . . . . 14 ⊢ (((𝑈 · 𝑉) ∈ ℝ ∧ 𝐴 ∈ ℝ) → ((𝑈 · 𝑉) < 𝐴 ↔ (𝐴 − (𝑈 · 𝑉)) ∈ ℝ⁺))
73	70, 71, 72	syl2anc 693	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑈 · 𝑉) < 𝐴 ↔ (𝐴 − (𝑈 · 𝑉)) ∈ ℝ⁺))
74	69, 73	mpbid 222	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐴 − (𝑈 · 𝑉)) ∈ ℝ⁺)
75		1red 10055	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ∈ ℝ)
76	5	abscld 14175	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (abs‘𝑈) ∈ ℝ)
77	10	abscld 14175	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (abs‘𝑉) ∈ ℝ)
78	76, 77	readdcld 10069	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((abs‘𝑈) + (abs‘𝑉)) ∈ ℝ)
79	75, 78	readdcld 10069	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 + ((abs‘𝑈) + (abs‘𝑉))) ∈ ℝ)
80		0re 10040	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℝ
81	80	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ∈ ℝ)
82	66	rpgt0d 11875	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 < 1)
83	5	absge0d 14183	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 0 ≤ (abs‘𝑈))
84	10	absge0d 14183	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 0 ≤ (abs‘𝑉))
85	76, 77	addge01d 10615	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (0 ≤ (abs‘𝑉) ↔ (abs‘𝑈) ≤ ((abs‘𝑈) + (abs‘𝑉))))
86	84, 85	mpbid 222	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (abs‘𝑈) ≤ ((abs‘𝑈) + (abs‘𝑉)))
87	81, 76, 78, 83, 86	letrd 10194	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 0 ≤ ((abs‘𝑈) + (abs‘𝑉)))
88	75, 78	addge01d 10615	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (0 ≤ ((abs‘𝑈) + (abs‘𝑉)) ↔ 1 ≤ (1 + ((abs‘𝑈) + (abs‘𝑉)))))
89	87, 88	mpbid 222	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ≤ (1 + ((abs‘𝑈) + (abs‘𝑉))))
90	81, 75, 79, 82, 89	ltletrd 10197	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 < (1 + ((abs‘𝑈) + (abs‘𝑉))))
91	79, 90	elrpd 11869	. . . . . . . . . . . 12 ⊢ (𝜑 → (1 + ((abs‘𝑈) + (abs‘𝑉))) ∈ ℝ⁺)
92	74, 91	rpdivcld 11889	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉)))) ∈ ℝ⁺)
93	68, 92	eqeltrd 2701	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ ℝ⁺)
94	66, 93	ifcld 4131	. . . . . . . . 9 ⊢ (𝜑 → if(1 ≤ 𝑋, 1, 𝑋) ∈ ℝ⁺)
95	64, 94	eqeltrd 2701	. . . . . . . 8 ⊢ (𝜑 → 𝑌 ∈ ℝ⁺)
96	95	rpred 11872	. . . . . . 7 ⊢ (𝜑 → 𝑌 ∈ ℝ)
97		resqcl 12931	. . . . . . 7 ⊢ (𝑌 ∈ ℝ → (𝑌↑2) ∈ ℝ)
98	96, 97	syl 17	. . . . . 6 ⊢ (𝜑 → (𝑌↑2) ∈ ℝ)
99	96, 77	remulcld 10070	. . . . . . . 8 ⊢ (𝜑 → (𝑌 · (abs‘𝑉)) ∈ ℝ)
100	96, 76	remulcld 10070	. . . . . . . 8 ⊢ (𝜑 → (𝑌 · (abs‘𝑈)) ∈ ℝ)
101	99, 100	jca 554	. . . . . . 7 ⊢ (𝜑 → ((𝑌 · (abs‘𝑉)) ∈ ℝ ∧ (𝑌 · (abs‘𝑈)) ∈ ℝ))
102		readdcl 10019	. . . . . . 7 ⊢ (((𝑌 · (abs‘𝑉)) ∈ ℝ ∧ (𝑌 · (abs‘𝑈)) ∈ ℝ) → ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈))) ∈ ℝ)
103	101, 102	syl 17	. . . . . 6 ⊢ (𝜑 → ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈))) ∈ ℝ)
104	98, 103	jca 554	. . . . 5 ⊢ (𝜑 → ((𝑌↑2) ∈ ℝ ∧ ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈))) ∈ ℝ))
105		readdcl 10019	. . . . 5 ⊢ (((𝑌↑2) ∈ ℝ ∧ ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈))) ∈ ℝ) → ((𝑌↑2) + ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈)))) ∈ ℝ)
106	104, 105	syl 17	. . . 4 ⊢ (𝜑 → ((𝑌↑2) + ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈)))) ∈ ℝ)
107	71, 70	resubcld 10458	. . . 4 ⊢ (𝜑 → (𝐴 − (𝑈 · 𝑉)) ∈ ℝ)
108	96	resqcld 13035	. . . . 5 ⊢ (𝜑 → (𝑌↑2) ∈ ℝ)
109	99, 100	readdcld 10069	. . . . 5 ⊢ (𝜑 → ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈))) ∈ ℝ)
110	11, 36	eqeltrd 2701	. . . . . . . 8 ⊢ (𝜑 → ((𝐻 − 𝑈) · (𝐼 − 𝑉)) ∈ ℂ)
111	110	abscld 14175	. . . . . . 7 ⊢ (𝜑 → (abs‘((𝐻 − 𝑈) · (𝐼 − 𝑉))) ∈ ℝ)
112	96, 96	remulcld 10070	. . . . . . 7 ⊢ (𝜑 → (𝑌 · 𝑌) ∈ ℝ)
113	50	leabsd 14153	. . . . . . 7 ⊢ (𝜑 → ((𝐻 − 𝑈) · (𝐼 − 𝑉)) ≤ (abs‘((𝐻 − 𝑈) · (𝐼 − 𝑉))))
114	44	recnd 10068	. . . . . . . . 9 ⊢ (𝜑 → (𝐻 − 𝑈) ∈ ℂ)
115	47	recnd 10068	. . . . . . . . 9 ⊢ (𝜑 → (𝐼 − 𝑉) ∈ ℂ)
116	114, 115	absmuld 14193	. . . . . . . 8 ⊢ (𝜑 → (abs‘((𝐻 − 𝑈) · (𝐼 − 𝑉))) = ((abs‘(𝐻 − 𝑈)) · (abs‘(𝐼 − 𝑉))))
117	114	abscld 14175	. . . . . . . . 9 ⊢ (𝜑 → (abs‘(𝐻 − 𝑈)) ∈ ℝ)
118	115	abscld 14175	. . . . . . . . 9 ⊢ (𝜑 → (abs‘(𝐼 − 𝑉)) ∈ ℝ)
119	114	absge0d 14183	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ (abs‘(𝐻 − 𝑈)))
120	4, 96	resubcld 10458	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑈 − 𝑌) ∈ ℝ)
121		smfmullem1.p	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑃 ∈ ((𝑈 − 𝑌)(,)𝑈))
122	121	elioored 39776	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑃 ∈ ℝ)
123	120	rexrd 10089	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑈 − 𝑌) ∈ ℝ^*)
124	4	rexrd 10089	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑈 ∈ ℝ^*)
125		ioogtlb 39717	. . . . . . . . . . . . 13 ⊢ (((𝑈 − 𝑌) ∈ ℝ^* ∧ 𝑈 ∈ ℝ^* ∧ 𝑃 ∈ ((𝑈 − 𝑌)(,)𝑈)) → (𝑈 − 𝑌) < 𝑃)
126	123, 124, 121, 125	syl3anc 1326	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑈 − 𝑌) < 𝑃)
127	122	rexrd 10089	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑃 ∈ ℝ^*)
128		smfmullem1.r	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑅 ∈ (𝑈(,)(𝑈 + 𝑌)))
129	128	elioored 39776	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ ℝ)
130	129	rexrd 10089	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑅 ∈ ℝ^*)
131		ioogtlb 39717	. . . . . . . . . . . . 13 ⊢ ((𝑃 ∈ ℝ^* ∧ 𝑅 ∈ ℝ^* ∧ 𝐻 ∈ (𝑃(,)𝑅)) → 𝑃 < 𝐻)
132	127, 130, 1, 131	syl3anc 1326	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑃 < 𝐻)
133	120, 122, 2, 126, 132	lttrd 10198	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑈 − 𝑌) < 𝐻)
134	4, 96	readdcld 10069	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑈 + 𝑌) ∈ ℝ)
135		iooltub 39735	. . . . . . . . . . . . 13 ⊢ ((𝑃 ∈ ℝ^* ∧ 𝑅 ∈ ℝ^* ∧ 𝐻 ∈ (𝑃(,)𝑅)) → 𝐻 < 𝑅)
136	127, 130, 1, 135	syl3anc 1326	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐻 < 𝑅)
137	134	rexrd 10089	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑈 + 𝑌) ∈ ℝ^*)
138		iooltub 39735	. . . . . . . . . . . . 13 ⊢ ((𝑈 ∈ ℝ^* ∧ (𝑈 + 𝑌) ∈ ℝ^* ∧ 𝑅 ∈ (𝑈(,)(𝑈 + 𝑌))) → 𝑅 < (𝑈 + 𝑌))
139	124, 137, 128, 138	syl3anc 1326	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑅 < (𝑈 + 𝑌))
140	2, 129, 134, 136, 139	lttrd 10198	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐻 < (𝑈 + 𝑌))
141	133, 140	jca 554	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑈 − 𝑌) < 𝐻 ∧ 𝐻 < (𝑈 + 𝑌)))
142	2, 4, 96	absdifltd 14172	. . . . . . . . . 10 ⊢ (𝜑 → ((abs‘(𝐻 − 𝑈)) < 𝑌 ↔ ((𝑈 − 𝑌) < 𝐻 ∧ 𝐻 < (𝑈 + 𝑌))))
143	141, 142	mpbird 247	. . . . . . . . 9 ⊢ (𝜑 → (abs‘(𝐻 − 𝑈)) < 𝑌)
144	115	absge0d 14183	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ (abs‘(𝐼 − 𝑉)))
145	9, 96	resubcld 10458	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑉 − 𝑌) ∈ ℝ)
146		smfmullem1.s	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑆 ∈ ((𝑉 − 𝑌)(,)𝑉))
147	146	elioored 39776	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆 ∈ ℝ)
148	145	rexrd 10089	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑉 − 𝑌) ∈ ℝ^*)
149	9	rexrd 10089	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑉 ∈ ℝ^*)
150	148, 149, 146	ioogtlbd 39777	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑉 − 𝑌) < 𝑆)
151	147	rexrd 10089	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑆 ∈ ℝ^*)
152		smfmullem1.z	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑍 ∈ (𝑉(,)(𝑉 + 𝑌)))
153	152	elioored 39776	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑍 ∈ ℝ)
154	153	rexrd 10089	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑍 ∈ ℝ^*)
155	151, 154, 6	ioogtlbd 39777	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆 < 𝐼)
156	145, 147, 7, 150, 155	lttrd 10198	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑉 − 𝑌) < 𝐼)
157	9, 96	readdcld 10069	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑉 + 𝑌) ∈ ℝ)
158	151, 154, 6	iooltubd 39771	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐼 < 𝑍)
159	157	rexrd 10089	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑉 + 𝑌) ∈ ℝ^*)
160	149, 159, 152	iooltubd 39771	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑍 < (𝑉 + 𝑌))
161	7, 153, 157, 158, 160	lttrd 10198	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐼 < (𝑉 + 𝑌))
162	156, 161	jca 554	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑉 − 𝑌) < 𝐼 ∧ 𝐼 < (𝑉 + 𝑌)))
163	7, 9, 96	absdifltd 14172	. . . . . . . . . 10 ⊢ (𝜑 → ((abs‘(𝐼 − 𝑉)) < 𝑌 ↔ ((𝑉 − 𝑌) < 𝐼 ∧ 𝐼 < (𝑉 + 𝑌))))
164	162, 163	mpbird 247	. . . . . . . . 9 ⊢ (𝜑 → (abs‘(𝐼 − 𝑉)) < 𝑌)
165	117, 96, 118, 96, 119, 143, 144, 164	ltmul12ad 10965	. . . . . . . 8 ⊢ (𝜑 → ((abs‘(𝐻 − 𝑈)) · (abs‘(𝐼 − 𝑉))) < (𝑌 · 𝑌))
166	116, 165	eqbrtrd 4675	. . . . . . 7 ⊢ (𝜑 → (abs‘((𝐻 − 𝑈) · (𝐼 − 𝑉))) < (𝑌 · 𝑌))
167	50, 111, 112, 113, 166	lelttrd 10195	. . . . . 6 ⊢ (𝜑 → ((𝐻 − 𝑈) · (𝐼 − 𝑉)) < (𝑌 · 𝑌))
168	96	recnd 10068	. . . . . . . 8 ⊢ (𝜑 → 𝑌 ∈ ℂ)
169	168	sqvald 13005	. . . . . . 7 ⊢ (𝜑 → (𝑌↑2) = (𝑌 · 𝑌))
170	169	eqcomd 2628	. . . . . 6 ⊢ (𝜑 → (𝑌 · 𝑌) = (𝑌↑2))
171	167, 170	breqtrd 4679	. . . . 5 ⊢ (𝜑 → ((𝐻 − 𝑈) · (𝐼 − 𝑉)) < (𝑌↑2))
172	53	recnd 10068	. . . . . . . 8 ⊢ (𝜑 → ((𝐻 − 𝑈) · 𝑉) ∈ ℂ)
173	172	abscld 14175	. . . . . . 7 ⊢ (𝜑 → (abs‘((𝐻 − 𝑈) · 𝑉)) ∈ ℝ)
174	53	leabsd 14153	. . . . . . 7 ⊢ (𝜑 → ((𝐻 − 𝑈) · 𝑉) ≤ (abs‘((𝐻 − 𝑈) · 𝑉)))
175	114, 10	absmuld 14193	. . . . . . . 8 ⊢ (𝜑 → (abs‘((𝐻 − 𝑈) · 𝑉)) = ((abs‘(𝐻 − 𝑈)) · (abs‘𝑉)))
176	117, 96, 143	ltled 10185	. . . . . . . . 9 ⊢ (𝜑 → (abs‘(𝐻 − 𝑈)) ≤ 𝑌)
177	117, 96, 77, 84, 176	lemul1ad 10963	. . . . . . . 8 ⊢ (𝜑 → ((abs‘(𝐻 − 𝑈)) · (abs‘𝑉)) ≤ (𝑌 · (abs‘𝑉)))
178	175, 177	eqbrtrd 4675	. . . . . . 7 ⊢ (𝜑 → (abs‘((𝐻 − 𝑈) · 𝑉)) ≤ (𝑌 · (abs‘𝑉)))
179	53, 173, 99, 174, 178	letrd 10194	. . . . . 6 ⊢ (𝜑 → ((𝐻 − 𝑈) · 𝑉) ≤ (𝑌 · (abs‘𝑉)))
180	56	recnd 10068	. . . . . . . 8 ⊢ (𝜑 → (𝑈 · (𝐼 − 𝑉)) ∈ ℂ)
181	180	abscld 14175	. . . . . . 7 ⊢ (𝜑 → (abs‘(𝑈 · (𝐼 − 𝑉))) ∈ ℝ)
182	56	leabsd 14153	. . . . . . 7 ⊢ (𝜑 → (𝑈 · (𝐼 − 𝑉)) ≤ (abs‘(𝑈 · (𝐼 − 𝑉))))
183	5, 115	absmuld 14193	. . . . . . . . 9 ⊢ (𝜑 → (abs‘(𝑈 · (𝐼 − 𝑉))) = ((abs‘𝑈) · (abs‘(𝐼 − 𝑉))))
184	76	recnd 10068	. . . . . . . . . 10 ⊢ (𝜑 → (abs‘𝑈) ∈ ℂ)
185	118	recnd 10068	. . . . . . . . . 10 ⊢ (𝜑 → (abs‘(𝐼 − 𝑉)) ∈ ℂ)
186	184, 185	mulcomd 10061	. . . . . . . . 9 ⊢ (𝜑 → ((abs‘𝑈) · (abs‘(𝐼 − 𝑉))) = ((abs‘(𝐼 − 𝑉)) · (abs‘𝑈)))
187	183, 186	eqtrd 2656	. . . . . . . 8 ⊢ (𝜑 → (abs‘(𝑈 · (𝐼 − 𝑉))) = ((abs‘(𝐼 − 𝑉)) · (abs‘𝑈)))
188	118, 96, 164	ltled 10185	. . . . . . . . 9 ⊢ (𝜑 → (abs‘(𝐼 − 𝑉)) ≤ 𝑌)
189	118, 96, 76, 83, 188	lemul1ad 10963	. . . . . . . 8 ⊢ (𝜑 → ((abs‘(𝐼 − 𝑉)) · (abs‘𝑈)) ≤ (𝑌 · (abs‘𝑈)))
190	187, 189	eqbrtrd 4675	. . . . . . 7 ⊢ (𝜑 → (abs‘(𝑈 · (𝐼 − 𝑉))) ≤ (𝑌 · (abs‘𝑈)))
191	56, 181, 100, 182, 190	letrd 10194	. . . . . 6 ⊢ (𝜑 → (𝑈 · (𝐼 − 𝑉)) ≤ (𝑌 · (abs‘𝑈)))
192	53, 56, 99, 100, 179, 191	leadd12dd 39532	. . . . 5 ⊢ (𝜑 → (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉))) ≤ ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈))))
193	50, 59, 108, 109, 171, 192	ltleaddd 10648	. . . 4 ⊢ (𝜑 → (((𝐻 − 𝑈) · (𝐼 − 𝑉)) + (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉)))) < ((𝑌↑2) + ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈)))))
194	96, 103	readdcld 10069	. . . . 5 ⊢ (𝜑 → (𝑌 + ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈)))) ∈ ℝ)
195	81, 117, 96, 119, 176	letrd 10194	. . . . . . . 8 ⊢ (𝜑 → 0 ≤ 𝑌)
196	93	rpred 11872	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ ℝ)
197		min1 12020	. . . . . . . . . 10 ⊢ ((1 ∈ ℝ ∧ 𝑋 ∈ ℝ) → if(1 ≤ 𝑋, 1, 𝑋) ≤ 1)
198	75, 196, 197	syl2anc 693	. . . . . . . . 9 ⊢ (𝜑 → if(1 ≤ 𝑋, 1, 𝑋) ≤ 1)
199	63, 198	syl5eqbr 4688	. . . . . . . 8 ⊢ (𝜑 → 𝑌 ≤ 1)
200	81, 75, 96, 195, 199	eliccd 39726	. . . . . . 7 ⊢ (𝜑 → 𝑌 ∈ (0[,]1))
201	96	sqrlearg 39780	. . . . . . 7 ⊢ (𝜑 → ((𝑌↑2) ≤ 𝑌 ↔ 𝑌 ∈ (0[,]1)))
202	200, 201	mpbird 247	. . . . . 6 ⊢ (𝜑 → (𝑌↑2) ≤ 𝑌)
203	98, 96, 103, 202	leadd1dd 10641	. . . . 5 ⊢ (𝜑 → ((𝑌↑2) + ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈)))) ≤ (𝑌 + ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈)))))
204		1cnd 10056	. . . . . . . 8 ⊢ (𝜑 → 1 ∈ ℂ)
205	77	recnd 10068	. . . . . . . . 9 ⊢ (𝜑 → (abs‘𝑉) ∈ ℂ)
206	205, 184	addcld 10059	. . . . . . . 8 ⊢ (𝜑 → ((abs‘𝑉) + (abs‘𝑈)) ∈ ℂ)
207	168, 204, 206	adddid 10064	. . . . . . 7 ⊢ (𝜑 → (𝑌 · (1 + ((abs‘𝑉) + (abs‘𝑈)))) = ((𝑌 · 1) + (𝑌 · ((abs‘𝑉) + (abs‘𝑈)))))
208	168	mulid1d 10057	. . . . . . . 8 ⊢ (𝜑 → (𝑌 · 1) = 𝑌)
209	168, 205, 184	adddid 10064	. . . . . . . 8 ⊢ (𝜑 → (𝑌 · ((abs‘𝑉) + (abs‘𝑈))) = ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈))))
210	208, 209	oveq12d 6668	. . . . . . 7 ⊢ (𝜑 → ((𝑌 · 1) + (𝑌 · ((abs‘𝑉) + (abs‘𝑈)))) = (𝑌 + ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈)))))
211	207, 210	eqtr2d 2657	. . . . . 6 ⊢ (𝜑 → (𝑌 + ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈)))) = (𝑌 · (1 + ((abs‘𝑉) + (abs‘𝑈)))))
212	77, 76	readdcld 10069	. . . . . . . . 9 ⊢ (𝜑 → ((abs‘𝑉) + (abs‘𝑈)) ∈ ℝ)
213	75, 212	readdcld 10069	. . . . . . . 8 ⊢ (𝜑 → (1 + ((abs‘𝑉) + (abs‘𝑈))) ∈ ℝ)
214	77, 76	addge01d 10615	. . . . . . . . . . . . 13 ⊢ (𝜑 → (0 ≤ (abs‘𝑈) ↔ (abs‘𝑉) ≤ ((abs‘𝑉) + (abs‘𝑈))))
215	83, 214	mpbid 222	. . . . . . . . . . . 12 ⊢ (𝜑 → (abs‘𝑉) ≤ ((abs‘𝑉) + (abs‘𝑈)))
216	81, 77, 212, 84, 215	letrd 10194	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ≤ ((abs‘𝑉) + (abs‘𝑈)))
217	75, 212	addge01d 10615	. . . . . . . . . . 11 ⊢ (𝜑 → (0 ≤ ((abs‘𝑉) + (abs‘𝑈)) ↔ 1 ≤ (1 + ((abs‘𝑉) + (abs‘𝑈)))))
218	216, 217	mpbid 222	. . . . . . . . . 10 ⊢ (𝜑 → 1 ≤ (1 + ((abs‘𝑉) + (abs‘𝑈))))
219	81, 75, 213, 82, 218	ltletrd 10197	. . . . . . . . 9 ⊢ (𝜑 → 0 < (1 + ((abs‘𝑉) + (abs‘𝑈))))
220	81, 213, 219	ltled 10185	. . . . . . . 8 ⊢ (𝜑 → 0 ≤ (1 + ((abs‘𝑉) + (abs‘𝑈))))
221		min2 12021	. . . . . . . . . 10 ⊢ ((1 ∈ ℝ ∧ 𝑋 ∈ ℝ) → if(1 ≤ 𝑋, 1, 𝑋) ≤ 𝑋)
222	75, 196, 221	syl2anc 693	. . . . . . . . 9 ⊢ (𝜑 → if(1 ≤ 𝑋, 1, 𝑋) ≤ 𝑋)
223	64, 222	eqbrtrd 4675	. . . . . . . 8 ⊢ (𝜑 → 𝑌 ≤ 𝑋)
224	96, 196, 213, 220, 223	lemul1ad 10963	. . . . . . 7 ⊢ (𝜑 → (𝑌 · (1 + ((abs‘𝑉) + (abs‘𝑈)))) ≤ (𝑋 · (1 + ((abs‘𝑉) + (abs‘𝑈)))))
225	68	oveq1d 6665	. . . . . . . 8 ⊢ (𝜑 → (𝑋 · (1 + ((abs‘𝑉) + (abs‘𝑈)))) = (((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉)))) · (1 + ((abs‘𝑉) + (abs‘𝑈)))))
226	184, 205	addcomd 10238	. . . . . . . . . . 11 ⊢ (𝜑 → ((abs‘𝑈) + (abs‘𝑉)) = ((abs‘𝑉) + (abs‘𝑈)))
227	226	oveq2d 6666	. . . . . . . . . 10 ⊢ (𝜑 → (1 + ((abs‘𝑈) + (abs‘𝑉))) = (1 + ((abs‘𝑉) + (abs‘𝑈))))
228	227	oveq2d 6666	. . . . . . . . 9 ⊢ (𝜑 → ((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉)))) = ((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑉) + (abs‘𝑈)))))
229	228	oveq1d 6665	. . . . . . . 8 ⊢ (𝜑 → (((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉)))) · (1 + ((abs‘𝑉) + (abs‘𝑈)))) = (((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑉) + (abs‘𝑈)))) · (1 + ((abs‘𝑉) + (abs‘𝑈)))))
230	107	recnd 10068	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 − (𝑈 · 𝑉)) ∈ ℂ)
231	204, 206	addcld 10059	. . . . . . . . 9 ⊢ (𝜑 → (1 + ((abs‘𝑉) + (abs‘𝑈))) ∈ ℂ)
232	81, 219	gtned 10172	. . . . . . . . 9 ⊢ (𝜑 → (1 + ((abs‘𝑉) + (abs‘𝑈))) ≠ 0)
233	230, 231, 232	divcan1d 10802	. . . . . . . 8 ⊢ (𝜑 → (((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑉) + (abs‘𝑈)))) · (1 + ((abs‘𝑉) + (abs‘𝑈)))) = (𝐴 − (𝑈 · 𝑉)))
234	225, 229, 233	3eqtrd 2660	. . . . . . 7 ⊢ (𝜑 → (𝑋 · (1 + ((abs‘𝑉) + (abs‘𝑈)))) = (𝐴 − (𝑈 · 𝑉)))
235	224, 234	breqtrd 4679	. . . . . 6 ⊢ (𝜑 → (𝑌 · (1 + ((abs‘𝑉) + (abs‘𝑈)))) ≤ (𝐴 − (𝑈 · 𝑉)))
236	211, 235	eqbrtrd 4675	. . . . 5 ⊢ (𝜑 → (𝑌 + ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈)))) ≤ (𝐴 − (𝑈 · 𝑉)))
237	106, 194, 107, 203, 236	letrd 10194	. . . 4 ⊢ (𝜑 → ((𝑌↑2) + ((𝑌 · (abs‘𝑉)) + (𝑌 · (abs‘𝑈)))) ≤ (𝐴 − (𝑈 · 𝑉)))
238	62, 106, 107, 193, 237	ltletrd 10197	. . 3 ⊢ (𝜑 → (((𝐻 − 𝑈) · (𝐼 − 𝑉)) + (((𝐻 − 𝑈) · 𝑉) + (𝑈 · (𝐼 − 𝑉)))) < (𝐴 − (𝑈 · 𝑉)))
239	41, 238	eqbrtrd 4675	. 2 ⊢ (𝜑 → ((𝐻 · 𝐼) − (𝑈 · 𝑉)) < (𝐴 − (𝑈 · 𝑉)))
240	2, 7	remulcld 10070	. . 3 ⊢ (𝜑 → (𝐻 · 𝐼) ∈ ℝ)
241	240, 71, 70	ltsub1d 10636	. 2 ⊢ (𝜑 → ((𝐻 · 𝐼) < 𝐴 ↔ ((𝐻 · 𝐼) − (𝑈 · 𝑉)) < (𝐴 − (𝑈 · 𝑉))))
242	239, 241	mpbird 247	1 ⊢ (𝜑 → (𝐻 · 𝐼) < 𝐴)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 196 ∧ wa 384 = wceq 1483 ∈ wcel 1990 ifcif 4086 class class class wbr 4653 ‘cfv 5888 (class class class)co 6650 ℂcc 9934 ℝcr 9935 0cc0 9936 1c1 9937 + caddc 9939 · cmul 9941 ℝ^*cxr 10073 < clt 10074 ≤ cle 10075 − cmin 10266 / cdiv 10684 2c2 11070 ℝ⁺crp 11832 (,)cioo 12175 [,]cicc 12178 ↑cexp 12860 abscabs 13974

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1722 ax-4 1737 ax-5 1839 ax-6 1888 ax-7 1935 ax-8 1992 ax-9 1999 ax-10 2019 ax-11 2034 ax-12 2047 ax-13 2246 ax-ext 2602 ax-sep 4781 ax-nul 4789 ax-pow 4843 ax-pr 4906 ax-un 6949 ax-cnex 9992 ax-resscn 9993 ax-1cn 9994 ax-icn 9995 ax-addcl 9996 ax-addrcl 9997 ax-mulcl 9998 ax-mulrcl 9999 ax-mulcom 10000 ax-addass 10001 ax-mulass 10002 ax-distr 10003 ax-i2m1 10004 ax-1ne0 10005 ax-1rid 10006 ax-rnegex 10007 ax-rrecex 10008 ax-cnre 10009 ax-pre-lttri 10010 ax-pre-lttrn 10011 ax-pre-ltadd 10012 ax-pre-mulgt0 10013 ax-pre-sup 10014

This theorem depends on definitions: df-bi 197 df-or 385 df-an 386 df-3or 1038 df-3an 1039 df-tru 1486 df-ex 1705 df-nf 1710 df-sb 1881 df-eu 2474 df-mo 2475 df-clab 2609 df-cleq 2615 df-clel 2618 df-nfc 2753 df-ne 2795 df-nel 2898 df-ral 2917 df-rex 2918 df-reu 2919 df-rmo 2920 df-rab 2921 df-v 3202 df-sbc 3436 df-csb 3534 df-dif 3577 df-un 3579 df-in 3581 df-ss 3588 df-pss 3590 df-nul 3916 df-if 4087 df-pw 4160 df-sn 4178 df-pr 4180 df-tp 4182 df-op 4184 df-uni 4437 df-iun 4522 df-br 4654 df-opab 4713 df-mpt 4730 df-tr 4753 df-id 5024 df-eprel 5029 df-po 5035 df-so 5036 df-fr 5073 df-we 5075 df-xp 5120 df-rel 5121 df-cnv 5122 df-co 5123 df-dm 5124 df-rn 5125 df-res 5126 df-ima 5127 df-pred 5680 df-ord 5726 df-on 5727 df-lim 5728 df-suc 5729 df-iota 5851 df-fun 5890 df-fn 5891 df-f 5892 df-f1 5893 df-fo 5894 df-f1o 5895 df-fv 5896 df-riota 6611 df-ov 6653 df-oprab 6654 df-mpt2 6655 df-om 7066 df-1st 7168 df-2nd 7169 df-wrecs 7407 df-recs 7468 df-rdg 7506 df-er 7742 df-en 7956 df-dom 7957 df-sdom 7958 df-sup 8348 df-pnf 10076 df-mnf 10077 df-xr 10078 df-ltxr 10079 df-le 10080 df-sub 10268 df-neg 10269 df-div 10685 df-nn 11021 df-2 11079 df-3 11080 df-n0 11293 df-z 11378 df-uz 11688 df-rp 11833 df-ioo 12179 df-icc 12182 df-seq 12802 df-exp 12861 df-cj 13839 df-re 13840 df-im 13841 df-sqrt 13975 df-abs 13976

This theorem is referenced by: smfmullem2 40999

W3C validator