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 24765

Description: The value of the Euclidean metric. Compare with rrnmval 36276. (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 2736	. . . . . 6 ⊢ (ℝ^‘𝐼) = (ℝ^‘𝐼)
3		eqid 2736	. . . . . 6 ⊢ (Base‘(ℝ^‘𝐼)) = (Base‘(ℝ^‘𝐼))
4	2, 3	rrxds 24753	. . . . 5 ⊢ (𝐼 ∈ 𝑉 → (𝑓 ∈ (Base‘(ℝ^‘𝐼)), 𝑔 ∈ (Base‘(ℝ^‘𝐼)) ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))) = (dist‘(ℝ^‘𝐼)))
5	1, 4	eqtr4id 2795	. . . 4 ⊢ (𝐼 ∈ 𝑉 → 𝐷 = (𝑓 ∈ (Base‘(ℝ^‘𝐼)), 𝑔 ∈ (Base‘(ℝ^‘𝐼)) ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
6		rrxmval.1	. . . . . 6 ⊢ 𝑋 = {ℎ ∈ (ℝ ↑_m 𝐼) ∣ ℎ finSupp 0}
7	2, 3	rrxbase 24748	. . . . . 6 ⊢ (𝐼 ∈ 𝑉 → (Base‘(ℝ^‘𝐼)) = {ℎ ∈ (ℝ ↑_m 𝐼) ∣ ℎ finSupp 0})
8	6, 7	eqtr4id 2795	. . . . 5 ⊢ (𝐼 ∈ 𝑉 → 𝑋 = (Base‘(ℝ^‘𝐼)))
9		mpoeq12 7427	. . . . 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 2779	. . 3 ⊢ (𝐼 ∈ 𝑉 → 𝐷 = (𝑓 ∈ 𝑋, 𝑔 ∈ 𝑋 ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
12	11	3ad2ant1 1133	. 2 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐷 = (𝑓 ∈ 𝑋, 𝑔 ∈ 𝑋 ↦ (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))))))
13		simprl 769	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → 𝑓 = 𝐹)
14	13	fveq1d 6842	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (𝑓‘𝑥) = (𝐹‘𝑥))
15		simprr 771	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → 𝑔 = 𝐺)
16	15	fveq1d 6842	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (𝑔‘𝑥) = (𝐺‘𝑥))
17	14, 16	oveq12d 7372	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → ((𝑓‘𝑥) − (𝑔‘𝑥)) = ((𝐹‘𝑥) − (𝐺‘𝑥)))
18	17	oveq1d 7369	. . . . . 6 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (((𝑓‘𝑥) − (𝑔‘𝑥))↑2) = (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
19	18	mpteq2dv 5206	. . . . 5 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2)) = (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)))
20	19	oveq2d 7370	. . . 4 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))) = (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))))
21		simp2 1137	. . . . . . . . . . . 12 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐹 ∈ 𝑋)
22	6, 21	rrxf 24761	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐹:𝐼⟶ℝ)
23	22	ffvelcdmda 7032	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → (𝐹‘𝑥) ∈ ℝ)
24		simp3 1138	. . . . . . . . . . . 12 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐺 ∈ 𝑋)
25	6, 24	rrxf 24761	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 𝐺:𝐼⟶ℝ)
26	25	ffvelcdmda 7032	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → (𝐺‘𝑥) ∈ ℝ)
27	23, 26	resubcld 11580	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → ((𝐹‘𝑥) − (𝐺‘𝑥)) ∈ ℝ)
28	27	resqcld 14027	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑥 ∈ 𝐼) → (((𝐹‘𝑥) − (𝐺‘𝑥))↑2) ∈ ℝ)
29	28	fmpttd 7060	. . . . . . 7 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)):𝐼⟶ℝ)
30	6, 21	rrxfsupp 24762	. . . . . . . . . 10 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐹 supp 0) ∈ Fin)
31	6, 24	rrxfsupp 24762	. . . . . . . . . 10 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐺 supp 0) ∈ Fin)
32		unfi 9113	. . . . . . . . . 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 24764	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
35	33, 34	ssfid 9208	. . . . . . . 8 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ∈ Fin)
36		mptexg 7168	. . . . . . . . . 10 ⊢ (𝐼 ∈ 𝑉 → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ∈ V)
37		funmpt 6537	. . . . . . . . . . 11 ⊢ Fun (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
38		0cn 11144	. . . . . . . . . . 11 ⊢ 0 ∈ ℂ
39		funisfsupp 9307	. . . . . . . . . . 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 21022	. . . . . . 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 8105	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ dom (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
48		eqid 2736	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) = (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))
49	48	dmmptss 6192	. . . . . . . . . . 11 ⊢ dom (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) ⊆ 𝐼
50	47, 49	sstri 3952	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ 𝐼
51	50	a1i 11	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ 𝐼)
52	51	sselda 3943	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) → 𝑘 ∈ 𝐼)
53		eqidd 2737	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) = (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)))
54		simpr 485	. . . . . . . . . . . . 13 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → 𝑥 = 𝑘)
55	54	fveq2d 6844	. . . . . . . . . . . 12 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → (𝐹‘𝑥) = (𝐹‘𝑘))
56	54	fveq2d 6844	. . . . . . . . . . . 12 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → (𝐺‘𝑥) = (𝐺‘𝑘))
57	55, 56	oveq12d 7372	. . . . . . . . . . 11 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → ((𝐹‘𝑥) − (𝐺‘𝑥)) = ((𝐹‘𝑘) − (𝐺‘𝑘)))
58	57	oveq1d 7369	. . . . . . . . . 10 ⊢ ((((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) ∧ 𝑥 = 𝑘) → (((𝐹‘𝑥) − (𝐺‘𝑥))↑2) = (((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
59		simpr 485	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → 𝑘 ∈ 𝐼)
60		ovexd 7389	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) ∈ V)
61	53, 58, 59, 60	fvmptd 6953	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘) = (((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
62	61	eqcomd 2742	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
63	52, 62	syldan 591	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
64	63	sumeq2dv 15585	. . . . . 6 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))‘𝑘))
65	46, 64	eqtr4d 2779	. . . . 5 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
66	65	adantr 481	. . . 4 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2))) = Σ𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
67	22	ffvelcdmda 7032	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐹‘𝑘) ∈ ℝ)
68	67	recnd 11180	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐹‘𝑘) ∈ ℂ)
69	25	ffvelcdmda 7032	. . . . . . . . . 10 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐺‘𝑘) ∈ ℝ)
70	69	recnd 11180	. . . . . . . . 9 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (𝐺‘𝑘) ∈ ℂ)
71	68, 70	subcld 11509	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → ((𝐹‘𝑘) − (𝐺‘𝑘)) ∈ ℂ)
72	71	sqcld 14046	. . . . . . 7 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ 𝐼) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) ∈ ℂ)
73	52, 72	syldan 591	. . . . . 6 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) ∈ ℂ)
74	6, 21	rrxsuppss 24763	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐹 supp 0) ⊆ 𝐼)
75	6, 24	rrxsuppss 24763	. . . . . . . . . . 11 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (𝐺 supp 0) ⊆ 𝐼)
76	74, 75	unssd 4145	. . . . . . . . . 10 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ⊆ 𝐼)
77	76	ssdifssd 4101	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) ⊆ 𝐼)
78	77	sselda 3943	. . . . . . . 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 4099	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)) ⊆ (𝐼 ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)))
81	80	sselda 3943	. . . . . . . 8 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → 𝑘 ∈ (𝐼 ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0)))
82		ssidd 3966	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0) ⊆ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))
83		0cnd 11145	. . . . . . . . 9 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → 0 ∈ ℂ)
84	29, 82, 44, 83	suppssr 8124	. . . . . . . 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 2776	. . . . . 6 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ 𝑘 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∖ ((𝑥 ∈ 𝐼 ↦ (((𝐹‘𝑥) − (𝐺‘𝑥))↑2)) supp 0))) → (((𝐹‘𝑘) − (𝐺‘𝑘))↑2) = 0)
87	34, 73, 86, 33	fsumss 15607	. . . . 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 2780	. . 3 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2))) = Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2))
90	89	fveq2d 6844	. 2 ⊢ (((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) ∧ (𝑓 = 𝐹 ∧ 𝑔 = 𝐺)) → (√‘(ℝ_fld Σ_g (𝑥 ∈ 𝐼 ↦ (((𝑓‘𝑥) − (𝑔‘𝑥))↑2)))) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2)))
91		fvexd 6855	. 2 ⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝑋 ∧ 𝐺 ∈ 𝑋) → (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹‘𝑘) − (𝐺‘𝑘))↑2)) ∈ V)
92	12, 90, 21, 24, 91	ovmpod 7504	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 3406 Vcvv 3444 ∖ cdif 3906 ∪ cun 3907 ⊆ wss 3909 class class class wbr 5104 ↦ cmpt 5187 dom cdm 5632 Fun wfun 6488 ⟶wf 6490 ‘cfv 6494 (class class class)co 7354 ∈ cmpo 7356 supp csupp 8089 ↑_m cmap 8762 Fincfn 8880 finSupp cfsupp 9302 ℂcc 11046 ℝcr 11047 0cc0 11048 − cmin 11382 2c2 12205 ↑cexp 13964 √csqrt 15115 Σcsu 15567 Basecbs 17080 distcds 17139 Σ_g cgsu 17319 ℝ_fldcrefld 21004 ℝ^crrx 24743

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 2707 ax-rep 5241 ax-sep 5255 ax-nul 5262 ax-pow 5319 ax-pr 5383 ax-un 7669 ax-inf2 9574 ax-cnex 11104 ax-resscn 11105 ax-1cn 11106 ax-icn 11107 ax-addcl 11108 ax-addrcl 11109 ax-mulcl 11110 ax-mulrcl 11111 ax-mulcom 11112 ax-addass 11113 ax-mulass 11114 ax-distr 11115 ax-i2m1 11116 ax-1ne0 11117 ax-1rid 11118 ax-rnegex 11119 ax-rrecex 11120 ax-cnre 11121 ax-pre-lttri 11122 ax-pre-lttrn 11123 ax-pre-ltadd 11124 ax-pre-mulgt0 11125 ax-pre-sup 11126 ax-addf 11127 ax-mulf 11128

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 2538 df-eu 2567 df-clab 2714 df-cleq 2728 df-clel 2814 df-nfc 2888 df-ne 2943 df-nel 3049 df-ral 3064 df-rex 3073 df-rmo 3352 df-reu 3353 df-rab 3407 df-v 3446 df-sbc 3739 df-csb 3855 df-dif 3912 df-un 3914 df-in 3916 df-ss 3926 df-pss 3928 df-nul 4282 df-if 4486 df-pw 4561 df-sn 4586 df-pr 4588 df-tp 4590 df-op 4592 df-uni 4865 df-int 4907 df-iun 4955 df-br 5105 df-opab 5167 df-mpt 5188 df-tr 5222 df-id 5530 df-eprel 5536 df-po 5544 df-so 5545 df-fr 5587 df-se 5588 df-we 5589 df-xp 5638 df-rel 5639 df-cnv 5640 df-co 5641 df-dm 5642 df-rn 5643 df-res 5644 df-ima 5645 df-pred 6252 df-ord 6319 df-on 6320 df-lim 6321 df-suc 6322 df-iota 6446 df-fun 6496 df-fn 6497 df-f 6498 df-f1 6499 df-fo 6500 df-f1o 6501 df-fv 6502 df-isom 6503 df-riota 7310 df-ov 7357 df-oprab 7358 df-mpo 7359 df-of 7614 df-om 7800 df-1st 7918 df-2nd 7919 df-supp 8090 df-tpos 8154 df-frecs 8209 df-wrecs 8240 df-recs 8314 df-rdg 8353 df-1o 8409 df-er 8645 df-map 8764 df-ixp 8833 df-en 8881 df-dom 8882 df-sdom 8883 df-fin 8884 df-fsupp 9303 df-sup 9375 df-oi 9443 df-card 9872 df-pnf 11188 df-mnf 11189 df-xr 11190 df-ltxr 11191 df-le 11192 df-sub 11384 df-neg 11385 df-div 11810 df-nn 12151 df-2 12213 df-3 12214 df-4 12215 df-5 12216 df-6 12217 df-7 12218 df-8 12219 df-9 12220 df-n0 12411 df-z 12497 df-dec 12616 df-uz 12761 df-rp 12913 df-fz 13422 df-fzo 13565 df-seq 13904 df-exp 13965 df-hash 14228 df-cj 14981 df-re 14982 df-im 14983 df-sqrt 15117 df-abs 15118 df-clim 15367 df-sum 15568 df-struct 17016 df-sets 17033 df-slot 17051 df-ndx 17063 df-base 17081 df-ress 17110 df-plusg 17143 df-mulr 17144 df-starv 17145 df-sca 17146 df-vsca 17147 df-ip 17148 df-tset 17149 df-ple 17150 df-ds 17152 df-unif 17153 df-hom 17154 df-cco 17155 df-0g 17320 df-gsum 17321 df-prds 17326 df-pws 17328 df-mgm 18494 df-sgrp 18543 df-mnd 18554 df-mhm 18598 df-grp 18748 df-minusg 18749 df-sbg 18750 df-subg 18921 df-ghm 19002 df-cntz 19093 df-cmn 19560 df-abl 19561 df-mgp 19893 df-ur 19910 df-ring 19962 df-cring 19963 df-oppr 20045 df-dvdsr 20066 df-unit 20067 df-invr 20097 df-dvr 20108 df-rnghom 20142 df-drng 20183 df-field 20184 df-subrg 20216 df-staf 20300 df-srng 20301 df-lmod 20320 df-lss 20389 df-sra 20629 df-rgmod 20630 df-cnfld 20793 df-refld 21005 df-dsmm 21134 df-frlm 21149 df-nm 23934 df-tng 23936 df-tcph 24529 df-rrx 24745

This theorem is referenced by: rrxmfval 24766 rrxmet 24768 rrxdstprj1 24769

W3C validator