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 25781

Description: The value of the Euclidean metric. Compare with rrnmval 39028. (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 2763	. . . . . 6 ⊢ (ℝ^‘𝐼) = (ℝ^‘𝐼)
3		eqid 2763	. . . . . 6 ⊢ (Base‘(ℝ^‘𝐼)) = (Base‘(ℝ^‘𝐼))
4	2, 3	rrxds 25769	. . . . 5 ⊢ (𝐼 ∈ 𝑉 → (𝑓 ∈ (Base‘(ℝ^‘𝐼)), 𝑔 ∈ (Base‘(ℝ^‘𝐼)) ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))) = (dist‘(ℝ^‘𝐼)))
5	1, 4	eqtr4id 2817	. . . 4 ⊢ (𝐼 ∈ 𝑉 → 𝐷 = (𝑓 ∈ (Base‘(ℝ^‘𝐼)), 𝑔 ∈ (Base‘(ℝ^‘𝐼)) ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
6		rrxmval.1	. . . . . 6 ⊢ 𝑋 = {ℎ ∈ (ℝ ↑_m 𝐼) ∣ ℎ finSupp 0}
7	2, 3	rrxbase 25764	. . . . . 6 ⊢ (𝐼 ∈ 𝑉 → (Base‘(ℝ^‘𝐼)) = {ℎ ∈ (ℝ ↑_m 𝐼) ∣ ℎ finSupp 0})
8	6, 7	eqtr4id 2817	. . . . 5 ⊢ (𝐼 ∈ 𝑉 → 𝑋 = (Base‘(ℝ^‘𝐼)))
9		mpoeq12 7524	. . . . 5 ⊢ ((𝑋 = (Base‘(ℝ^‘𝐼)) ∧ 𝑋 = (Base‘(ℝ^‘𝐼))) → (𝑓 ∈ 𝑋, 𝑔 ∈ 𝑋 ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))) = (𝑓 ∈ (Base‘(ℝ^‘𝐼)), 𝑔 ∈ (Base‘(ℝ^‘𝐼)) ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
10	8, 8, 9	syl2anc 596	. . . 4 ⊢ (𝐼 ∈ 𝑉 → (𝑓 ∈ 𝑋, 𝑔 ∈ 𝑋 ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))) = (𝑓 ∈ (Base‘(ℝ^‘𝐼)), 𝑔 ∈ (Base‘(ℝ^‘𝐼)) ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
11	5, 10	eqtr4d 2801	. . 3 ⊢ (𝐼 ∈ 𝑉 → 𝐷 = (𝑓 ∈ 𝑋, 𝑔 ∈ 𝑋 ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
12	11	3ad2ant1 1151	. 2 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐷 = (𝑓 ∈ 𝑋, 𝑔 ∈ 𝑋 ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
13		simprl 783	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → 𝑓 = 𝐹)
14	13	fveq1d 6918	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (𝑓‘𝑥) = (𝐹‘𝑥))
15		simprr 785	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → 𝑔 = 𝐺)
16	15	fveq1d 6918	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (𝑔‘𝑥) = (𝐺‘𝑥))
17	14, 16	oveq12d 7469	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → ((𝑓‘𝑥) − (𝑔‘𝑥)) = ((𝐹‘𝑥) − (𝐺‘𝑥)))
18	17	oveq1d 7466	. . . . . 6 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (((𝑓‘𝑥) − (𝑔‘𝑥))↑2) = (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
19	18	mpteq2dv 5205	. . . . 5 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2)) = (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)))
20	19	oveq2d 7467	. . . 4 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))) = (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))))
21		simp2 1155	. . . . . . . . . . . 12 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐹 ∈ 𝑋)
22	6, 21	rrxf 25777	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐹:𝐼⟶ℝ)
23	22	ffvelcdmda 7116	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → (𝐹‘𝑥) ∈ ℝ)
24		simp3 1156	. . . . . . . . . . . 12 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐺 ∈ 𝑋)
25	6, 24	rrxf 25777	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐺:𝐼⟶ℝ)
26	25	ffvelcdmda 7116	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → (𝐺‘𝑥) ∈ ℝ)
27	23, 26	resubcld 11783	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → ((𝐹‘𝑥) − (𝐺‘𝑥)) ∈ ℝ)
28	27	resqcld 14308	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → (((𝐹‘𝑥) − (𝐺‘𝑥))↑2) ∈ ℝ)
29	28	fmpttd 7147	. . . . . . 7 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)):𝐼⟶ℝ)
30	6, 21	rrxfsupp 25778	. . . . . . . . . 10 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐹 supp 0) ∈ Fin)
31	6, 24	rrxfsupp 25778	. . . . . . . . . 10 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐺 supp 0) ∈ Fin)
32		unfi 9224	. . . . . . . . . 10 ⊢ (((𝐹 supp 0) ∈ Fin ∧ (𝐺 supp 0) ∈ Fin) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∈ Fin)
33	30, 31, 32	syl2anc 596	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∈ Fin)
34	6	rrxmvallem 25780	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
35	33, 34	ssfid 9298	. . . . . . . 8 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin)
36		mptexg 7258	. . . . . . . . . 10 ⊢ (𝐼 ∈ 𝑉 → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ∈ V)
37		funmpt 6606	. . . . . . . . . . 11 ⊢ Fun (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
38		0cn 11337	. . . . . . . . . . 11 ⊢ 0 ∈ ℂ
39		funisfsupp 9397	. . . . . . . . . . 11 ⊢ ((Fun (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ∧ (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ∈ V ∧ 0 ∈ ℂ) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0 ↔ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin))
40	37, 38, 39	mp3an13 1482	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ∈ V → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0 ↔ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin))
41	36, 40	syl 18	. . . . . . . . 9 ⊢ (𝐼 ∈ 𝑉 → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0 ↔ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin))
42	41	3ad2ant1 1151	. . . . . . . 8 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0 ↔ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin))
43	35, 42	mpbird 260	. . . . . . 7 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0)
44		simp1 1154	. . . . . . 7 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐼 ∈ 𝑉)
45		regsumsupp 21983	. . . . . . 7 ⊢ (((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)):𝐼⟶ℝ ∧ (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) finSupp 0 ∧ 𝐼 ∈ 𝑉) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
46	29, 43, 44, 45	syl3anc 1399	. . . . . 6 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
47		suppssdm 8232	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ dom (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
48		eqid 2763	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) = (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
49	48	dmmptss 6261	. . . . . . . . . . 11 ⊢ dom (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ⊆ 𝐼
50	47, 49	sstri 3922	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ 𝐼
51	50	a1i 11	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ 𝐼)
52	51	sselda 3913	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) → 𝑘 ∈ 𝐼)
53		eqidd 2764	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) = (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)))
54		simpr 490	. . . . . . . . . . . . 13 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → 𝑥 = 𝑘)
55	54	fveq2d 6920	. . . . . . . . . . . 12 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → (𝐹‘𝑥) = (𝐹‘𝑘))
56	54	fveq2d 6920	. . . . . . . . . . . 12 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → (𝐺‘𝑥) = (𝐺‘𝑘))
57	55, 56	oveq12d 7469	. . . . . . . . . . 11 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → ((𝐹‘𝑥) − (𝐺‘𝑥)) = ((𝐹‘𝑘) − (𝐺‘𝑘)))
58	57	oveq1d 7466	. . . . . . . . . 10 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → (((𝐹‘𝑥) − (𝐺‘𝑥))↑2) = (((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
59		simpr 490	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → 𝑘 ∈ 𝐼)
60		ovexd 7486	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) ∈ V)
61	53, 58, 59, 60	fvmptd 7032	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘) = (((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
62	61	eqcomd 2769	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
63	52, 62	syldan 603	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
64	63	sumeq2dv 15913	. . . . . 6 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
65	46, 64	eqtr4d 2801	. . . . 5 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
66	65	adantr 486	. . . 4 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
67	22	ffvelcdmda 7116	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐹‘𝑘) ∈ ℝ)
68	67	recnd 11376	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐹‘𝑘) ∈ ℂ)
69	25	ffvelcdmda 7116	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐺‘𝑘) ∈ ℝ)
70	69	recnd 11376	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐺‘𝑘) ∈ ℂ)
71	68, 70	subcld 11708	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → ((𝐹‘𝑘) − (𝐺‘𝑘)) ∈ ℂ)
72	71	sqcld 14327	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) ∈ ℂ)
73	52, 72	syldan 603	. . . . . 6 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) ∈ ℂ)
74	6, 21	rrxsuppss 25779	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐹 supp 0) ⊆ 𝐼)
75	6, 24	rrxsuppss 25779	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐺 supp 0) ⊆ 𝐼)
76	74, 75	unssd 4193	. . . . . . . . . 10 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ⊆ 𝐼)
77	76	ssdifssd 4086	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) ⊆ 𝐼)
78	77	sselda 3913	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → 𝑘 ∈ 𝐼)
79	78, 62	syldan 603	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
80	76	ssdifd 4084	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) ⊆ (𝐼 ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)))
81	80	sselda 3913	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → 𝑘 ∈ (𝐼 ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)))
82		ssidd 3936	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))
83		0cnd 11338	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 0 ∈ ℂ)
84	29, 82, 44, 83	suppssr 8250	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (𝐼 ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘) = 0)
85	81, 84	syldan 603	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘) = 0)
86	79, 85	eqtrd 2798	. . . . . 6 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = 0)
87	34, 73, 86, 33	fsumss 15935	. . . . 5 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
88	87	adantr 486	. . . 4 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
89	20, 66, 88	3eqtrd 2802	. . 3 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))) = Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
90	89	fveq2d 6920	. 2 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2)))) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2)))
91		fvexd 6931	. 2 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2)) ∈ V)
92	12, 90, 21, 24, 91	ovmpod 7604	1 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐹𝐷𝐺) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2)))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1570 ∈ wcel 2147 {crab 3416 Vcvv 3454 ⊆ wss 3900 ∖ cdif 4048 ∪ cun 4152 class class class wbr 5108 ↦ cmpt 5192 dom cdm 5658 Fun wfun 6560 ⟶wf 6562 ‘cfv 6566 (class class class)co 7451 ∈ cmpo 7453 supp csupp 8214 ↑_m cmap 8885 Fincfn 9011 finSupp cfsupp 9391 ℂcc 11237 ℝcr 11238 0cc0 11239 − cmin 11580 2c2 12437 ↑cexp 14244 √csqrt 15443 Σcsu 15897 Basecbs 17431 distcds 17481 Σ_g cgsu 17661 ℝ_fldcrefld 21965 ℝ^crrx 25759

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 1945 ax-6 2002 ax-7 2043 ax-8 2149 ax-9 2157 ax-10 2180 ax-11 2197 ax-12 2216 ax-ext 2735 ax-rep 5238 ax-sep 5255 ax-nul 5266 ax-pow 5334 ax-pr 5398 ax-un 7783 ax-inf2 9679 ax-cnex 11295 ax-resscn 11296 ax-1cn 11297 ax-icn 11298 ax-addcl 11299 ax-addrcl 11300 ax-mulcl 11301 ax-mulrcl 11302 ax-mulcom 11303 ax-addass 11304 ax-mulass 11305 ax-distr 11306 ax-i2m1 11307 ax-1ne0 11308 ax-1rid 11309 ax-rnegex 11310 ax-rrecex 11311 ax-cnre 11312 ax-pre-lttri 11313 ax-pre-lttrn 11314 ax-pre-ltadd 11315 ax-pre-mulgt0 11316 ax-pre-sup 11317 ax-addf 11318 ax-mulf 11319

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 2102 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-nel 3066 df-ral 3081 df-rex 3091 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3456 df-sbc 3743 df-csb 3852 df-ss 3901 df-pss 4017 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-pw 4562 df-sn 4589 df-pr 4591 df-tp 4593 df-op 4841 df-uni 4873 df-int 4913 df-iun 4958 df-br 5109 df-opab 5174 df-mpt 5193 df-tr 5219 df-id 5553 df-eprel 5558 df-po 5566 df-so 5567 df-fr 5611 df-se 5612 df-we 5613 df-xp 5664 df-rel 5665 df-cnv 5666 df-co 5667 df-dm 5668 df-rn 5669 df-res 5670 df-ima 5671 df-pred 6330 df-ord 6391 df-on 6392 df-lim 6393 df-suc 6394 df-iota 6520 df-fun 6568 df-fn 6569 df-f 6570 df-f1 6571 df-fo 6572 df-f1o 6573 df-fv 6574 df-isom 6575 df-riota 7408 df-ov 7454 df-oprab 7455 df-mpo 7456 df-of 7725 df-om 7912 df-1st 8035 df-2nd 8036 df-supp 8215 df-tpos 8281 df-frecs 8337 df-wrecs 8368 df-recs 8417 df-rdg 8456 df-1o 8514 df-er 8755 df-map 8887 df-ixp 8964 df-en 9012 df-dom 9013 df-sdom 9014 df-fin 9015 df-fsupp 9392 df-sup 9471 df-oi 9541 df-card 10057 df-pnf 11384 df-mnf 11385 df-xr 11386 df-ltxr 11387 df-le 11388 df-sub 11582 df-neg 11583 df-div 12014 df-nn 12376 df-2 12445 df-3 12446 df-4 12447 df-5 12448 df-6 12449 df-7 12450 df-8 12451 df-9 12452 df-n0 12647 df-z 12734 df-dec 12855 df-uz 13006 df-rp 13161 df-fz 13680 df-fzo 13829 df-seq 14185 df-exp 14245 df-hash 14516 df-cj 15309 df-re 15310 df-im 15311 df-sqrt 15445 df-abs 15446 df-clim 15699 df-sum 15898 df-struct 17369 df-sets 17386 df-slot 17404 df-ndx 17416 df-base 17432 df-ress 17453 df-plusg 17486 df-mulr 17487 df-starv 17488 df-sca 17489 df-vsca 17490 df-ip 17491 df-tset 17492 df-ple 17493 df-ds 17495 df-unif 17496 df-hom 17497 df-cco 17498 df-euf 17499 df-0g 17662 df-gsum 17663 df-prds 17668 df-pws 17670 df-mgm 18866 df-sgrp 18958 df-mnd 18974 df-mhm 19028 df-grp 19197 df-minusg 19198 df-sbg 19199 df-subg 19383 df-ghm 19478 df-cntz 19582 df-cmn 20047 df-abl 20048 df-mgp 20412 df-rng 20426 df-ur 20459 df-ring 20512 df-cring 20513 df-oppr 20618 df-dvdsr 20638 df-unit 20639 df-invr 20669 df-dvr 20682 df-rhm 20753 df-subrng 20849 df-subrg 20873 df-drng 21033 df-field 21034 df-staf 21147 df-srng 21148 df-lmod 21188 df-lss 21258 df-sra 21499 df-rgmod 21500 df-cnfld 21730 df-refld 21966 df-dsmm 22093 df-frlm 22108 df-nm 24956 df-tng 24958 df-tcph 25545 df-rrx 25761

This theorem is used by: rrxmfval 25782 rrxmet 25784 rrxdstprj1 25785

W3C validator