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

Theorem smfmullem2 46812
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
smfmullem2.a (𝜑𝐴 ∈ ℝ)
smfmullem2.k 𝐾 = {𝑞 ∈ (ℚ ↑m (0...3)) ∣ ∀𝑢 ∈ ((𝑞‘0)(,)(𝑞‘1))∀𝑣 ∈ ((𝑞‘2)(,)(𝑞‘3))(𝑢 · 𝑣) < 𝐴}
smfmullem2.u (𝜑𝑈 ∈ ℝ)
smfmullem2.v (𝜑𝑉 ∈ ℝ)
smfmullem2.l (𝜑 → (𝑈 · 𝑉) < 𝐴)
smfmullem2.p (𝜑𝑃 ∈ ℚ)
smfmullem2.r (𝜑𝑅 ∈ ℚ)
smfmullem2.s (𝜑𝑆 ∈ ℚ)
smfmullem2.z (𝜑𝑍 ∈ ℚ)
smfmullem2.p2 (𝜑𝑃 ∈ ((𝑈𝑌)(,)𝑈))
smfmullem2.42 (𝜑𝑅 ∈ (𝑈(,)(𝑈 + 𝑌)))
smfmullem2.w2 (𝜑𝑆 ∈ ((𝑉𝑌)(,)𝑉))
smfmullem2.z2 (𝜑𝑍 ∈ (𝑉(,)(𝑉 + 𝑌)))
smfmullem2.x 𝑋 = ((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉))))
smfmullem2.y 𝑌 = if(1 ≤ 𝑋, 1, 𝑋)
Assertion
Ref Expression
smfmullem2 (𝜑 → ∃𝑞𝐾 (𝑈 ∈ ((𝑞‘0)(,)(𝑞‘1)) ∧ 𝑉 ∈ ((𝑞‘2)(,)(𝑞‘3))))
Distinct variable groups:   𝐴,𝑞   𝑃,𝑞,𝑢,𝑣   𝑅,𝑞,𝑢,𝑣   𝑆,𝑞,𝑢,𝑣   𝑈,𝑞   𝑉,𝑞   𝑍,𝑞,𝑢,𝑣   𝜑,𝑢,𝑣
Allowed substitution hints:   𝜑(𝑞)   𝐴(𝑣,𝑢)   𝑈(𝑣,𝑢)   𝐾(𝑣,𝑢,𝑞)   𝑉(𝑣,𝑢)   𝑋(𝑣,𝑢,𝑞)   𝑌(𝑣,𝑢,𝑞)

