Users' Mathboxes Mathbox for Jeff Madsen < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  rrndstprj2 Structured version   Visualization version   GIF version

Theorem rrndstprj2 38028
Description: Bound on the distance between two points in Euclidean space given bounds on the distances in each coordinate. This theorem and rrndstprj1 38027 can be used to show that the supremum norm and Euclidean norm are equivalent. (Contributed by Jeff Madsen, 2-Sep-2009.) (Revised by Mario Carneiro, 13-Sep-2015.)
Hypotheses
Ref Expression
rrnval.1 𝑋 = (ℝ ↑m 𝐼)
rrndstprj1.1 𝑀 = ((abs ∘ − ) ↾ (ℝ × ℝ))
Assertion
Ref Expression
rrndstprj2 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝐹(ℝn𝐼)𝐺) < (𝑅 · (√‘(♯‘𝐼))))
Distinct variable groups:   𝑛,𝐺   𝑛,𝐼   𝑛,𝑀   𝑅,𝑛   𝑛,𝐹
Allowed substitution hint:   𝑋(𝑛)

Proof of Theorem rrndstprj2
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 simpl1 1192 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐼 ∈ (Fin ∖ {∅}))
21eldifad 3913 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐼 ∈ Fin)
3 simpl2 1193 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐹𝑋)
4 simpl3 1194 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐺𝑋)
5 rrnval.1 . . . 4 𝑋 = (ℝ ↑m 𝐼)
65rrnmval 38025 . . 3 ((𝐼 ∈ Fin ∧ 𝐹𝑋𝐺𝑋) → (𝐹(ℝn𝐼)𝐺) = (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)))
72, 3, 4, 6syl3anc 1373 . 2 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝐹(ℝn𝐼)𝐺) = (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)))
8 eldifsni 4746 . . . . . 6 (𝐼 ∈ (Fin ∖ {∅}) → 𝐼 ≠ ∅)
91, 8syl 17 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐼 ≠ ∅)
103, 5eleqtrdi 2846 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐹 ∈ (ℝ ↑m 𝐼))
11 elmapi 8786 . . . . . . . . 9 (𝐹 ∈ (ℝ ↑m 𝐼) → 𝐹:𝐼⟶ℝ)
1210, 11syl 17 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐹:𝐼⟶ℝ)
1312ffvelcdmda 7029 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (𝐹𝑘) ∈ ℝ)
144, 5eleqtrdi 2846 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐺 ∈ (ℝ ↑m 𝐼))
15 elmapi 8786 . . . . . . . . 9 (𝐺 ∈ (ℝ ↑m 𝐼) → 𝐺:𝐼⟶ℝ)
1614, 15syl 17 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐺:𝐼⟶ℝ)
1716ffvelcdmda 7029 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (𝐺𝑘) ∈ ℝ)
1813, 17resubcld 11565 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘) − (𝐺𝑘)) ∈ ℝ)
1918resqcld 14048 . . . . 5 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
20 simprl 770 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝑅 ∈ ℝ+)
2120rpred 12949 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝑅 ∈ ℝ)
2221resqcld 14048 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅↑2) ∈ ℝ)
2322adantr 480 . . . . 5 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (𝑅↑2) ∈ ℝ)
24 absresq 15225 . . . . . . 7 (((𝐹𝑘) − (𝐺𝑘)) ∈ ℝ → ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) = (((𝐹𝑘) − (𝐺𝑘))↑2))
2518, 24syl 17 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) = (((𝐹𝑘) − (𝐺𝑘))↑2))
26 rrndstprj1.1 . . . . . . . . . 10 𝑀 = ((abs ∘ − ) ↾ (ℝ × ℝ))
2726remetdval 24733 . . . . . . . . 9 (((𝐹𝑘) ∈ ℝ ∧ (𝐺𝑘) ∈ ℝ) → ((𝐹𝑘)𝑀(𝐺𝑘)) = (abs‘((𝐹𝑘) − (𝐺𝑘))))
2813, 17, 27syl2anc 584 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘)𝑀(𝐺𝑘)) = (abs‘((𝐹𝑘) − (𝐺𝑘))))
29 simprr 772 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)
30 fveq2 6834 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (𝐹𝑛) = (𝐹𝑘))
31 fveq2 6834 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (𝐺𝑛) = (𝐺𝑘))
3230, 31oveq12d 7376 . . . . . . . . . . 11 (𝑛 = 𝑘 → ((𝐹𝑛)𝑀(𝐺𝑛)) = ((𝐹𝑘)𝑀(𝐺𝑘)))
3332breq1d 5108 . . . . . . . . . 10 (𝑛 = 𝑘 → (((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅 ↔ ((𝐹𝑘)𝑀(𝐺𝑘)) < 𝑅))
3433rspccva 3575 . . . . . . . . 9 ((∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅𝑘𝐼) → ((𝐹𝑘)𝑀(𝐺𝑘)) < 𝑅)
3529, 34sylan 580 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘)𝑀(𝐺𝑘)) < 𝑅)
3628, 35eqbrtrrd 5122 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (abs‘((𝐹𝑘) − (𝐺𝑘))) < 𝑅)
3718recnd 11160 . . . . . . . . 9 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘) − (𝐺𝑘)) ∈ ℂ)
3837abscld 15362 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (abs‘((𝐹𝑘) − (𝐺𝑘))) ∈ ℝ)
3921adantr 480 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 𝑅 ∈ ℝ)
4037absge0d 15370 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 0 ≤ (abs‘((𝐹𝑘) − (𝐺𝑘))))
4120rpge0d 12953 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ 𝑅)
4241adantr 480 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 0 ≤ 𝑅)
4338, 39, 40, 42lt2sqd 14179 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((abs‘((𝐹𝑘) − (𝐺𝑘))) < 𝑅 ↔ ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) < (𝑅↑2)))
4436, 43mpbid 232 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) < (𝑅↑2))
4525, 44eqbrtrrd 5122 . . . . 5 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (((𝐹𝑘) − (𝐺𝑘))↑2) < (𝑅↑2))
462, 9, 19, 23, 45fsumlt 15723 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2) < Σ𝑘𝐼 (𝑅↑2))
472, 19fsumrecl 15657 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
4818sqge0d 14060 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 0 ≤ (((𝐹𝑘) − (𝐺𝑘))↑2))
492, 19, 48fsumge0 15718 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))
50 resqrtth 15178 . . . . 5 ((Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ ∧ 0 ≤ Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) = Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))
5147, 49, 50syl2anc 584 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) = Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))
52 hashnncl 14289 . . . . . . . . . . . 12 (𝐼 ∈ Fin → ((♯‘𝐼) ∈ ℕ ↔ 𝐼 ≠ ∅))
532, 52syl 17 . . . . . . . . . . 11 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((♯‘𝐼) ∈ ℕ ↔ 𝐼 ≠ ∅))
549, 53mpbird 257 . . . . . . . . . 10 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℕ)
5554nnrpd 12947 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℝ+)
5655rpred 12949 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℝ)
5755rpge0d 12953 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ (♯‘𝐼))
58 resqrtth 15178 . . . . . . . 8 (((♯‘𝐼) ∈ ℝ ∧ 0 ≤ (♯‘𝐼)) → ((√‘(♯‘𝐼))↑2) = (♯‘𝐼))
5956, 57, 58syl2anc 584 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘(♯‘𝐼))↑2) = (♯‘𝐼))
6059oveq2d 7374 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅↑2) · ((√‘(♯‘𝐼))↑2)) = ((𝑅↑2) · (♯‘𝐼)))
6122recnd 11160 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅↑2) ∈ ℂ)
6255rpcnd 12951 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℂ)
6361, 62mulcomd 11153 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅↑2) · (♯‘𝐼)) = ((♯‘𝐼) · (𝑅↑2)))
6460, 63eqtrd 2771 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅↑2) · ((√‘(♯‘𝐼))↑2)) = ((♯‘𝐼) · (𝑅↑2)))
6520rpcnd 12951 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝑅 ∈ ℂ)
6655rpsqrtcld 15335 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘(♯‘𝐼)) ∈ ℝ+)
6766rpcnd 12951 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘(♯‘𝐼)) ∈ ℂ)
6865, 67sqmuld 14081 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅 · (√‘(♯‘𝐼)))↑2) = ((𝑅↑2) · ((√‘(♯‘𝐼))↑2)))
69 fsumconst 15713 . . . . . 6 ((𝐼 ∈ Fin ∧ (𝑅↑2) ∈ ℂ) → Σ𝑘𝐼 (𝑅↑2) = ((♯‘𝐼) · (𝑅↑2)))
702, 61, 69syl2anc 584 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → Σ𝑘𝐼 (𝑅↑2) = ((♯‘𝐼) · (𝑅↑2)))
7164, 68, 703eqtr4d 2781 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅 · (√‘(♯‘𝐼)))↑2) = Σ𝑘𝐼 (𝑅↑2))
7246, 51, 713brtr4d 5130 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) < ((𝑅 · (√‘(♯‘𝐼)))↑2))
7347, 49resqrtcld 15341 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) ∈ ℝ)
7420, 66rpmulcld 12965 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅 · (√‘(♯‘𝐼))) ∈ ℝ+)
7574rpred 12949 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅 · (√‘(♯‘𝐼))) ∈ ℝ)
7647, 49sqrtge0d 15344 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)))
7774rpge0d 12953 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ (𝑅 · (√‘(♯‘𝐼))))
7873, 75, 76, 77lt2sqd 14179 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) < (𝑅 · (√‘(♯‘𝐼))) ↔ ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) < ((𝑅 · (√‘(♯‘𝐼)))↑2)))
7972, 78mpbird 257 . 2 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) < (𝑅 · (√‘(♯‘𝐼))))
807, 79eqbrtrd 5120 1 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝐹(ℝn𝐼)𝐺) < (𝑅 · (√‘(♯‘𝐼))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1541  wcel 2113  wne 2932  wral 3051  cdif 3898  c0 4285  {csn 4580   class class class wbr 5098   × cxp 5622  cres 5626  ccom 5628  wf 6488  cfv 6492  (class class class)co 7358  m cmap 8763  Fincfn 8883  cc 11024  cr 11025  0cc0 11026   · cmul 11031   < clt 11166  cle 11167  cmin 11364  cn 12145  2c2 12200  +crp 12905  cexp 13984  chash 14253  csqrt 15156  abscabs 15157  Σcsu 15609  ncrrn 38022
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-rep 5224  ax-sep 5241  ax-nul 5251  ax-pow 5310  ax-pr 5377  ax-un 7680  ax-inf2 9550  ax-cnex 11082  ax-resscn 11083  ax-1cn 11084  ax-icn 11085  ax-addcl 11086  ax-addrcl 11087  ax-mulcl 11088  ax-mulrcl 11089  ax-mulcom 11090  ax-addass 11091  ax-mulass 11092  ax-distr 11093  ax-i2m1 11094  ax-1ne0 11095  ax-1rid 11096  ax-rnegex 11097  ax-rrecex 11098  ax-cnre 11099  ax-pre-lttri 11100  ax-pre-lttrn 11101  ax-pre-ltadd 11102  ax-pre-mulgt0 11103  ax-pre-sup 11104
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3350  df-reu 3351  df-rab 3400  df-v 3442  df-sbc 3741  df-csb 3850  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-pss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-op 4587  df-uni 4864  df-int 4903  df-iun 4948  df-br 5099  df-opab 5161  df-mpt 5180  df-tr 5206  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-om 7809  df-1st 7933  df-2nd 7934  df-frecs 8223  df-wrecs 8254  df-recs 8303  df-rdg 8341  df-1o 8397  df-er 8635  df-map 8765  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-sup 9345  df-oi 9415  df-card 9851  df-pnf 11168  df-mnf 11169  df-xr 11170  df-ltxr 11171  df-le 11172  df-sub 11366  df-neg 11367  df-div 11795  df-nn 12146  df-2 12208  df-3 12209  df-n0 12402  df-z 12489  df-uz 12752  df-rp 12906  df-ico 13267  df-fz 13424  df-fzo 13571  df-seq 13925  df-exp 13985  df-hash 14254  df-cj 15022  df-re 15023  df-im 15024  df-sqrt 15158  df-abs 15159  df-clim 15411  df-sum 15610  df-rrn 38023
This theorem is referenced by:  rrncmslem  38029  rrnequiv  38032
  Copyright terms: Public domain W3C validator