Theorem ehl2eudisval0 49224

Description: The Euclidean distance of a point to the origin in a real Euclidean space of dimension 2. (Contributed by AV, 26-Feb-2023.)

Hypotheses

Ref	Expression
ehl2eudisval0.e	⊢ 𝐸 = (𝔼hil‘2)
ehl2eudisval0.x	⊢ 𝑋 = (ℝ ↑m {1, 2})
ehl2eudisval0.d	⊢ 𝐷 = (dist‘𝐸)
ehl2eudisval0.0	⊢ 0 = ({1, 2} × {0})

Assertion

Ref	Expression
ehl2eudisval0	⊢ (𝐹 ∈ 𝑋 → (𝐹𝐷 0 ) = (√‘(((𝐹‘1)↑2) + ((𝐹‘2)↑2))))

Proof of Theorem ehl2eudisval0

Step	Hyp	Ref	Expression
1		prex 5368	. . . 4 ⊢ {1, 2} ∈ V
2		ehl2eudisval0.0	. . . . 5 ⊢ 0 = ({1, 2} × {0})
3		ehl2eudisval0.x	. . . . 5 ⊢ 𝑋 = (ℝ ↑m {1, 2})
4	2, 3	rrx0el 25384	. . . 4 ⊢ ({1, 2} ∈ V → 0 ∈ 𝑋)
5	1, 4	mp1i 13	. . 3 ⊢ (𝐹 ∈ 𝑋 → 0 ∈ 𝑋)
6		ehl2eudisval0.e	. . . 4 ⊢ 𝐸 = (𝔼hil‘2)
7		ehl2eudisval0.d	. . . 4 ⊢ 𝐷 = (dist‘𝐸)
8	6, 3, 7	ehl2eudisval 25409	. . 3 ⊢ ((𝐹 ∈ 𝑋 ∧ 0 ∈ 𝑋) → (𝐹𝐷 0 ) = (√‘((((𝐹‘1) − ( 0 ‘1))↑2) + (((𝐹‘2) − ( 0 ‘2))↑2))))
9	5, 8	mpdan 693	. 2 ⊢ (𝐹 ∈ 𝑋 → (𝐹𝐷 0 ) = (√‘((((𝐹‘1) − ( 0 ‘1))↑2) + (((𝐹‘2) − ( 0 ‘2))↑2))))
10		1ex 11132	. . . . . . . . . . . 12 ⊢ 1 ∈ V
11		2ex 12250	. . . . . . . . . . . 12 ⊢ 2 ∈ V
12		c0ex 11130	. . . . . . . . . . . 12 ⊢ 0 ∈ V
13		xpprsng 7083	. . . . . . . . . . . 12 ⊢ ((1 ∈ V ∧ 2 ∈ V ∧ 0 ∈ V) → ({1, 2} × {0}) = {⟨1, 0⟩, ⟨2, 0⟩})
14	10, 11, 12, 13	mp3an 1469	. . . . . . . . . . 11 ⊢ ({1, 2} × {0}) = {⟨1, 0⟩, ⟨2, 0⟩}
15	2, 14	eqtri 2762	. . . . . . . . . 10 ⊢ 0 = {⟨1, 0⟩, ⟨2, 0⟩}
16	15	fveq1i 6829	. . . . . . . . 9 ⊢ ( 0 ‘1) = ({⟨1, 0⟩, ⟨2, 0⟩}‘1)
17		1ne2 12376	. . . . . . . . . 10 ⊢ 1 ≠ 2
18	10, 12	fvpr1 7137	. . . . . . . . . 10 ⊢ (1 ≠ 2 → ({⟨1, 0⟩, ⟨2, 0⟩}‘1) = 0)
19	17, 18	ax-mp 5	. . . . . . . . 9 ⊢ ({⟨1, 0⟩, ⟨2, 0⟩}‘1) = 0
20	16, 19	eqtri 2762	. . . . . . . 8 ⊢ ( 0 ‘1) = 0
21	20	a1i 11	. . . . . . 7 ⊢ (𝐹 ∈ 𝑋 → ( 0 ‘1) = 0)
22	21	oveq2d 7373	. . . . . 6 ⊢ (𝐹 ∈ 𝑋 → ((𝐹‘1) − ( 0 ‘1)) = ((𝐹‘1) − 0))
23		eqid 2739	. . . . . . . . 9 ⊢ {1, 2} = {1, 2}
24	23, 3	rrx2pxel 49210	. . . . . . . 8 ⊢ (𝐹 ∈ 𝑋 → (𝐹‘1) ∈ ℝ)
25	24	recnd 11165	. . . . . . 7 ⊢ (𝐹 ∈ 𝑋 → (𝐹‘1) ∈ ℂ)
26	25	subid1d 11486	. . . . . 6 ⊢ (𝐹 ∈ 𝑋 → ((𝐹‘1) − 0) = (𝐹‘1))
27	22, 26	eqtrd 2774	. . . . 5 ⊢ (𝐹 ∈ 𝑋 → ((𝐹‘1) − ( 0 ‘1)) = (𝐹‘1))
28	27	oveq1d 7372	. . . 4 ⊢ (𝐹 ∈ 𝑋 → (((𝐹‘1) − ( 0 ‘1))↑2) = ((𝐹‘1)↑2))
29	15	fveq1i 6829	. . . . . . . 8 ⊢ ( 0 ‘2) = ({⟨1, 0⟩, ⟨2, 0⟩}‘2)
30	11, 12	fvpr2 7138	. . . . . . . . 9 ⊢ (1 ≠ 2 → ({⟨1, 0⟩, ⟨2, 0⟩}‘2) = 0)
31	17, 30	mp1i 13	. . . . . . . 8 ⊢ (𝐹 ∈ 𝑋 → ({⟨1, 0⟩, ⟨2, 0⟩}‘2) = 0)
32	29, 31	eqtrid 2786	. . . . . . 7 ⊢ (𝐹 ∈ 𝑋 → ( 0 ‘2) = 0)
33	32	oveq2d 7373	. . . . . 6 ⊢ (𝐹 ∈ 𝑋 → ((𝐹‘2) − ( 0 ‘2)) = ((𝐹‘2) − 0))
34	23, 3	rrx2pyel 49211	. . . . . . . 8 ⊢ (𝐹 ∈ 𝑋 → (𝐹‘2) ∈ ℝ)
35	34	recnd 11165	. . . . . . 7 ⊢ (𝐹 ∈ 𝑋 → (𝐹‘2) ∈ ℂ)
36	35	subid1d 11486	. . . . . 6 ⊢ (𝐹 ∈ 𝑋 → ((𝐹‘2) − 0) = (𝐹‘2))
37	33, 36	eqtrd 2774	. . . . 5 ⊢ (𝐹 ∈ 𝑋 → ((𝐹‘2) − ( 0 ‘2)) = (𝐹‘2))
38	37	oveq1d 7372	. . . 4 ⊢ (𝐹 ∈ 𝑋 → (((𝐹‘2) − ( 0 ‘2))↑2) = ((𝐹‘2)↑2))
39	28, 38	oveq12d 7375	. . 3 ⊢ (𝐹 ∈ 𝑋 → ((((𝐹‘1) − ( 0 ‘1))↑2) + (((𝐹‘2) − ( 0 ‘2))↑2)) = (((𝐹‘1)↑2) + ((𝐹‘2)↑2)))
40	39	fveq2d 6832	. 2 ⊢ (𝐹 ∈ 𝑋 → (√‘((((𝐹‘1) − ( 0 ‘1))↑2) + (((𝐹‘2) − ( 0 ‘2))↑2))) = (√‘(((𝐹‘1)↑2) + ((𝐹‘2)↑2))))
41	9, 40	eqtrd 2774	1 ⊢ (𝐹 ∈ 𝑋 → (𝐹𝐷 0 ) = (√‘(((𝐹‘1)↑2) + ((𝐹‘2)↑2))))

