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

Theorem hoiqssbllem3 44162
Description: A n-dimensional ball contains a nonempty half-open interval with vertices with rational components. (Contributed by Glauco Siliprandi, 24-Dec-2020.)
Hypotheses
Ref Expression
hoiqssbllem3.x (𝜑𝑋 ∈ Fin)
hoiqssbllem3.n (𝜑𝑋 ≠ ∅)
hoiqssbllem3.y (𝜑𝑌 ∈ (ℝ ↑m 𝑋))
hoiqssbllem3.e (𝜑𝐸 ∈ ℝ+)
Assertion
Ref Expression
hoiqssbllem3 (𝜑 → ∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸)))
Distinct variable groups:   𝐸,𝑐,𝑑,𝑖   𝑋,𝑐,𝑑,𝑖   𝑌,𝑐,𝑑,𝑖   𝜑,𝑐,𝑑,𝑖

Proof of Theorem hoiqssbllem3
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 hoiqssbllem3.x . . . . . . 7 (𝜑𝑋 ∈ Fin)
2 qex 12701 . . . . . . . . 9 ℚ ∈ V
32inex1 5241 . . . . . . . 8 (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∈ V
43a1i 11 . . . . . . 7 ((𝜑𝑖𝑋) → (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∈ V)
5 hoiqssbllem3.y . . . . . . . . . . . . 13 (𝜑𝑌 ∈ (ℝ ↑m 𝑋))
6 elmapi 8637 . . . . . . . . . . . . 13 (𝑌 ∈ (ℝ ↑m 𝑋) → 𝑌:𝑋⟶ℝ)
75, 6syl 17 . . . . . . . . . . . 12 (𝜑𝑌:𝑋⟶ℝ)
87ffvelrnda 6961 . . . . . . . . . . 11 ((𝜑𝑖𝑋) → (𝑌𝑖) ∈ ℝ)
9 hoiqssbllem3.e . . . . . . . . . . . . 13 (𝜑𝐸 ∈ ℝ+)
10 2rp 12735 . . . . . . . . . . . . . . 15 2 ∈ ℝ+
1110a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 2 ∈ ℝ+)
12 hoiqssbllem3.n . . . . . . . . . . . . . . . . 17 (𝜑𝑋 ≠ ∅)
13 hashnncl 14081 . . . . . . . . . . . . . . . . . 18 (𝑋 ∈ Fin → ((♯‘𝑋) ∈ ℕ ↔ 𝑋 ≠ ∅))
141, 13syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → ((♯‘𝑋) ∈ ℕ ↔ 𝑋 ≠ ∅))
1512, 14mpbird 256 . . . . . . . . . . . . . . . 16 (𝜑 → (♯‘𝑋) ∈ ℕ)
16 nnrp 12741 . . . . . . . . . . . . . . . 16 ((♯‘𝑋) ∈ ℕ → (♯‘𝑋) ∈ ℝ+)
1715, 16syl 17 . . . . . . . . . . . . . . 15 (𝜑 → (♯‘𝑋) ∈ ℝ+)
1817rpsqrtcld 15123 . . . . . . . . . . . . . 14 (𝜑 → (√‘(♯‘𝑋)) ∈ ℝ+)
1911, 18rpmulcld 12788 . . . . . . . . . . . . 13 (𝜑 → (2 · (√‘(♯‘𝑋))) ∈ ℝ+)
209, 19rpdivcld 12789 . . . . . . . . . . . 12 (𝜑 → (𝐸 / (2 · (√‘(♯‘𝑋)))) ∈ ℝ+)
2120adantr 481 . . . . . . . . . . 11 ((𝜑𝑖𝑋) → (𝐸 / (2 · (√‘(♯‘𝑋)))) ∈ ℝ+)
228, 21ltsubrpd 12804 . . . . . . . . . 10 ((𝜑𝑖𝑋) → ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))) < (𝑌𝑖))
2321rpred 12772 . . . . . . . . . . . 12 ((𝜑𝑖𝑋) → (𝐸 / (2 · (√‘(♯‘𝑋)))) ∈ ℝ)
248, 23resubcld 11403 . . . . . . . . . . 11 ((𝜑𝑖𝑋) → ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))) ∈ ℝ)
2524, 8ltnled 11122 . . . . . . . . . 10 ((𝜑𝑖𝑋) → (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))) < (𝑌𝑖) ↔ ¬ (𝑌𝑖) ≤ ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))))
2622, 25mpbid 231 . . . . . . . . 9 ((𝜑𝑖𝑋) → ¬ (𝑌𝑖) ≤ ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))))
2724rexrd 11025 . . . . . . . . . 10 ((𝜑𝑖𝑋) → ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))) ∈ ℝ*)
288rexrd 11025 . . . . . . . . . 10 ((𝜑𝑖𝑋) → (𝑌𝑖) ∈ ℝ*)
2927, 28qinioo 43073 . . . . . . . . 9 ((𝜑𝑖𝑋) → ((ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) = ∅ ↔ (𝑌𝑖) ≤ ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))))
3026, 29mtbird 325 . . . . . . . 8 ((𝜑𝑖𝑋) → ¬ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) = ∅)
3130neqned 2950 . . . . . . 7 ((𝜑𝑖𝑋) → (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ≠ ∅)
321, 4, 31choicefi 42740 . . . . . 6 (𝜑 → ∃𝑐(𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))))
33 simpl 483 . . . . . . . . . . . . 13 ((𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))) → 𝑐 Fn 𝑋)
34 nfra1 3144 . . . . . . . . . . . . . . 15 𝑖𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
35 rspa 3132 . . . . . . . . . . . . . . . . 17 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))
36 elinel1 4129 . . . . . . . . . . . . . . . . 17 ((𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) → (𝑐𝑖) ∈ ℚ)
3735, 36syl 17 . . . . . . . . . . . . . . . 16 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ ℚ)
3837ex 413 . . . . . . . . . . . . . . 15 (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) → (𝑖𝑋 → (𝑐𝑖) ∈ ℚ))
3934, 38ralrimi 3141 . . . . . . . . . . . . . 14 (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) → ∀𝑖𝑋 (𝑐𝑖) ∈ ℚ)
4039adantl 482 . . . . . . . . . . . . 13 ((𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))) → ∀𝑖𝑋 (𝑐𝑖) ∈ ℚ)
4133, 40jca 512 . . . . . . . . . . . 12 ((𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))) → (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ ℚ))
4241adantl 482 . . . . . . . . . . 11 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ ℚ))
43 ffnfv 6992 . . . . . . . . . . 11 (𝑐:𝑋⟶ℚ ↔ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ ℚ))
4442, 43sylibr 233 . . . . . . . . . 10 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → 𝑐:𝑋⟶ℚ)
452a1i 11 . . . . . . . . . . . 12 (𝜑 → ℚ ∈ V)
46 elmapg 8628 . . . . . . . . . . . 12 ((ℚ ∈ V ∧ 𝑋 ∈ Fin) → (𝑐 ∈ (ℚ ↑m 𝑋) ↔ 𝑐:𝑋⟶ℚ))
4745, 1, 46syl2anc 584 . . . . . . . . . . 11 (𝜑 → (𝑐 ∈ (ℚ ↑m 𝑋) ↔ 𝑐:𝑋⟶ℚ))
4847adantr 481 . . . . . . . . . 10 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → (𝑐 ∈ (ℚ ↑m 𝑋) ↔ 𝑐:𝑋⟶ℚ))
4944, 48mpbird 256 . . . . . . . . 9 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → 𝑐 ∈ (ℚ ↑m 𝑋))
50 simprr 770 . . . . . . . . 9 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))
5149, 50jca 512 . . . . . . . 8 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → (𝑐 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))))
5251ex 413 . . . . . . 7 (𝜑 → ((𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))) → (𝑐 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))))
5352eximdv 1920 . . . . . 6 (𝜑 → (∃𝑐(𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))) → ∃𝑐(𝑐 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))))
5432, 53mpd 15 . . . . 5 (𝜑 → ∃𝑐(𝑐 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))))
55 df-rex 3070 . . . . 5 (∃𝑐 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ↔ ∃𝑐(𝑐 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))))
5654, 55sylibr 233 . . . 4 (𝜑 → ∃𝑐 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))
572inex1 5241 . . . . . . . 8 (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∈ V
5857a1i 11 . . . . . . 7 ((𝜑𝑖𝑋) → (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∈ V)
598, 21ltaddrpd 12805 . . . . . . . . . 10 ((𝜑𝑖𝑋) → (𝑌𝑖) < ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))
608, 23readdcld 11004 . . . . . . . . . . 11 ((𝜑𝑖𝑋) → ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ∈ ℝ)
618, 60ltnled 11122 . . . . . . . . . 10 ((𝜑𝑖𝑋) → ((𝑌𝑖) < ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ↔ ¬ ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ≤ (𝑌𝑖)))
6259, 61mpbid 231 . . . . . . . . 9 ((𝜑𝑖𝑋) → ¬ ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ≤ (𝑌𝑖))
6360rexrd 11025 . . . . . . . . . 10 ((𝜑𝑖𝑋) → ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ∈ ℝ*)
6428, 63qinioo 43073 . . . . . . . . 9 ((𝜑𝑖𝑋) → ((ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) = ∅ ↔ ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ≤ (𝑌𝑖)))
6562, 64mtbird 325 . . . . . . . 8 ((𝜑𝑖𝑋) → ¬ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) = ∅)
6665neqned 2950 . . . . . . 7 ((𝜑𝑖𝑋) → (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ≠ ∅)
671, 58, 66choicefi 42740 . . . . . 6 (𝜑 → ∃𝑑(𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
68 simpl 483 . . . . . . . . . . . . 13 ((𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → 𝑑 Fn 𝑋)
69 nfra1 3144 . . . . . . . . . . . . . . 15 𝑖𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
70 rspa 3132 . . . . . . . . . . . . . . . . 17 ((∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
71 elinel1 4129 . . . . . . . . . . . . . . . . 17 ((𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) → (𝑑𝑖) ∈ ℚ)
7270, 71syl 17 . . . . . . . . . . . . . . . 16 ((∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ℚ)
7372ex 413 . . . . . . . . . . . . . . 15 (∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) → (𝑖𝑋 → (𝑑𝑖) ∈ ℚ))
7469, 73ralrimi 3141 . . . . . . . . . . . . . 14 (∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) → ∀𝑖𝑋 (𝑑𝑖) ∈ ℚ)
7574adantl 482 . . . . . . . . . . . . 13 ((𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∀𝑖𝑋 (𝑑𝑖) ∈ ℚ)
7668, 75jca 512 . . . . . . . . . . . 12 ((𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ ℚ))
7776adantl 482 . . . . . . . . . . 11 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ ℚ))
78 ffnfv 6992 . . . . . . . . . . 11 (𝑑:𝑋⟶ℚ ↔ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ ℚ))
7977, 78sylibr 233 . . . . . . . . . 10 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑑:𝑋⟶ℚ)
80 elmapg 8628 . . . . . . . . . . . 12 ((ℚ ∈ V ∧ 𝑋 ∈ Fin) → (𝑑 ∈ (ℚ ↑m 𝑋) ↔ 𝑑:𝑋⟶ℚ))
8145, 1, 80syl2anc 584 . . . . . . . . . . 11 (𝜑 → (𝑑 ∈ (ℚ ↑m 𝑋) ↔ 𝑑:𝑋⟶ℚ))
8281adantr 481 . . . . . . . . . 10 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → (𝑑 ∈ (ℚ ↑m 𝑋) ↔ 𝑑:𝑋⟶ℚ))
8379, 82mpbird 256 . . . . . . . . 9 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑑 ∈ (ℚ ↑m 𝑋))
84 simprr 770 . . . . . . . . 9 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
8583, 84jca 512 . . . . . . . 8 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → (𝑑 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
8685ex 413 . . . . . . 7 (𝜑 → ((𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → (𝑑 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))))
8786eximdv 1920 . . . . . 6 (𝜑 → (∃𝑑(𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∃𝑑(𝑑 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))))
8867, 87mpd 15 . . . . 5 (𝜑 → ∃𝑑(𝑑 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
89 df-rex 3070 . . . . 5 (∃𝑑 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ↔ ∃𝑑(𝑑 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
9088, 89sylibr 233 . . . 4 (𝜑 → ∃𝑑 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
9156, 90jca 512 . . 3 (𝜑 → (∃𝑐 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∃𝑑 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
92 reeanv 3294 . . 3 (∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) ↔ (∃𝑐 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∃𝑑 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
9391, 92sylibr 233 . 2 (𝜑 → ∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
94 nfv 1917 . . . . . . . 8 𝑖((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋))
9534, 69nfan 1902 . . . . . . . 8 𝑖(∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
9694, 95nfan 1902 . . . . . . 7 𝑖(((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
971ad3antrrr 727 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑋 ∈ Fin)
9812ad3antrrr 727 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑋 ≠ ∅)
995ad3antrrr 727 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑌 ∈ (ℝ ↑m 𝑋))
100 elmapi 8637 . . . . . . . . . 10 (𝑐 ∈ (ℚ ↑m 𝑋) → 𝑐:𝑋⟶ℚ)
101 qssre 12699 . . . . . . . . . . 11 ℚ ⊆ ℝ
102101a1i 11 . . . . . . . . . 10 (𝑐 ∈ (ℚ ↑m 𝑋) → ℚ ⊆ ℝ)
103100, 102fssd 6618 . . . . . . . . 9 (𝑐 ∈ (ℚ ↑m 𝑋) → 𝑐:𝑋⟶ℝ)
104103adantl 482 . . . . . . . 8 ((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) → 𝑐:𝑋⟶ℝ)
105104ad2antrr 723 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑐:𝑋⟶ℝ)
106 elmapi 8637 . . . . . . . . 9 (𝑑 ∈ (ℚ ↑m 𝑋) → 𝑑:𝑋⟶ℚ)
107101a1i 11 . . . . . . . . 9 (𝑑 ∈ (ℚ ↑m 𝑋) → ℚ ⊆ ℝ)
108106, 107fssd 6618 . . . . . . . 8 (𝑑 ∈ (ℚ ↑m 𝑋) → 𝑑:𝑋⟶ℝ)
109108ad2antlr 724 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑑:𝑋⟶ℝ)
1109ad3antrrr 727 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝐸 ∈ ℝ+)
11135elin2d 4133 . . . . . . . . 9 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
112111adantlr 712 . . . . . . . 8 (((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
113112adantll 711 . . . . . . 7 (((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
11470elin2d 4133 . . . . . . . . 9 ((∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
115114adantll 711 . . . . . . . 8 (((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
116115adantll 711 . . . . . . 7 (((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
11796, 97, 98, 99, 105, 109, 110, 113, 116hoiqssbllem1 44160 . . . . . 6 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)))
118 simpl 483 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → ((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)))
119 fveq2 6774 . . . . . . . . . . . . 13 (𝑖 = 𝑘 → (𝑐𝑖) = (𝑐𝑘))
120 fveq2 6774 . . . . . . . . . . . . . . . 16 (𝑖 = 𝑘 → (𝑌𝑖) = (𝑌𝑘))
121120oveq1d 7290 . . . . . . . . . . . . . . 15 (𝑖 = 𝑘 → ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))) = ((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋))))))
122121, 120oveq12d 7293 . . . . . . . . . . . . . 14 (𝑖 = 𝑘 → (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)) = (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘)))
123122ineq2d 4146 . . . . . . . . . . . . 13 (𝑖 = 𝑘 → (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) = (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))))
124119, 123eleq12d 2833 . . . . . . . . . . . 12 (𝑖 = 𝑘 → ((𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ↔ (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘)))))
125124cbvralvw 3383 . . . . . . . . . . 11 (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ↔ ∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))))
126125biimpi 215 . . . . . . . . . 10 (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) → ∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))))
127126adantr 481 . . . . . . . . 9 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))))
128 fveq2 6774 . . . . . . . . . . . . 13 (𝑖 = 𝑘 → (𝑑𝑖) = (𝑑𝑘))
129120oveq1d 7290 . . . . . . . . . . . . . . 15 (𝑖 = 𝑘 → ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) = ((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))
130120, 129oveq12d 7293 . . . . . . . . . . . . . 14 (𝑖 = 𝑘 → ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))) = ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
131130ineq2d 4146 . . . . . . . . . . . . 13 (𝑖 = 𝑘 → (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) = (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
132128, 131eleq12d 2833 . . . . . . . . . . . 12 (𝑖 = 𝑘 → ((𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ↔ (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
133132cbvralvw 3383 . . . . . . . . . . 11 (∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ↔ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
134133biimpi 215 . . . . . . . . . 10 (∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) → ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
135134adantl 482 . . . . . . . . 9 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
136127, 135jca 512 . . . . . . . 8 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
137136adantl 482 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
138 nfv 1917 . . . . . . . 8 𝑖(((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
1391ad3antrrr 727 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑋 ∈ Fin)
14012ad3antrrr 727 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑋 ≠ ∅)
1415ad3antrrr 727 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑌 ∈ (ℝ ↑m 𝑋))
142104ad2antrr 723 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑐:𝑋⟶ℝ)
143108ad2antlr 724 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑑:𝑋⟶ℝ)
1449ad3antrrr 727 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝐸 ∈ ℝ+)
145125, 111sylanbr 582 . . . . . . . . . 10 ((∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
146145adantlr 712 . . . . . . . . 9 (((∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
147146adantll 711 . . . . . . . 8 (((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
148133, 114sylanbr 582 . . . . . . . . . 10 ((∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
149148adantll 711 . . . . . . . . 9 (((∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
150149adantll 711 . . . . . . . 8 (((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
151138, 139, 140, 141, 142, 143, 144, 147, 150hoiqssbllem2 44161 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸))
152118, 137, 151syl2anc 584 . . . . . 6 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸))
153117, 152jca 512 . . . . 5 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → (𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸)))
154153ex 413 . . . 4 (((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) → ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → (𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸))))
155154reximdva 3203 . . 3 ((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) → (∃𝑑 ∈ (ℚ ↑m 𝑋)(∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∃𝑑 ∈ (ℚ ↑m 𝑋)(𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸))))
156155reximdva 3203 . 2 (𝜑 → (∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸))))
15793, 156mpd 15 1 (𝜑 → ∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396   = wceq 1539  wex 1782  wcel 2106  wne 2943  wral 3064  wrex 3065  Vcvv 3432  cin 3886  wss 3887  c0 4256   class class class wbr 5074   Fn wfn 6428  wf 6429  cfv 6433  (class class class)co 7275  m cmap 8615  Xcixp 8685  Fincfn 8733  cr 10870   + caddc 10874   · cmul 10876   < clt 11009  cle 11010  cmin 11205   / cdiv 11632  cn 11973  2c2 12028  cq 12688  +crp 12730  (,)cioo 13079  [,)cico 13081  chash 14044  csqrt 14944  distcds 16971  ballcbl 20584  ℝ^crrx 24547
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  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 2709  ax-rep 5209  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588  ax-inf2 9399  ax-cnex 10927  ax-resscn 10928  ax-1cn 10929  ax-icn 10930  ax-addcl 10931  ax-addrcl 10932  ax-mulcl 10933  ax-mulrcl 10934  ax-mulcom 10935  ax-addass 10936  ax-mulass 10937  ax-distr 10938  ax-i2m1 10939  ax-1ne0 10940  ax-1rid 10941  ax-rnegex 10942  ax-rrecex 10943  ax-cnre 10944  ax-pre-lttri 10945  ax-pre-lttrn 10946  ax-pre-ltadd 10947  ax-pre-mulgt0 10948  ax-pre-sup 10949  ax-addf 10950  ax-mulf 10951
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3069  df-rex 3070  df-rmo 3071  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-tp 4566  df-op 4568  df-uni 4840  df-int 4880  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-se 5545  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-pred 6202  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-isom 6442  df-riota 7232  df-ov 7278  df-oprab 7279  df-mpo 7280  df-of 7533  df-om 7713  df-1st 7831  df-2nd 7832  df-supp 7978  df-tpos 8042  df-frecs 8097  df-wrecs 8128  df-recs 8202  df-rdg 8241  df-1o 8297  df-er 8498  df-map 8617  df-ixp 8686  df-en 8734  df-dom 8735  df-sdom 8736  df-fin 8737  df-fsupp 9129  df-sup 9201  df-inf 9202  df-oi 9269  df-card 9697  df-pnf 11011  df-mnf 11012  df-xr 11013  df-ltxr 11014  df-le 11015  df-sub 11207  df-neg 11208  df-div 11633  df-nn 11974  df-2 12036  df-3 12037  df-4 12038  df-5 12039  df-6 12040  df-7 12041  df-8 12042  df-9 12043  df-n0 12234  df-z 12320  df-dec 12438  df-uz 12583  df-q 12689  df-rp 12731  df-xadd 12849  df-ioo 13083  df-ico 13085  df-fz 13240  df-fzo 13383  df-seq 13722  df-exp 13783  df-hash 14045  df-cj 14810  df-re 14811  df-im 14812  df-sqrt 14946  df-abs 14947  df-clim 15197  df-sum 15398  df-struct 16848  df-sets 16865  df-slot 16883  df-ndx 16895  df-base 16913  df-ress 16942  df-plusg 16975  df-mulr 16976  df-starv 16977  df-sca 16978  df-vsca 16979  df-ip 16980  df-tset 16981  df-ple 16982  df-ds 16984  df-unif 16985  df-hom 16986  df-cco 16987  df-0g 17152  df-gsum 17153  df-prds 17158  df-pws 17160  df-mgm 18326  df-sgrp 18375  df-mnd 18386  df-mhm 18430  df-grp 18580  df-minusg 18581  df-sbg 18582  df-subg 18752  df-ghm 18832  df-cntz 18923  df-cmn 19388  df-abl 19389  df-mgp 19721  df-ur 19738  df-ring 19785  df-cring 19786  df-oppr 19862  df-dvdsr 19883  df-unit 19884  df-invr 19914  df-dvr 19925  df-rnghom 19959  df-drng 19993  df-field 19994  df-subrg 20022  df-staf 20105  df-srng 20106  df-lmod 20125  df-lss 20194  df-sra 20434  df-rgmod 20435  df-psmet 20589  df-xmet 20590  df-met 20591  df-bl 20592  df-cnfld 20598  df-refld 20810  df-dsmm 20939  df-frlm 20954  df-nm 23738  df-tng 23740  df-tcph 24333  df-rrx 24549
This theorem is referenced by:  hoiqssbl  44163
  Copyright terms: Public domain W3C validator