rrxmval - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > rrxmval		Structured version Visualization version GIF version

Theorem rrxmval 24806

Description: The value of the Euclidean metric. Compare with rrnmval 36360. (Contributed by Thierry Arnoux, 30-Jun-2019.)

**Hypotheses**
Ref	Expression
rrxmval.1	⊢ 𝑋 = {ℎ ∈ (ℝ ↑_m 𝐼) ∣ ℎ finSupp 0}
rrxmval.d	⊢ 𝐷 = (dist‘(ℝ^‘𝐼))

**Assertion**
Ref	Expression
rrxmval	⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐹𝐷𝐺) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2)))

Distinct variable groups: ℎ,𝐹,𝑘 ℎ,𝐺,𝑘 ℎ,𝐼,𝑘 ℎ,𝑉,𝑘 𝑘,𝑋 Allowed substitution hints: 𝐷(ℎ,𝑘) 𝑋(ℎ)

Proof of Theorem rrxmval Dummy variables 𝑓 𝑔 𝑥 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		rrxmval.d	. . . . 5 ⊢ 𝐷 = (dist‘(ℝ^‘𝐼))
2		eqid 2731	. . . . . 6 ⊢ (ℝ^‘𝐼) = (ℝ^‘𝐼)
3		eqid 2731	. . . . . 6 ⊢ (Base‘(ℝ^‘𝐼)) = (Base‘(ℝ^‘𝐼))
4	2, 3	rrxds 24794	. . . . 5 ⊢ (𝐼 ∈ 𝑉 → (𝑓 ∈ (Base‘(ℝ^‘𝐼)), 𝑔 ∈ (Base‘(ℝ^‘𝐼)) ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))) = (dist‘(ℝ^‘𝐼)))
5	1, 4	eqtr4id 2790	. . . 4 ⊢ (𝐼 ∈ 𝑉 → 𝐷 = (𝑓 ∈ (Base‘(ℝ^‘𝐼)), 𝑔 ∈ (Base‘(ℝ^‘𝐼)) ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
6		rrxmval.1	. . . . . 6 ⊢ 𝑋 = {ℎ ∈ (ℝ ↑_m 𝐼) ∣ ℎ finSupp 0}
7	2, 3	rrxbase 24789	. . . . . 6 ⊢ (𝐼 ∈ 𝑉 → (Base‘(ℝ^‘𝐼)) = {ℎ ∈ (ℝ ↑_m 𝐼) ∣ ℎ finSupp 0})
8	6, 7	eqtr4id 2790	. . . . 5 ⊢ (𝐼 ∈ 𝑉 → 𝑋 = (Base‘(ℝ^‘𝐼)))
9		mpoeq12 7435	. . . . 5 ⊢ ((𝑋 = (Base‘(ℝ^‘𝐼)) ∧ 𝑋 = (Base‘(ℝ^‘𝐼))) → (𝑓 ∈ 𝑋, 𝑔 ∈ 𝑋 ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))) = (𝑓 ∈ (Base‘(ℝ^‘𝐼)), 𝑔 ∈ (Base‘(ℝ^‘𝐼)) ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
10	8, 8, 9	syl2anc 584	. . . 4 ⊢ (𝐼 ∈ 𝑉 → (𝑓 ∈ 𝑋, 𝑔 ∈ 𝑋 ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))) = (𝑓 ∈ (Base‘(ℝ^‘𝐼)), 𝑔 ∈ (Base‘(ℝ^‘𝐼)) ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
11	5, 10	eqtr4d 2774	. . 3 ⊢ (𝐼 ∈ 𝑉 → 𝐷 = (𝑓 ∈ 𝑋, 𝑔 ∈ 𝑋 ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
12	11	3ad2ant1 1133	. 2 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐷 = (𝑓 ∈ 𝑋, 𝑔 ∈ 𝑋 ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
13		simprl 769	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → 𝑓 = 𝐹)
14	13	fveq1d 6849	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (𝑓‘𝑥) = (𝐹‘𝑥))
15		simprr 771	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → 𝑔 = 𝐺)
16	15	fveq1d 6849	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (𝑔‘𝑥) = (𝐺‘𝑥))
17	14, 16	oveq12d 7380	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → ((𝑓‘𝑥) − (𝑔‘𝑥)) = ((𝐹‘𝑥) − (𝐺‘𝑥)))
18	17	oveq1d 7377	. . . . . 6 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (((𝑓‘𝑥) − (𝑔‘𝑥))↑2) = (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
19	18	mpteq2dv 5212	. . . . 5 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2)) = (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)))
20	19	oveq2d 7378	. . . 4 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))) = (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))))
21		simp2 1137	. . . . . . . . . . . 12 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐹 ∈ 𝑋)
22	6, 21	rrxf 24802	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐹:𝐼⟶ℝ)
23	22	ffvelcdmda 7040	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → (𝐹‘𝑥) ∈ ℝ)
24		simp3 1138	. . . . . . . . . . . 12 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐺 ∈ 𝑋)
25	6, 24	rrxf 24802	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐺:𝐼⟶ℝ)
26	25	ffvelcdmda 7040	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → (𝐺‘𝑥) ∈ ℝ)
27	23, 26	resubcld 11592	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → ((𝐹‘𝑥) − (𝐺‘𝑥)) ∈ ℝ)
28	27	resqcld 14040	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → (((𝐹‘𝑥) − (𝐺‘𝑥))↑2) ∈ ℝ)
29	28	fmpttd 7068	. . . . . . 7 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)):𝐼⟶ℝ)
30	6, 21	rrxfsupp 24803	. . . . . . . . . 10 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐹 supp 0) ∈ Fin)
31	6, 24	rrxfsupp 24803	. . . . . . . . . 10 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐺 supp 0) ∈ Fin)
32		unfi 9123	. . . . . . . . . 10 ⊢ (((𝐹 supp 0) ∈ Fin ∧ (𝐺 supp 0) ∈ Fin) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∈ Fin)
33	30, 31, 32	syl2anc 584	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∈ Fin)
34	6	rrxmvallem 24805	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
35	33, 34	ssfid 9218	. . . . . . . 8 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin)
36		mptexg 7176	. . . . . . . . . 10 ⊢ (𝐼 ∈ 𝑉 → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ∈ V)
37		funmpt 6544	. . . . . . . . . . 11 ⊢ Fun (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
38		0cn 11156	. . . . . . . . . . 11 ⊢ 0 ∈ ℂ
39		funisfsupp 9318	. . . . . . . . . . 11 ⊢ ((Fun (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ∧ (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ∈ V ∧ 0 ∈ ℂ) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0 ↔ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin))
40	37, 38, 39	mp3an13 1452	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ∈ V → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0 ↔ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin))
41	36, 40	syl 17	. . . . . . . . 9 ⊢ (𝐼 ∈ 𝑉 → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0 ↔ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin))
42	41	3ad2ant1 1133	. . . . . . . 8 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0 ↔ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin))
43	35, 42	mpbird 256	. . . . . . 7 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0)
44		simp1 1136	. . . . . . 7 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐼 ∈ 𝑉)
45		regsumsupp 21063	. . . . . . 7 ⊢ (((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)):𝐼⟶ℝ ∧ (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0 ∧ 𝐼 ∈ 𝑉) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
46	29, 43, 44, 45	syl3anc 1371	. . . . . 6 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
47		suppssdm 8113	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ dom (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
48		eqid 2731	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) = (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
49	48	dmmptss 6198	. . . . . . . . . . 11 ⊢ dom (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ⊆ 𝐼
50	47, 49	sstri 3956	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ 𝐼
51	50	a1i 11	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ 𝐼)
52	51	sselda 3947	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) → 𝑘 ∈ 𝐼)
53		eqidd 2732	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) = (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)))
54		simpr 485	. . . . . . . . . . . . 13 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → 𝑥 = 𝑘)
55	54	fveq2d 6851	. . . . . . . . . . . 12 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → (𝐹‘𝑥) = (𝐹‘𝑘))
56	54	fveq2d 6851	. . . . . . . . . . . 12 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → (𝐺‘𝑥) = (𝐺‘𝑘))
57	55, 56	oveq12d 7380	. . . . . . . . . . 11 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → ((𝐹‘𝑥) − (𝐺‘𝑥)) = ((𝐹‘𝑘) − (𝐺‘𝑘)))
58	57	oveq1d 7377	. . . . . . . . . 10 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → (((𝐹‘𝑥) − (𝐺‘𝑥))↑2) = (((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
59		simpr 485	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → 𝑘 ∈ 𝐼)
60		ovexd 7397	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) ∈ V)
61	53, 58, 59, 60	fvmptd 6960	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘) = (((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
62	61	eqcomd 2737	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
63	52, 62	syldan 591	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
64	63	sumeq2dv 15599	. . . . . 6 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
65	46, 64	eqtr4d 2774	. . . . 5 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
66	65	adantr 481	. . . 4 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
67	22	ffvelcdmda 7040	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐹‘𝑘) ∈ ℝ)
68	67	recnd 11192	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐹‘𝑘) ∈ ℂ)
69	25	ffvelcdmda 7040	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐺‘𝑘) ∈ ℝ)
70	69	recnd 11192	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐺‘𝑘) ∈ ℂ)
71	68, 70	subcld 11521	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → ((𝐹‘𝑘) − (𝐺‘𝑘)) ∈ ℂ)
72	71	sqcld 14059	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) ∈ ℂ)
73	52, 72	syldan 591	. . . . . 6 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) ∈ ℂ)
74	6, 21	rrxsuppss 24804	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐹 supp 0) ⊆ 𝐼)
75	6, 24	rrxsuppss 24804	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐺 supp 0) ⊆ 𝐼)
76	74, 75	unssd 4151	. . . . . . . . . 10 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ⊆ 𝐼)
77	76	ssdifssd 4107	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) ⊆ 𝐼)
78	77	sselda 3947	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → 𝑘 ∈ 𝐼)
79	78, 62	syldan 591	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
80	76	ssdifd 4105	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) ⊆ (𝐼 ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)))
81	80	sselda 3947	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → 𝑘 ∈ (𝐼 ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)))
82		ssidd 3970	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))
83		0cnd 11157	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 0 ∈ ℂ)
84	29, 82, 44, 83	suppssr 8132	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (𝐼 ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘) = 0)
85	81, 84	syldan 591	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘) = 0)
86	79, 85	eqtrd 2771	. . . . . 6 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = 0)
87	34, 73, 86, 33	fsumss 15621	. . . . 5 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
88	87	adantr 481	. . . 4 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
89	20, 66, 88	3eqtrd 2775	. . 3 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))) = Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
90	89	fveq2d 6851	. 2 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2)))) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2)))
91		fvexd 6862	. 2 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2)) ∈ V)
92	12, 90, 21, 24, 91	ovmpod 7512	1 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐹𝐷𝐺) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 396 ∧ w3a 1087 = wceq 1541 ∈ wcel 2106 {crab 3405 Vcvv 3446 ∖ cdif 3910 ∪ cun 3911 ⊆ wss 3913 class class class wbr 5110 ↦ cmpt 5193 dom cdm 5638 Fun wfun 6495 ⟶wf 6497 ‘cfv 6501 (class class class)co 7362 ∈ cmpo 7364 supp csupp 8097 ↑_m cmap 8772 Fincfn 8890 finSupp cfsupp 9312 ℂcc 11058 ℝcr 11059 0cc0 11060 − cmin 11394 2c2 12217 ↑cexp 13977 √csqrt 15130 Σcsu 15582 Basecbs 17094 distcds 17156 Σ_g cgsu 17336 ℝ_fldcrefld 21045 ℝ^crrx 24784

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 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 2702 ax-rep 5247 ax-sep 5261 ax-nul 5268 ax-pow 5325 ax-pr 5389 ax-un 7677 ax-inf2 9586 ax-cnex 11116 ax-resscn 11117 ax-1cn 11118 ax-icn 11119 ax-addcl 11120 ax-addrcl 11121 ax-mulcl 11122 ax-mulrcl 11123 ax-mulcom 11124 ax-addass 11125 ax-mulass 11126 ax-distr 11127 ax-i2m1 11128 ax-1ne0 11129 ax-1rid 11130 ax-rnegex 11131 ax-rrecex 11132 ax-cnre 11133 ax-pre-lttri 11134 ax-pre-lttrn 11135 ax-pre-ltadd 11136 ax-pre-mulgt0 11137 ax-pre-sup 11138 ax-addf 11139 ax-mulf 11140

This theorem depends on definitions: df-bi 206 df-an 397 df-or 846 df-3or 1088 df-3an 1089 df-tru 1544 df-fal 1554 df-ex 1782 df-nf 1786 df-sb 2068 df-mo 2533 df-eu 2562 df-clab 2709 df-cleq 2723 df-clel 2809 df-nfc 2884 df-ne 2940 df-nel 3046 df-ral 3061 df-rex 3070 df-rmo 3351 df-reu 3352 df-rab 3406 df-v 3448 df-sbc 3743 df-csb 3859 df-dif 3916 df-un 3918 df-in 3920 df-ss 3930 df-pss 3932 df-nul 4288 df-if 4492 df-pw 4567 df-sn 4592 df-pr 4594 df-tp 4596 df-op 4598 df-uni 4871 df-int 4913 df-iun 4961 df-br 5111 df-opab 5173 df-mpt 5194 df-tr 5228 df-id 5536 df-eprel 5542 df-po 5550 df-so 5551 df-fr 5593 df-se 5594 df-we 5595 df-xp 5644 df-rel 5645 df-cnv 5646 df-co 5647 df-dm 5648 df-rn 5649 df-res 5650 df-ima 5651 df-pred 6258 df-ord 6325 df-on 6326 df-lim 6327 df-suc 6328 df-iota 6453 df-fun 6503 df-fn 6504 df-f 6505 df-f1 6506 df-fo 6507 df-f1o 6508 df-fv 6509 df-isom 6510 df-riota 7318 df-ov 7365 df-oprab 7366 df-mpo 7367 df-of 7622 df-om 7808 df-1st 7926 df-2nd 7927 df-supp 8098 df-tpos 8162 df-frecs 8217 df-wrecs 8248 df-recs 8322 df-rdg 8361 df-1o 8417 df-er 8655 df-map 8774 df-ixp 8843 df-en 8891 df-dom 8892 df-sdom 8893 df-fin 8894 df-fsupp 9313 df-sup 9387 df-oi 9455 df-card 9884 df-pnf 11200 df-mnf 11201 df-xr 11202 df-ltxr 11203 df-le 11204 df-sub 11396 df-neg 11397 df-div 11822 df-nn 12163 df-2 12225 df-3 12226 df-4 12227 df-5 12228 df-6 12229 df-7 12230 df-8 12231 df-9 12232 df-n0 12423 df-z 12509 df-dec 12628 df-uz 12773 df-rp 12925 df-fz 13435 df-fzo 13578 df-seq 13917 df-exp 13978 df-hash 14241 df-cj 14996 df-re 14997 df-im 14998 df-sqrt 15132 df-abs 15133 df-clim 15382 df-sum 15583 df-struct 17030 df-sets 17047 df-slot 17065 df-ndx 17077 df-base 17095 df-ress 17124 df-plusg 17160 df-mulr 17161 df-starv 17162 df-sca 17163 df-vsca 17164 df-ip 17165 df-tset 17166 df-ple 17167 df-ds 17169 df-unif 17170 df-hom 17171 df-cco 17172 df-0g 17337 df-gsum 17338 df-prds 17343 df-pws 17345 df-mgm 18511 df-sgrp 18560 df-mnd 18571 df-mhm 18615 df-grp 18765 df-minusg 18766 df-sbg 18767 df-subg 18939 df-ghm 19020 df-cntz 19111 df-cmn 19578 df-abl 19579 df-mgp 19911 df-ur 19928 df-ring 19980 df-cring 19981 df-oppr 20063 df-dvdsr 20084 df-unit 20085 df-invr 20115 df-dvr 20126 df-rnghom 20162 df-drng 20227 df-field 20228 df-subrg 20268 df-staf 20360 df-srng 20361 df-lmod 20380 df-lss 20450 df-sra 20692 df-rgmod 20693 df-cnfld 20834 df-refld 21046 df-dsmm 21175 df-frlm 21190 df-nm 23975 df-tng 23977 df-tcph 24570 df-rrx 24786

This theorem is referenced by: rrxmfval 24807 rrxmet 24809 rrxdstprj1 24810

W3C validator