Proof of Theorem smfmullem2
StepHypRef Expression
1 smfmullem2.p . . . . . . . 8 (𝜑𝑃 ∈ ℚ)
2 smfmullem2.r . . . . . . . 8 (𝜑𝑅 ∈ ℚ)
3 smfmullem2.s . . . . . . . 8 (𝜑𝑆 ∈ ℚ)
4 smfmullem2.z . . . . . . . 8 (𝜑𝑍 ∈ ℚ)
51, 2, 3, 4s4cld 14913 . . . . . . 7 (𝜑 → ⟨“𝑃𝑅𝑆𝑍”⟩ ∈ Word ℚ)
6 s4len 14939 . . . . . . . 8 (♯‘⟨“𝑃𝑅𝑆𝑍”⟩) = 4
76a1i 11 . . . . . . 7 (𝜑 → (♯‘⟨“𝑃𝑅𝑆𝑍”⟩) = 4)
85, 7jca 511 . . . . . 6 (𝜑 → (⟨“𝑃𝑅𝑆𝑍”⟩ ∈ Word ℚ ∧ (♯‘⟨“𝑃𝑅𝑆𝑍”⟩) = 4))
9 qex 13004 . . . . . . . 8 ℚ ∈ V
109a1i 11 . . . . . . 7 (𝜑 → ℚ ∈ V)
11 4nn0 12547 . . . . . . . 8 4 ∈ ℕ0
1211a1i 11 . . . . . . 7 (𝜑 → 4 ∈ ℕ0)
13 wrdmap 14585 . . . . . . 7 ((ℚ ∈ V ∧ 4 ∈ ℕ0) → ((⟨“𝑃𝑅𝑆𝑍”⟩ ∈ Word ℚ ∧ (♯‘⟨“𝑃𝑅𝑆𝑍”⟩) = 4) ↔ ⟨“𝑃𝑅𝑆𝑍”⟩ ∈ (ℚ ↑m (0..^4))))
1410, 12, 13syl2anc 584 . . . . . 6 (𝜑 → ((⟨“𝑃𝑅𝑆𝑍”⟩ ∈ Word ℚ ∧ (♯‘⟨“𝑃𝑅𝑆𝑍”⟩) = 4) ↔ ⟨“𝑃𝑅𝑆𝑍”⟩ ∈ (ℚ ↑m (0..^4))))
158, 14mpbid 232 . . . . 5 (𝜑 → ⟨“𝑃𝑅𝑆𝑍”⟩ ∈ (ℚ ↑m (0..^4)))
16 3z 12652 . . . . . . . . . 10 3 ∈ ℤ
17 fzval3 13774 . . . . . . . . . 10 (3 ∈ ℤ → (0...3) = (0..^(3 + 1)))
1816, 17ax-mp 5 . . . . . . . . 9 (0...3) = (0..^(3 + 1))
19 3p1e4 12412 . . . . . . . . . 10 (3 + 1) = 4
2019oveq2i 7443 . . . . . . . . 9 (0..^(3 + 1)) = (0..^4)
2118, 20eqtri 2764 . . . . . . . 8 (0...3) = (0..^4)
2221eqcomi 2745 . . . . . . 7 (0..^4) = (0...3)
2322a1i 11 . . . . . 6 (𝜑 → (0..^4) = (0...3))
2423oveq2d 7448 . . . . 5 (𝜑 → (ℚ ↑m (0..^4)) = (ℚ ↑m (0...3)))
2515, 24eleqtrd 2842 . . . 4 (𝜑 → ⟨“𝑃𝑅𝑆𝑍”⟩ ∈ (ℚ ↑m (0...3)))
26 simpr 484 . . . . . . 7 ((𝜑𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))) → 𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1)))
27 s4fv0 14935 . . . . . . . . . 10 (𝑃 ∈ ℚ → (⟨“𝑃𝑅𝑆𝑍”⟩‘0) = 𝑃)
281, 27syl 17 . . . . . . . . 9 (𝜑 → (⟨“𝑃𝑅𝑆𝑍”⟩‘0) = 𝑃)
29 s4fv1 14936 . . . . . . . . . 10 (𝑅 ∈ ℚ → (⟨“𝑃𝑅𝑆𝑍”⟩‘1) = 𝑅)
302, 29syl 17 . . . . . . . . 9 (𝜑 → (⟨“𝑃𝑅𝑆𝑍”⟩‘1) = 𝑅)
3128, 30oveq12d 7450 . . . . . . . 8 (𝜑 → ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1)) = (𝑃(,)𝑅))
3231adantr 480 . . . . . . 7 ((𝜑𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))) → ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1)) = (𝑃(,)𝑅))
3326, 32eleqtrd 2842 . . . . . 6 ((𝜑𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))) → 𝑢 ∈ (𝑃(,)𝑅))
34 simpr 484 . . . . . . . . . . 11 ((𝜑𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))) → 𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3)))
35 s4fv2 14937 . . . . . . . . . . . . . 14 (𝑆 ∈ ℚ → (⟨“𝑃𝑅𝑆𝑍”⟩‘2) = 𝑆)
363, 35syl 17 . . . . . . . . . . . . 13 (𝜑 → (⟨“𝑃𝑅𝑆𝑍”⟩‘2) = 𝑆)
37 s4fv3 14938 . . . . . . . . . . . . . 14 (𝑍 ∈ ℚ → (⟨“𝑃𝑅𝑆𝑍”⟩‘3) = 𝑍)
384, 37syl 17 . . . . . . . . . . . . 13 (𝜑 → (⟨“𝑃𝑅𝑆𝑍”⟩‘3) = 𝑍)
3936, 38oveq12d 7450 . . . . . . . . . . . 12 (𝜑 → ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3)) = (𝑆(,)𝑍))
4039adantr 480 . . . . . . . . . . 11 ((𝜑𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))) → ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3)) = (𝑆(,)𝑍))
4134, 40eleqtrd 2842 . . . . . . . . . 10 ((𝜑𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))) → 𝑣 ∈ (𝑆(,)𝑍))
42 simpr 484 . . . . . . . . . 10 ((𝜑𝑣 ∈ (𝑆(,)𝑍)) → 𝑣 ∈ (𝑆(,)𝑍))
4341, 42syldan 591 . . . . . . . . 9 ((𝜑𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))) → 𝑣 ∈ (𝑆(,)𝑍))
4443adantlr 715 . . . . . . . 8 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))) → 𝑣 ∈ (𝑆(,)𝑍))
45 smfmullem2.a . . . . . . . . . 10 (𝜑𝐴 ∈ ℝ)
4645ad2antrr 726 . . . . . . . . 9 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → 𝐴 ∈ ℝ)
47 smfmullem2.u . . . . . . . . . 10 (𝜑𝑈 ∈ ℝ)
4847ad2antrr 726 . . . . . . . . 9 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → 𝑈 ∈ ℝ)
49 smfmullem2.v . . . . . . . . . 10 (𝜑𝑉 ∈ ℝ)
5049ad2antrr 726 . . . . . . . . 9 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → 𝑉 ∈ ℝ)
51 smfmullem2.l . . . . . . . . . 10 (𝜑 → (𝑈 · 𝑉) < 𝐴)
5251ad2antrr 726 . . . . . . . . 9 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → (𝑈 · 𝑉) < 𝐴)
53 smfmullem2.x . . . . . . . . 9 𝑋 = ((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉))))
54 smfmullem2.y . . . . . . . . 9 𝑌 = if(1 ≤ 𝑋, 1, 𝑋)
55 smfmullem2.p2 . . . . . . . . . 10 (𝜑𝑃 ∈ ((𝑈𝑌)(,)𝑈))
5655ad2antrr 726 . . . . . . . . 9 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → 𝑃 ∈ ((𝑈𝑌)(,)𝑈))
57 smfmullem2.42 . . . . . . . . . 10 (𝜑𝑅 ∈ (𝑈(,)(𝑈 + 𝑌)))
5857ad2antrr 726 . . . . . . . . 9 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → 𝑅 ∈ (𝑈(,)(𝑈 + 𝑌)))
59 smfmullem2.w2 . . . . . . . . . 10 (𝜑𝑆 ∈ ((𝑉𝑌)(,)𝑉))
6059ad2antrr 726 . . . . . . . . 9 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → 𝑆 ∈ ((𝑉𝑌)(,)𝑉))
61 smfmullem2.z2 . . . . . . . . . 10 (𝜑𝑍 ∈ (𝑉(,)(𝑉 + 𝑌)))
6261ad2antrr 726 . . . . . . . . 9 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → 𝑍 ∈ (𝑉(,)(𝑉 + 𝑌)))
63 simplr 768 . . . . . . . . 9 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → 𝑢 ∈ (𝑃(,)𝑅))
64 simpr 484 . . . . . . . . 9 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → 𝑣 ∈ (𝑆(,)𝑍))
6546, 48, 50, 52, 53, 54, 56, 58, 60, 62, 63, 64smfmullem1 46811 . . . . . . . 8 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ (𝑆(,)𝑍)) → (𝑢 · 𝑣) < 𝐴)
6644, 65syldan 591 . . . . . . 7 (((𝜑𝑢 ∈ (𝑃(,)𝑅)) ∧ 𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))) → (𝑢 · 𝑣) < 𝐴)
6766ralrimiva 3145 . . . . . 6 ((𝜑𝑢 ∈ (𝑃(,)𝑅)) → ∀𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))(𝑢 · 𝑣) < 𝐴)
6833, 67syldan 591 . . . . 5 ((𝜑𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))) → ∀𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))(𝑢 · 𝑣) < 𝐴)
6968ralrimiva 3145 . . . 4 (𝜑 → ∀𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))∀𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))(𝑢 · 𝑣) < 𝐴)
7025, 69jca 511 . . 3 (𝜑 → (⟨“𝑃𝑅𝑆𝑍”⟩ ∈ (ℚ ↑m (0...3)) ∧ ∀𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))∀𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))(𝑢 · 𝑣) < 𝐴))
71 fveq1 6904 . . . . . . 7 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → (𝑞‘0) = (⟨“𝑃𝑅𝑆𝑍”⟩‘0))
72 fveq1 6904 . . . . . . 7 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → (𝑞‘1) = (⟨“𝑃𝑅𝑆𝑍”⟩‘1))
7371, 72oveq12d 7450 . . . . . 6 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → ((𝑞‘0)(,)(𝑞‘1)) = ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1)))
7473raleqdv 3325 . . . . 5 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → (∀𝑢 ∈ ((𝑞‘0)(,)(𝑞‘1))∀𝑣 ∈ ((𝑞‘2)(,)(𝑞‘3))(𝑢 · 𝑣) < 𝐴 ↔ ∀𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))∀𝑣 ∈ ((𝑞‘2)(,)(𝑞‘3))(𝑢 · 𝑣) < 𝐴))
75 fveq1 6904 . . . . . . . 8 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → (𝑞‘2) = (⟨“𝑃𝑅𝑆𝑍”⟩‘2))
76 fveq1 6904 . . . . . . . 8 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → (𝑞‘3) = (⟨“𝑃𝑅𝑆𝑍”⟩‘3))
7775, 76oveq12d 7450 . . . . . . 7 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → ((𝑞‘2)(,)(𝑞‘3)) = ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3)))
7877raleqdv 3325 . . . . . 6 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → (∀𝑣 ∈ ((𝑞‘2)(,)(𝑞‘3))(𝑢 · 𝑣) < 𝐴 ↔ ∀𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))(𝑢 · 𝑣) < 𝐴))
7978ralbidv 3177 . . . . 5 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → (∀𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))∀𝑣 ∈ ((𝑞‘2)(,)(𝑞‘3))(𝑢 · 𝑣) < 𝐴 ↔ ∀𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))∀𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))(𝑢 · 𝑣) < 𝐴))
8074, 79bitrd 279 . . . 4 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → (∀𝑢 ∈ ((𝑞‘0)(,)(𝑞‘1))∀𝑣 ∈ ((𝑞‘2)(,)(𝑞‘3))(𝑢 · 𝑣) < 𝐴 ↔ ∀𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))∀𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))(𝑢 · 𝑣) < 𝐴))
81 smfmullem2.k . . . 4 𝐾 = {𝑞 ∈ (ℚ ↑m (0...3)) ∣ ∀𝑢 ∈ ((𝑞‘0)(,)(𝑞‘1))∀𝑣 ∈ ((𝑞‘2)(,)(𝑞‘3))(𝑢 · 𝑣) < 𝐴}
8280, 81elrab2 3694 . . 3 (⟨“𝑃𝑅𝑆𝑍”⟩ ∈ 𝐾 ↔ (⟨“𝑃𝑅𝑆𝑍”⟩ ∈ (ℚ ↑m (0...3)) ∧ ∀𝑢 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))∀𝑣 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))(𝑢 · 𝑣) < 𝐴))
8370, 82sylibr 234 . 2 (𝜑 → ⟨“𝑃𝑅𝑆𝑍”⟩ ∈ 𝐾)
84 qssre 13002 . . . . . . 7 ℚ ⊆ ℝ
8584, 1sselid 3980 . . . . . 6 (𝜑𝑃 ∈ ℝ)
8685rexrd 11312 . . . . 5 (𝜑𝑃 ∈ ℝ*)
8784, 2sselid 3980 . . . . . 6 (𝜑𝑅 ∈ ℝ)
8887rexrd 11312 . . . . 5 (𝜑𝑅 ∈ ℝ*)
8954a1i 11 . . . . . . . . . 10 (𝜑𝑌 = if(1 ≤ 𝑋, 1, 𝑋))
90 1rp 13039 . . . . . . . . . . . 12 1 ∈ ℝ+
9190a1i 11 . . . . . . . . . . 11 (𝜑 → 1 ∈ ℝ+)
9253a1i 11 . . . . . . . . . . . 12 (𝜑𝑋 = ((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉)))))
9347, 49remulcld 11292 . . . . . . . . . . . . . . 15 (𝜑 → (𝑈 · 𝑉) ∈ ℝ)
94 difrp 13074 . . . . . . . . . . . . . . 15 (((𝑈 · 𝑉) ∈ ℝ ∧ 𝐴 ∈ ℝ) → ((𝑈 · 𝑉) < 𝐴 ↔ (𝐴 − (𝑈 · 𝑉)) ∈ ℝ+))
9593, 45, 94syl2anc 584 . . . . . . . . . . . . . 14 (𝜑 → ((𝑈 · 𝑉) < 𝐴 ↔ (𝐴 − (𝑈 · 𝑉)) ∈ ℝ+))
9651, 95mpbid 232 . . . . . . . . . . . . 13 (𝜑 → (𝐴 − (𝑈 · 𝑉)) ∈ ℝ+)
97 1red 11263 . . . . . . . . . . . . . . 15 (𝜑 → 1 ∈ ℝ)
9847recnd 11290 . . . . . . . . . . . . . . . . 17 (𝜑𝑈 ∈ ℂ)
9998abscld 15476 . . . . . . . . . . . . . . . 16 (𝜑 → (abs‘𝑈) ∈ ℝ)
10049recnd 11290 . . . . . . . . . . . . . . . . 17 (𝜑𝑉 ∈ ℂ)
101100abscld 15476 . . . . . . . . . . . . . . . 16 (𝜑 → (abs‘𝑉) ∈ ℝ)
10299, 101readdcld 11291 . . . . . . . . . . . . . . 15 (𝜑 → ((abs‘𝑈) + (abs‘𝑉)) ∈ ℝ)
10397, 102readdcld 11291 . . . . . . . . . . . . . 14 (𝜑 → (1 + ((abs‘𝑈) + (abs‘𝑉))) ∈ ℝ)
104 0re 11264 . . . . . . . . . . . . . . . 16 0 ∈ ℝ
105104a1i 11 . . . . . . . . . . . . . . 15 (𝜑 → 0 ∈ ℝ)
10691rpgt0d 13081 . . . . . . . . . . . . . . 15 (𝜑 → 0 < 1)
10798absge0d 15484 . . . . . . . . . . . . . . . . 17 (𝜑 → 0 ≤ (abs‘𝑈))
108100absge0d 15484 . . . . . . . . . . . . . . . . . 18 (𝜑 → 0 ≤ (abs‘𝑉))
10999, 101addge01d 11852 . . . . . . . . . . . . . . . . . 18 (𝜑 → (0 ≤ (abs‘𝑉) ↔ (abs‘𝑈) ≤ ((abs‘𝑈) + (abs‘𝑉))))
110108, 109mpbid 232 . . . . . . . . . . . . . . . . 17 (𝜑 → (abs‘𝑈) ≤ ((abs‘𝑈) + (abs‘𝑉)))
111105, 99, 102, 107, 110letrd 11419 . . . . . . . . . . . . . . . 16 (𝜑 → 0 ≤ ((abs‘𝑈) + (abs‘𝑉)))
11297, 102addge01d 11852 . . . . . . . . . . . . . . . 16 (𝜑 → (0 ≤ ((abs‘𝑈) + (abs‘𝑉)) ↔ 1 ≤ (1 + ((abs‘𝑈) + (abs‘𝑉)))))
113111, 112mpbid 232 . . . . . . . . . . . . . . 15 (𝜑 → 1 ≤ (1 + ((abs‘𝑈) + (abs‘𝑉))))
114105, 97, 103, 106, 113ltletrd 11422 . . . . . . . . . . . . . 14 (𝜑 → 0 < (1 + ((abs‘𝑈) + (abs‘𝑉))))
115103, 114elrpd 13075 . . . . . . . . . . . . 13 (𝜑 → (1 + ((abs‘𝑈) + (abs‘𝑉))) ∈ ℝ+)
11696, 115rpdivcld 13095 . . . . . . . . . . . 12 (𝜑 → ((𝐴 − (𝑈 · 𝑉)) / (1 + ((abs‘𝑈) + (abs‘𝑉)))) ∈ ℝ+)
11792, 116eqeltrd 2840 . . . . . . . . . . 11 (𝜑𝑋 ∈ ℝ+)
11891, 117ifcld 4571 . . . . . . . . . 10 (𝜑 → if(1 ≤ 𝑋, 1, 𝑋) ∈ ℝ+)
11989, 118eqeltrd 2840 . . . . . . . . 9 (𝜑𝑌 ∈ ℝ+)
120119rpred 13078 . . . . . . . 8 (𝜑𝑌 ∈ ℝ)
12147, 120resubcld 11692 . . . . . . 7 (𝜑 → (𝑈𝑌) ∈ ℝ)
122121rexrd 11312 . . . . . 6 (𝜑 → (𝑈𝑌) ∈ ℝ*)
12347rexrd 11312 . . . . . 6 (𝜑𝑈 ∈ ℝ*)
124 iooltub 45528 . . . . . 6 (((𝑈𝑌) ∈ ℝ*𝑈 ∈ ℝ*𝑃 ∈ ((𝑈𝑌)(,)𝑈)) → 𝑃 < 𝑈)
125122, 123, 55, 124syl3anc 1372 . . . . 5 (𝜑𝑃 < 𝑈)
12647, 120readdcld 11291 . . . . . . 7 (𝜑 → (𝑈 + 𝑌) ∈ ℝ)
127126rexrd 11312 . . . . . 6 (𝜑 → (𝑈 + 𝑌) ∈ ℝ*)
128 ioogtlb 45513 . . . . . 6 ((𝑈 ∈ ℝ* ∧ (𝑈 + 𝑌) ∈ ℝ*𝑅 ∈ (𝑈(,)(𝑈 + 𝑌))) → 𝑈 < 𝑅)
129123, 127, 57, 128syl3anc 1372 . . . . 5 (𝜑𝑈 < 𝑅)
13086, 88, 47, 125, 129eliood 45516 . . . 4 (𝜑𝑈 ∈ (𝑃(,)𝑅))
13131eqcomd 2742 . . . 4 (𝜑 → (𝑃(,)𝑅) = ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1)))
132130, 131eleqtrd 2842 . . 3 (𝜑𝑈 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1)))
13384, 3sselid 3980 . . . . . 6 (𝜑𝑆 ∈ ℝ)
134133rexrd 11312 . . . . 5 (𝜑𝑆 ∈ ℝ*)
13584, 4sselid 3980 . . . . . 6 (𝜑𝑍 ∈ ℝ)
136135rexrd 11312 . . . . 5 (𝜑𝑍 ∈ ℝ*)
13749, 120resubcld 11692 . . . . . . 7 (𝜑 → (𝑉𝑌) ∈ ℝ)
138137rexrd 11312 . . . . . 6 (𝜑 → (𝑉𝑌) ∈ ℝ*)
13949rexrd 11312 . . . . . 6 (𝜑𝑉 ∈ ℝ*)
140 iooltub 45528 . . . . . 6 (((𝑉𝑌) ∈ ℝ*𝑉 ∈ ℝ*𝑆 ∈ ((𝑉𝑌)(,)𝑉)) → 𝑆 < 𝑉)
141138, 139, 59, 140syl3anc 1372 . . . . 5 (𝜑𝑆 < 𝑉)
14249, 120readdcld 11291 . . . . . . 7 (𝜑 → (𝑉 + 𝑌) ∈ ℝ)
143142rexrd 11312 . . . . . 6 (𝜑 → (𝑉 + 𝑌) ∈ ℝ*)
144 ioogtlb 45513 . . . . . 6 ((𝑉 ∈ ℝ* ∧ (𝑉 + 𝑌) ∈ ℝ*𝑍 ∈ (𝑉(,)(𝑉 + 𝑌))) → 𝑉 < 𝑍)
145139, 143, 61, 144syl3anc 1372 . . . . 5 (𝜑𝑉 < 𝑍)
146134, 136, 49, 141, 145eliood 45516 . . . 4 (𝜑𝑉 ∈ (𝑆(,)𝑍))
14739eqcomd 2742 . . . 4 (𝜑 → (𝑆(,)𝑍) = ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3)))
148146, 147eleqtrd 2842 . . 3 (𝜑𝑉 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3)))
149132, 148jca 511 . 2 (𝜑 → (𝑈 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1)) ∧ 𝑉 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))))
150 nfv 1913 . . 3 𝑞(𝑈 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1)) ∧ 𝑉 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3)))
151 nfcv 2904 . . 3 𝑞⟨“𝑃𝑅𝑆𝑍”⟩
152 nfrab1 3456 . . . 4 𝑞{𝑞 ∈ (ℚ ↑m (0...3)) ∣ ∀𝑢 ∈ ((𝑞‘0)(,)(𝑞‘1))∀𝑣 ∈ ((𝑞‘2)(,)(𝑞‘3))(𝑢 · 𝑣) < 𝐴}
15381, 152nfcxfr 2902 . . 3 𝑞𝐾
15473eleq2d 2826 . . . 4 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → (𝑈 ∈ ((𝑞‘0)(,)(𝑞‘1)) ↔ 𝑈 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1))))
15577eleq2d 2826 . . . 4 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → (𝑉 ∈ ((𝑞‘2)(,)(𝑞‘3)) ↔ 𝑉 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3))))
156154, 155anbi12d 632 . . 3 (𝑞 = ⟨“𝑃𝑅𝑆𝑍”⟩ → ((𝑈 ∈ ((𝑞‘0)(,)(𝑞‘1)) ∧ 𝑉 ∈ ((𝑞‘2)(,)(𝑞‘3))) ↔ (𝑈 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1)) ∧ 𝑉 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3)))))
157150, 151, 153, 156rspcef 45082 . 2 ((⟨“𝑃𝑅𝑆𝑍”⟩ ∈ 𝐾 ∧ (𝑈 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘0)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘1)) ∧ 𝑉 ∈ ((⟨“𝑃𝑅𝑆𝑍”⟩‘2)(,)(⟨“𝑃𝑅𝑆𝑍”⟩‘3)))) → ∃𝑞𝐾 (𝑈 ∈ ((𝑞‘0)(,)(𝑞‘1)) ∧ 𝑉 ∈ ((𝑞‘2)(,)(𝑞‘3))))
15883, 149, 157syl2anc 584 1 (𝜑 → ∃𝑞𝐾 (𝑈 ∈ ((𝑞‘0)(,)(𝑞‘1)) ∧ 𝑉 ∈ ((𝑞‘2)(,)(𝑞‘3))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1539  wcel 2107  wral 3060  wrex 3069  {crab 3435  Vcvv 3479  ifcif 4524   class class class wbr 5142  cfv 6560  (class class class)co 7432  m cmap 8867  cr 11155  0cc0 11156  1c1 11157   + caddc 11159   · cmul 11161  *cxr 11295   < clt 11296  cle 11297  cmin 11493   / cdiv 11921  2c2 12322  3c3 12323  4c4 12324  0cn0 12528  cz 12615  cq 12991  +crp 13035  (,)cioo 13388  ...cfz 13548  ..^cfzo 13695  chash 14370  Word cword 14553  ⟨“cs4 14883  abscabs 15274
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1909  ax-6 1966  ax-7 2006  ax-8 2109  ax-9 2117  ax-10 2140  ax-11 2156  ax-12 2176  ax-ext 2707  ax-rep 5278  ax-sep 5295  ax-nul 5305  ax-pow 5364  ax-pr 5431  ax-un 7756  ax-cnex 11212  ax-resscn 11213  ax-1cn 11214  ax-icn 11215  ax-addcl 11216  ax-addrcl 11217  ax-mulcl 11218  ax-mulrcl 11219  ax-mulcom 11220  ax-addass 11221  ax-mulass 11222  ax-distr 11223  ax-i2m1 11224  ax-1ne0 11225  ax-1rid 11226  ax-rnegex 11227  ax-rrecex 11228  ax-cnre 11229  ax-pre-lttri 11230  ax-pre-lttrn 11231  ax-pre-ltadd 11232  ax-pre-mulgt0 11233  ax-pre-sup 11234
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1779  df-nf 1783  df-sb 2064  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2728  df-clel 2815  df-nfc 2891  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-rmo 3379  df-reu 3380  df-rab 3436  df-v 3481  df-sbc 3788  df-csb 3899  df-dif 3953  df-un 3955  df-in 3957  df-ss 3967  df-pss 3970  df-nul 4333  df-if 4525  df-pw 4601  df-sn 4626  df-pr 4628  df-op 4632  df-uni 4907  df-int 4946  df-iun 4992  df-br 5143  df-opab 5205  df-mpt 5225  df-tr 5259  df-id 5577  df-eprel 5583  df-po 5591  df-so 5592  df-fr 5636  df-we 5638  df-xp 5690  df-rel 5691  df-cnv 5692  df-co 5693  df-dm 5694  df-rn 5695  df-res 5696  df-ima 5697  df-pred 6320  df-ord 6386  df-on 6387  df-lim 6388  df-suc 6389  df-iota 6513  df-fun 6562  df-fn 6563  df-f 6564  df-f1 6565  df-fo 6566  df-f1o 6567  df-fv 6568  df-riota 7389  df-ov 7435  df-oprab 7436  df-mpo 7437  df-om 7889  df-1st 8015  df-2nd 8016  df-frecs 8307  df-wrecs 8338  df-recs 8412  df-rdg 8451  df-1o 8507  df-er 8746  df-map 8869  df-en 8987  df-dom 8988  df-sdom 8989  df-fin 8990  df-sup 9483  df-card 9980  df-pnf 11298  df-mnf 11299  df-xr 11300  df-ltxr 11301  df-le 11302  df-sub 11495  df-neg 11496  df-div 11922  df-nn 12268  df-2 12330  df-3 12331  df-4 12332  df-n0 12529  df-z 12616  df-uz 12880  df-q 12992  df-rp 13036  df-ioo 13392  df-icc 13395  df-fz 13549  df-fzo 13696  df-seq 14044  df-exp 14104  df-hash 14371  df-word 14554  df-concat 14610  df-s1 14635  df-s2 14888  df-s3 14889  df-s4 14890  df-cj 15139  df-re 15140  df-im 15141  df-sqrt 15275  df-abs 15276
This theorem is referenced by:  smfmullem3  46813
  Copyright terms: Public domain W3C validator