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

Theorem qndenserrnbllem 47273
Description: n-dimensional rational numbers are dense in the space of n-dimensional real numbers, with respect to the n-dimensional standard topology. (Contributed by Glauco Siliprandi, 24-Dec-2020.)
Hypotheses
Ref Expression
qndenserrnbllem.i (𝜑 → 𝐼 ∈ Fin)
qndenserrnbllem.n (𝜑 → 𝐼 ≠ ∅)
qndenserrnbllem.x (𝜑 → 𝑋 ∈ (ℝ ↑m 𝐼))
qndenserrnbllem.d 𝐷 = (dist‘(ℝ^‘𝐼))
qndenserrnbllem.e (𝜑 → 𝐸 ∈ ℝ+)
Assertion
Ref Expression
qndenserrnbllem (𝜑 → ∃𝑦 ∈ (ℚ ↑m 𝐼)𝑦 ∈ (𝑋(ball‘𝐷)𝐸))
Distinct variable groups:   𝑦,𝐸   𝑦,𝐼   𝑦,𝑋   𝜑,𝑦
Allowed substitution hint:   𝐷(𝑦)

Proof of Theorem qndenserrnbllem
Dummy variables 𝑖 𝑘 𝑞 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 qndenserrnbllem.i . . . 4 (𝜑 → 𝐼 ∈ Fin)
2 inss1 4182 . . . . . 6 (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ⊆ ℚ
3 qex 13081 . . . . . 6 ℚ ∈ V
4 ssexg 5281 . . . . . 6 (((ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ⊆ ℚ ∧ ℚ ∈ V) → (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ∈ V)
52, 3, 4mp2an 705 . . . . 5 (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ∈ V
65a1i 11 . . . 4 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ∈ V)
7 qndenserrnbllem.x . . . . . . . . . . . 12 (𝜑 → 𝑋 ∈ (ℝ ↑m 𝐼))
8 elmapi 8862 . . . . . . . . . . . 12 (𝑋 ∈ (ℝ ↑m 𝐼) → 𝑋:𝐼⟶ℝ)
97, 8syl 18 . . . . . . . . . . 11 (𝜑 → 𝑋:𝐼⟶ℝ)
109adantr 486 . . . . . . . . . 10 ((𝜑 ∧ 𝑘 ∈ 𝐼) → 𝑋:𝐼⟶ℝ)
11 simpr 490 . . . . . . . . . 10 ((𝜑 ∧ 𝑘 ∈ 𝐼) → 𝑘 ∈ 𝐼)
1210, 11ffvelcdmd 7083 . . . . . . . . 9 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (𝑋‘𝑘) ∈ ℝ)
1312rexrd 11352 . . . . . . . 8 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (𝑋‘𝑘) ∈ ℝ*)
14 qndenserrnbllem.e . . . . . . . . . . . . 13 (𝜑 → 𝐸 ∈ ℝ+)
1514rpred 13157 . . . . . . . . . . . 12 (𝜑 → 𝐸 ∈ ℝ)
1615adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ 𝑘 ∈ 𝐼) → 𝐸 ∈ ℝ)
17 ne0i 4287 . . . . . . . . . . . . . . 15 (𝑘 ∈ 𝐼 → 𝐼 ≠ ∅)
1817adantl 487 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑘 ∈ 𝐼) → 𝐼 ≠ ∅)
19 hashnncl 14503 . . . . . . . . . . . . . . . 16 (𝐼 ∈ Fin → ((♯‘𝐼) ∈ ℕ ↔ 𝐼 ≠ ∅))
201, 19syl 18 . . . . . . . . . . . . . . 15 (𝜑 → ((♯‘𝐼) ∈ ℕ ↔ 𝐼 ≠ ∅))
2120adantr 486 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑘 ∈ 𝐼) → ((♯‘𝐼) ∈ ℕ ↔ 𝐼 ≠ ∅))
2218, 21mpbird 260 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (♯‘𝐼) ∈ ℕ)
2322nnred 12343 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (♯‘𝐼) ∈ ℝ)
24 0red 11304 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑘 ∈ 𝐼) → 0 ∈ ℝ)
2522nngt0d 12380 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑘 ∈ 𝐼) → 0 < (♯‘𝐼))
2624, 23, 25ltled 11451 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑘 ∈ 𝐼) → 0 ≤ (♯‘𝐼))
2723, 26resqrtcld 15578 . . . . . . . . . . 11 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (√‘(♯‘𝐼)) ∈ ℝ)
2823, 25elrpd 13154 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (♯‘𝐼) ∈ ℝ+)
2928sqrtgt0d 15573 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑘 ∈ 𝐼) → 0 < (√‘(♯‘𝐼)))
3024, 29gtned 11438 . . . . . . . . . . 11 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (√‘(♯‘𝐼)) ≠ 0)
3116, 27, 30redivcld 12138 . . . . . . . . . 10 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (𝐸 / (√‘(♯‘𝐼))) ∈ ℝ)
3212, 31readdcld 11331 . . . . . . . . 9 ((𝜑 ∧ 𝑘 ∈ 𝐼) → ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))) ∈ ℝ)
3332rexrd 11352 . . . . . . . 8 ((𝜑 ∧ 𝑘 ∈ 𝐼) → ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))) ∈ ℝ*)
3414adantr 486 . . . . . . . . . 10 ((𝜑 ∧ 𝑘 ∈ 𝐼) → 𝐸 ∈ ℝ+)
3527, 29elrpd 13154 . . . . . . . . . 10 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (√‘(♯‘𝐼)) ∈ ℝ+)
3634, 35rpdivcld 13174 . . . . . . . . 9 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (𝐸 / (√‘(♯‘𝐼))) ∈ ℝ+)
3712, 36ltaddrpd 13190 . . . . . . . 8 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (𝑋‘𝑘) < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))
38 qbtwnxr 13323 . . . . . . . 8 (((𝑋‘𝑘) ∈ ℝ* ∧ ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))) ∈ ℝ* ∧ (𝑋‘𝑘) < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))) → ∃𝑞 ∈ ℚ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))
3913, 33, 37, 38syl3anc 1398 . . . . . . 7 ((𝜑 ∧ 𝑘 ∈ 𝐼) → ∃𝑞 ∈ ℚ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))
40 df-rex 3088 . . . . . . 7 (∃𝑞 ∈ ℚ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))) ↔ ∃𝑞(𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))
4139, 40sylib 221 . . . . . 6 ((𝜑 ∧ 𝑘 ∈ 𝐼) → ∃𝑞(𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))
42 simprl 783 . . . . . . . . 9 (((𝜑 ∧ 𝑘 ∈ 𝐼) ∧ (𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → 𝑞 ∈ ℚ)
4313adantr 486 . . . . . . . . . 10 (((𝜑 ∧ 𝑘 ∈ 𝐼) ∧ (𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → (𝑋‘𝑘) ∈ ℝ*)
4433adantr 486 . . . . . . . . . 10 (((𝜑 ∧ 𝑘 ∈ 𝐼) ∧ (𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))) ∈ ℝ*)
45 qre 13073 . . . . . . . . . . 11 (𝑞 ∈ ℚ → 𝑞 ∈ ℝ)
4645ad2antrl 741 . . . . . . . . . 10 (((𝜑 ∧ 𝑘 ∈ 𝐼) ∧ (𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → 𝑞 ∈ ℝ)
47 simprrl 793 . . . . . . . . . 10 (((𝜑 ∧ 𝑘 ∈ 𝐼) ∧ (𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → (𝑋‘𝑘) < 𝑞)
48 simprrr 794 . . . . . . . . . 10 (((𝜑 ∧ 𝑘 ∈ 𝐼) ∧ (𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))
4943, 44, 46, 47, 48eliood 46479 . . . . . . . . 9 (((𝜑 ∧ 𝑘 ∈ 𝐼) ∧ (𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → 𝑞 ∈ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))
5042, 49elind 4146 . . . . . . . 8 (((𝜑 ∧ 𝑘 ∈ 𝐼) ∧ (𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → 𝑞 ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))
5150ex 418 . . . . . . 7 ((𝜑 ∧ 𝑘 ∈ 𝐼) → ((𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) → 𝑞 ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))))
5251eximdv 1950 . . . . . 6 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (∃𝑞(𝑞 ∈ ℚ ∧ ((𝑋‘𝑘) < 𝑞 ∧ 𝑞 < ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) → ∃𝑞 𝑞 ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))))
5341, 52mpd 16 . . . . 5 ((𝜑 ∧ 𝑘 ∈ 𝐼) → ∃𝑞 𝑞 ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))
54 n0 4300 . . . . 5 ((ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ≠ ∅ ↔ ∃𝑞 𝑞 ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))
5553, 54sylibr 237 . . . 4 ((𝜑 ∧ 𝑘 ∈ 𝐼) → (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ≠ ∅)
561, 6, 55choicefi 46183 . . 3 (𝜑 → ∃𝑦(𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))))
572a1i 11 . . . . . . . . . . . 12 (𝑦 Fn 𝐼 → (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ⊆ ℚ)
5857sseld 3930 . . . . . . . . . . 11 (𝑦 Fn 𝐼 → ((𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) → (𝑦‘𝑘) ∈ ℚ))
5958ralimdv 3177 . . . . . . . . . 10 (𝑦 Fn 𝐼 → (∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) → ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ ℚ))
6059imdistani 579 . . . . . . . . 9 ((𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ ℚ))
61 ffnfv 7117 . . . . . . . . 9 (𝑦:𝐼⟶ℚ ↔ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ ℚ))
6260, 61sylibr 237 . . . . . . . 8 ((𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → 𝑦:𝐼⟶ℚ)
6362adantl 487 . . . . . . 7 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → 𝑦:𝐼⟶ℚ)
643a1i 11 . . . . . . . . 9 (𝜑 → ℚ ∈ V)
65 elmapg 8852 . . . . . . . . 9 ((ℚ ∈ V ∧ 𝐼 ∈ Fin) → (𝑦 ∈ (ℚ ↑m 𝐼) ↔ 𝑦:𝐼⟶ℚ))
6664, 1, 65syl2anc 596 . . . . . . . 8 (𝜑 → (𝑦 ∈ (ℚ ↑m 𝐼) ↔ 𝑦:𝐼⟶ℚ))
6766adantr 486 . . . . . . 7 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (𝑦 ∈ (ℚ ↑m 𝐼) ↔ 𝑦:𝐼⟶ℚ))
6863, 67mpbird 260 . . . . . 6 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → 𝑦 ∈ (ℚ ↑m 𝐼))
69 reex 11284 . . . . . . . . . . 11 ℝ ∈ V
7045ssriv 3935 . . . . . . . . . . 11 ℚ ⊆ ℝ
71 mapss 8910 . . . . . . . . . . 11 ((ℝ ∈ V ∧ ℚ ⊆ ℝ) → (ℚ ↑m 𝐼) ⊆ (ℝ ↑m 𝐼))
7269, 70, 71mp2an 705 . . . . . . . . . 10 (ℚ ↑m 𝐼) ⊆ (ℝ ↑m 𝐼)
7372a1i 11 . . . . . . . . 9 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (ℚ ↑m 𝐼) ⊆ (ℝ ↑m 𝐼))
7473, 68sseldd 3932 . . . . . . . 8 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → 𝑦 ∈ (ℝ ↑m 𝐼))
751adantr 486 . . . . . . . . . 10 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → 𝐼 ∈ Fin)
76 qndenserrnbllem.n . . . . . . . . . . 11 (𝜑 → 𝐼 ≠ ∅)
7776adantr 486 . . . . . . . . . 10 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → 𝐼 ≠ ∅)
78 eqid 2761 . . . . . . . . . 10 (♯‘𝐼) = (♯‘𝐼)
797adantr 486 . . . . . . . . . 10 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → 𝑋 ∈ (ℝ ↑m 𝐼))
80 simpll 779 . . . . . . . . . . . 12 (((𝜑 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) ∧ 𝑖 ∈ 𝐼) → 𝜑)
81 fveq2 6883 . . . . . . . . . . . . . . . . . 18 (𝑘 = 𝑖 → (𝑦‘𝑘) = (𝑦‘𝑖))
82 fveq2 6883 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑖 → (𝑋‘𝑘) = (𝑋‘𝑖))
8382oveq1d 7433 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑖 → ((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))) = ((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))
8482, 83oveq12d 7436 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 𝑖 → ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))) = ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))))
8584ineq2d 4166 . . . . . . . . . . . . . . . . . 18 (𝑘 = 𝑖 → (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) = (ℚ ∩ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))))
8681, 85eleq12d 2855 . . . . . . . . . . . . . . . . 17 (𝑘 = 𝑖 → ((𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ↔ (𝑦‘𝑖) ∈ (ℚ ∩ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))))))
8786cbvralvw 3241 . . . . . . . . . . . . . . . 16 (∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ↔ ∀𝑖 ∈ 𝐼 (𝑦‘𝑖) ∈ (ℚ ∩ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))))
8887birani 509 . . . . . . . . . . . . . . 15 ((∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ∧ 𝑖 ∈ 𝐼) → ∀𝑖 ∈ 𝐼 (𝑦‘𝑖) ∈ (ℚ ∩ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))))
89 simpr 490 . . . . . . . . . . . . . . 15 ((∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ∧ 𝑖 ∈ 𝐼) → 𝑖 ∈ 𝐼)
90 rspa 3252 . . . . . . . . . . . . . . 15 ((∀𝑖 ∈ 𝐼 (𝑦‘𝑖) ∈ (ℚ ∩ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))) ∧ 𝑖 ∈ 𝐼) → (𝑦‘𝑖) ∈ (ℚ ∩ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))))
9188, 89, 90syl2anc 596 . . . . . . . . . . . . . 14 ((∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))) ∧ 𝑖 ∈ 𝐼) → (𝑦‘𝑖) ∈ (ℚ ∩ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))))
9291adantll 727 . . . . . . . . . . . . 13 (((𝜑 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) ∧ 𝑖 ∈ 𝐼) → (𝑦‘𝑖) ∈ (ℚ ∩ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))))
93 elinel2 4148 . . . . . . . . . . . . 13 ((𝑦‘𝑖) ∈ (ℚ ∩ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))) → (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))))
9492, 93syl 18 . . . . . . . . . . . 12 (((𝜑 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) ∧ 𝑖 ∈ 𝐼) → (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))))
95 simpr 490 . . . . . . . . . . . 12 (((𝜑 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) ∧ 𝑖 ∈ 𝐼) → 𝑖 ∈ 𝐼)
969ffvelcdmda 7082 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ 𝐼) → (𝑋‘𝑖) ∈ ℝ)
97963adant2 1149 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (𝑋‘𝑖) ∈ ℝ)
98 simp2 1155 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))))
9998elioored 46530 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (𝑦‘𝑖) ∈ ℝ)
10097rexrd 11352 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (𝑋‘𝑖) ∈ ℝ*)
10115adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑖 ∈ 𝐼) → 𝐸 ∈ ℝ)
10276, 20mpbird 260 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → (♯‘𝐼) ∈ ℕ)
103102nnred 12343 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (♯‘𝐼) ∈ ℝ)
104103adantr 486 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑖 ∈ 𝐼) → (♯‘𝐼) ∈ ℝ)
105 0red 11304 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → 0 ∈ ℝ)
106102nngt0d 12380 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → 0 < (♯‘𝐼))
107105, 103, 106ltled 11451 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → 0 ≤ (♯‘𝐼))
108107adantr 486 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑖 ∈ 𝐼) → 0 ≤ (♯‘𝐼))
109104, 108resqrtcld 15578 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑖 ∈ 𝐼) → (√‘(♯‘𝐼)) ∈ ℝ)
110 sqrtgt0 15418 . . . . . . . . . . . . . . . . . . . . . . 23 (((♯‘𝐼) ∈ ℝ ∧ 0 < (♯‘𝐼)) → 0 < (√‘(♯‘𝐼)))
111103, 106, 110syl2anc 596 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → 0 < (√‘(♯‘𝐼)))
112105, 111gtned 11438 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (√‘(♯‘𝐼)) ≠ 0)
113112adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑖 ∈ 𝐼) → (√‘(♯‘𝐼)) ≠ 0)
114101, 109, 113redivcld 12138 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ 𝐼) → (𝐸 / (√‘(♯‘𝐼))) ∈ ℝ)
11596, 114readdcld 11331 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ 𝐼) → ((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))) ∈ ℝ)
116115rexrd 11352 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ 𝐼) → ((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))) ∈ ℝ*)
1171163adant2 1149 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → ((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))) ∈ ℝ*)
118 ioogtlb 46476 . . . . . . . . . . . . . . . 16 (((𝑋‘𝑖) ∈ ℝ* ∧ ((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))) ∈ ℝ* ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))) → (𝑋‘𝑖) < (𝑦‘𝑖))
119100, 117, 98, 118syl3anc 1398 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (𝑋‘𝑖) < (𝑦‘𝑖))
12097, 99, 119ltled 11451 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (𝑋‘𝑖) ≤ (𝑦‘𝑖))
12197, 99, 120abssuble0d 15595 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (abs‘((𝑋‘𝑖) − (𝑦‘𝑖))) = ((𝑦‘𝑖) − (𝑋‘𝑖)))
1221153adant2 1149 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → ((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))) ∈ ℝ)
123 iooltub 46491 . . . . . . . . . . . . . . . 16 (((𝑋‘𝑖) ∈ ℝ* ∧ ((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))) ∈ ℝ* ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))) → (𝑦‘𝑖) < ((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))
124100, 117, 98, 123syl3anc 1398 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (𝑦‘𝑖) < ((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))))
12599, 122, 97, 124ltsub1dd 11921 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → ((𝑦‘𝑖) − (𝑋‘𝑖)) < (((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))) − (𝑋‘𝑖)))
12697recnd 11330 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (𝑋‘𝑖) ∈ ℂ)
127103, 107resqrtcld 15578 . . . . . . . . . . . . . . . . . 18 (𝜑 → (√‘(♯‘𝐼)) ∈ ℝ)
12815, 127, 112redivcld 12138 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐸 / (√‘(♯‘𝐼))) ∈ ℝ)
129128recnd 11330 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐸 / (√‘(♯‘𝐼))) ∈ ℂ)
1301293ad2ant1 1151 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (𝐸 / (√‘(♯‘𝐼))) ∈ ℂ)
131126, 130pncan2d 11664 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼)))) − (𝑋‘𝑖)) = (𝐸 / (√‘(♯‘𝐼))))
132125, 131breqtrd 5131 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → ((𝑦‘𝑖) − (𝑋‘𝑖)) < (𝐸 / (√‘(♯‘𝐼))))
133121, 132eqbrtrd 5127 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑦‘𝑖) ∈ ((𝑋‘𝑖)(,)((𝑋‘𝑖) + (𝐸 / (√‘(♯‘𝐼))))) ∧ 𝑖 ∈ 𝐼) → (abs‘((𝑋‘𝑖) − (𝑦‘𝑖))) < (𝐸 / (√‘(♯‘𝐼))))
13480, 94, 95, 133syl3anc 1398 . . . . . . . . . . 11 (((𝜑 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) ∧ 𝑖 ∈ 𝐼) → (abs‘((𝑋‘𝑖) − (𝑦‘𝑖))) < (𝐸 / (√‘(♯‘𝐼))))
135134adantlrl 733 . . . . . . . . . 10 (((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) ∧ 𝑖 ∈ 𝐼) → (abs‘((𝑋‘𝑖) − (𝑦‘𝑖))) < (𝐸 / (√‘(♯‘𝐼))))
13614adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → 𝐸 ∈ ℝ+)
137103, 106elrpd 13154 . . . . . . . . . . . . 13 (𝜑 → (♯‘𝐼) ∈ ℝ+)
138137adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (♯‘𝐼) ∈ ℝ+)
139138rpsqrtcld 15572 . . . . . . . . . . 11 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (√‘(♯‘𝐼)) ∈ ℝ+)
140136, 139rpdivcld 13174 . . . . . . . . . 10 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (𝐸 / (√‘(♯‘𝐼))) ∈ ℝ+)
141 qndenserrnbllem.d . . . . . . . . . 10 𝐷 = (dist‘(ℝ^‘𝐼))
14275, 77, 78, 79, 74, 135, 140, 141rrndistlt 47269 . . . . . . . . 9 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (𝑋𝐷𝑦) < ((√‘(♯‘𝐼)) · (𝐸 / (√‘(♯‘𝐼)))))
143136rpcnd 13159 . . . . . . . . . 10 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → 𝐸 ∈ ℂ)
144138rpcnd 13159 . . . . . . . . . . 11 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (♯‘𝐼) ∈ ℂ)
145144sqrtcld 15600 . . . . . . . . . 10 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (√‘(♯‘𝐼)) ∈ ℂ)
146139rpne0d 13162 . . . . . . . . . 10 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (√‘(♯‘𝐼)) ≠ 0)
147143, 145, 146divcan2d 12088 . . . . . . . . 9 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → ((√‘(♯‘𝐼)) · (𝐸 / (√‘(♯‘𝐼)))) = 𝐸)
148142, 147breqtrd 5131 . . . . . . . 8 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (𝑋𝐷𝑦) < 𝐸)
14974, 148jca 521 . . . . . . 7 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (𝑦 ∈ (ℝ ↑m 𝐼) ∧ (𝑋𝐷𝑦) < 𝐸))
150141rrxmetfi 25726 . . . . . . . . . . 11 (𝐼 ∈ Fin → 𝐷 ∈ (Met‘(ℝ ↑m 𝐼)))
1511, 150syl 18 . . . . . . . . . 10 (𝜑 → 𝐷 ∈ (Met‘(ℝ ↑m 𝐼)))
152 metxmet 24646 . . . . . . . . . 10 (𝐷 ∈ (Met‘(ℝ ↑m 𝐼)) → 𝐷 ∈ (∞Met‘(ℝ ↑m 𝐼)))
153151, 152syl 18 . . . . . . . . 9 (𝜑 → 𝐷 ∈ (∞Met‘(ℝ ↑m 𝐼)))
15415rexrd 11352 . . . . . . . . 9 (𝜑 → 𝐸 ∈ ℝ*)
155 elbl 24700 . . . . . . . . 9 ((𝐷 ∈ (∞Met‘(ℝ ↑m 𝐼)) ∧ 𝑋 ∈ (ℝ ↑m 𝐼) ∧ 𝐸 ∈ ℝ*) → (𝑦 ∈ (𝑋(ball‘𝐷)𝐸) ↔ (𝑦 ∈ (ℝ ↑m 𝐼) ∧ (𝑋𝐷𝑦) < 𝐸)))
156153, 7, 154, 155syl3anc 1398 . . . . . . . 8 (𝜑 → (𝑦 ∈ (𝑋(ball‘𝐷)𝐸) ↔ (𝑦 ∈ (ℝ ↑m 𝐼) ∧ (𝑋𝐷𝑦) < 𝐸)))
157156adantr 486 . . . . . . 7 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (𝑦 ∈ (𝑋(ball‘𝐷)𝐸) ↔ (𝑦 ∈ (ℝ ↑m 𝐼) ∧ (𝑋𝐷𝑦) < 𝐸)))
158149, 157mpbird 260 . . . . . 6 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → 𝑦 ∈ (𝑋(ball‘𝐷)𝐸))
15968, 158jca 521 . . . . 5 ((𝜑 ∧ (𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼)))))))) → (𝑦 ∈ (ℚ ↑m 𝐼) ∧ 𝑦 ∈ (𝑋(ball‘𝐷)𝐸)))
160159ex 418 . . . 4 (𝜑 → ((𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → (𝑦 ∈ (ℚ ↑m 𝐼) ∧ 𝑦 ∈ (𝑋(ball‘𝐷)𝐸))))
161160eximdv 1950 . . 3 (𝜑 → (∃𝑦(𝑦 Fn 𝐼 ∧ ∀𝑘 ∈ 𝐼 (𝑦‘𝑘) ∈ (ℚ ∩ ((𝑋‘𝑘)(,)((𝑋‘𝑘) + (𝐸 / (√‘(♯‘𝐼))))))) → ∃𝑦(𝑦 ∈ (ℚ ↑m 𝐼) ∧ 𝑦 ∈ (𝑋(ball‘𝐷)𝐸))))
16256, 161mpd 16 . 2 (𝜑 → ∃𝑦(𝑦 ∈ (ℚ ↑m 𝐼) ∧ 𝑦 ∈ (𝑋(ball‘𝐷)𝐸)))
163 df-rex 3088 . 2 (∃𝑦 ∈ (ℚ ↑m 𝐼)𝑦 ∈ (𝑋(ball‘𝐷)𝐸) ↔ ∃𝑦(𝑦 ∈ (ℚ ↑m 𝐼) ∧ 𝑦 ∈ (𝑋(ball‘𝐷)𝐸)))
164162, 163sylibr 237 1 (𝜑 → ∃𝑦 ∈ (ℚ ↑m 𝐼)𝑦 ∈ (𝑋(ball‘𝐷)𝐸))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570  ∃wex 1812   ∈ wcel 2145   ≠ wne 2956  ∀wral 3077  ∃wrex 3087  Vcvv 3451   ∩ cin 3898   ⊆ wss 3899  ∅c0 4279   class class class wbr 5103   Fn wfn 6532  ⟶wf 6533  ‘cfv 6537  (class class class)co 7418   ↑m cmap 8840  Fincfn 8966  ℂcc 11191  ℝcr 11192  0cc0 11193   + caddc 11196   · cmul 11198  ℝ*cxr 11335   < clt 11336   ≤ cle 11337   − cmin 11534   / cdiv 11966  ℕcn 12328  ℚcq 13068  ℝ+crp 13113  (,)cioo 13469  ♯chash 14467  √csqrt 15393  abscabs 15394  distcds 17430  ∞Metcxmet 21656  Metcmet 21657  ballcbl 21658  ℝ^crrx 25697
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-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7749  ax-inf2 9635  ax-cnex 11249  ax-resscn 11250  ax-1cn 11251  ax-icn 11252  ax-addcl 11253  ax-addrcl 11254  ax-mulcl 11255  ax-mulrcl 11256  ax-mulcom 11257  ax-addass 11258  ax-mulass 11259  ax-distr 11260  ax-i2m1 11261  ax-1ne0 11262  ax-1rid 11263  ax-rnegex 11264  ax-rrecex 11265  ax-cnre 11266  ax-pre-lttri 11267  ax-pre-lttrn 11268  ax-pre-ltadd 11269  ax-pre-mulgt0 11270  ax-pre-sup 11271  ax-addf 11272  ax-mulf 11273
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-int 4908  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-se 5605  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 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7375  df-ov 7421  df-oprab 7422  df-mpo 7423  df-of 7691  df-om 7876  df-1st 7999  df-2nd 8000  df-supp 8171  df-tpos 8236  df-frecs 8292  df-wrecs 8323  df-recs 8372  df-rdg 8411  df-1o 8469  df-er 8710  df-map 8842  df-ixp 8919  df-en 8967  df-dom 8968  df-sdom 8969  df-fin 8970  df-fsupp 9347  df-sup 9427  df-inf 9428  df-oi 9497  df-card 10013  df-pnf 11338  df-mnf 11339  df-xr 11340  df-ltxr 11341  df-le 11342  df-sub 11536  df-neg 11537  df-div 11967  df-nn 12329  df-2 12398  df-3 12399  df-4 12400  df-5 12401  df-6 12402  df-7 12403  df-8 12404  df-9 12405  df-n0 12600  df-z 12687  df-dec 12808  df-uz 12959  df-q 13069  df-rp 13114  df-xadd 13235  df-ioo 13473  df-ico 13475  df-fz 13633  df-fzo 13782  df-seq 14138  df-exp 14198  df-hash 14468  df-cj 15259  df-re 15260  df-im 15261  df-sqrt 15395  df-abs 15396  df-clim 15648  df-sum 15847  df-struct 17318  df-sets 17335  df-slot 17353  df-ndx 17365  df-base 17381  df-ress 17402  df-plusg 17434  df-mulr 17435  df-starv 17436  df-sca 17437  df-vsca 17438  df-ip 17439  df-tset 17440  df-ple 17441  df-ds 17443  df-unif 17444  df-hom 17445  df-cco 17446  df-0g 17605  df-gsum 17606  df-prds 17611  df-pws 17613  df-mgm 18809  df-sgrp 18901  df-mnd 18917  df-mhm 18971  df-grp 19140  df-minusg 19141  df-sbg 19142  df-subg 19326  df-ghm 19421  df-cntz 19524  df-cmn 19989  df-abl 19990  df-mgp 20354  df-rng 20368  df-ur 20401  df-ring 20454  df-cring 20455  df-oppr 20560  df-dvdsr 20580  df-unit 20581  df-invr 20611  df-dvr 20624  df-rhm 20695  df-subrng 20791  df-subrg 20815  df-drng 20975  df-field 20976  df-staf 21089  df-srng 21090  df-lmod 21130  df-lss 21200  df-sra 21441  df-rgmod 21442  df-psmet 21663  df-xmet 21664  df-met 21665  df-bl 21666  df-cnfld 21672  df-refld 21904  df-dsmm 22031  df-frlm 22046  df-nm 24894  df-tng 24896  df-tcph 25483  df-rrx 25699
This theorem is used by:  qndenserrnbl  47274
  Copyright terms: Public domain W3C validator