Syntax hints:   → wi 4   = wceq 1547   ∈ wcel 2119   ≠ wne 2934  Vcvv 3431  {csn 4556  {cpr 4558  ⟨cop 4562   × cxp 5617  ‘cfv 6486  (class class class)co 7357   ↑_m cmap 8764  ℝcr 11029  0cc0 11030  1c1 11031   + caddc 11033   − cmin 11369  2c2 12228  ↑cexp 14015  √csqrt 15187  distcds 17221  𝔼_hilcehl 25370

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-rep 5200  ax-sep 5219  ax-nul 5229  ax-pow 5295  ax-pr 5363  ax-un 7679  ax-inf2 9554  ax-cnex 11086  ax-resscn 11087  ax-1cn 11088  ax-icn 11089  ax-addcl 11090  ax-addrcl 11091  ax-mulcl 11092  ax-mulrcl 11093  ax-mulcom 11094  ax-addass 11095  ax-mulass 11096  ax-distr 11097  ax-i2m1 11098  ax-1ne0 11099  ax-1rid 11100  ax-rnegex 11101  ax-rrecex 11102  ax-cnre 11103  ax-pre-lttri 11104  ax-pre-lttrn 11105  ax-pre-ltadd 11106  ax-pre-mulgt0 11107  ax-pre-sup 11108  ax-addf 11109  ax-mulf 11110

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4263  df-if 4456  df-pw 4532  df-sn 4557  df-pr 4559  df-tp 4561  df-op 4563  df-uni 4840  df-int 4879  df-iun 4924  df-br 5074  df-opab 5136  df-mpt 5155  df-tr 5181  df-id 5514  df-eprel 5519  df-po 5527  df-so 5528  df-fr 5572  df-se 5573  df-we 5574  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-pred 6253  df-ord 6314  df-on 6315  df-lim 6316  df-suc 6317  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-isom 6495  df-riota 7314  df-ov 7360  df-oprab 7361  df-mpo 7362  df-of 7621  df-om 7808  df-1st 7932  df-2nd 7933  df-supp 8102  df-tpos 8167  df-frecs 8222  df-wrecs 8253  df-recs 8302  df-rdg 8340  df-1o 8396  df-2o 8397  df-er 8634  df-map 8766  df-ixp 8837  df-en 8885  df-dom 8886  df-sdom 8887  df-fin 8888  df-fsupp 9266  df-sup 9346  df-oi 9416  df-card 9855  df-pnf 11173  df-mnf 11174  df-xr 11175  df-ltxr 11176  df-le 11177  df-sub 11371  df-neg 11372  df-div 11800  df-nn 12167  df-2 12236  df-3 12237  df-4 12238  df-5 12239  df-6 12240  df-7 12241  df-8 12242  df-9 12243  df-n0 12430  df-z 12517  df-dec 12637  df-uz 12781  df-rp 12935  df-fz 13454  df-fzo 13601  df-seq 13956  df-exp 14016  df-hash 14285  df-cj 15053  df-re 15054  df-im 15055  df-sqrt 15189  df-abs 15190  df-clim 15442  df-sum 15641  df-struct 17109  df-sets 17126  df-slot 17144  df-ndx 17156  df-base 17172  df-ress 17193  df-plusg 17225  df-mulr 17226  df-starv 17227  df-sca 17228  df-vsca 17229  df-ip 17230  df-tset 17231  df-ple 17232  df-ds 17234  df-unif 17235  df-hom 17236  df-cco 17237  df-0g 17396  df-gsum 17397  df-prds 17402  df-pws 17404  df-mgm 18600  df-sgrp 18679  df-mnd 18695  df-mhm 18743  df-grp 18904  df-minusg 18905  df-sbg 18906  df-subg 19091  df-ghm 19180  df-cntz 19284  df-cmn 19749  df-abl 19750  df-mgp 20114  df-rng 20126  df-ur 20155  df-ring 20208  df-cring 20209  df-oppr 20309  df-dvdsr 20329  df-unit 20330  df-invr 20360  df-dvr 20373  df-rhm 20444  df-subrng 20519  df-subrg 20543  df-drng 20704  df-field 20705  df-staf 20812  df-srng 20813  df-lmod 20853  df-lss 20923  df-sra 21164  df-rgmod 21165  df-cnfld 21349  df-refld 21581  df-dsmm 21708  df-frlm 21723  df-nm 24566  df-tng 24568  df-tcph 25155  df-rrx 25371  df-ehl 25372

This theorem is referenced by:  ehl2eudis0lt  49225  itscnhlinecirc02plem3  49283