Metamath Proof Explorer


Theorem rrhre

Description: The RRHom homomorphism for the real numbers structure is the identity. (Contributed by Thierry Arnoux, 22-Oct-2017)

Ref Expression
Assertion rrhre ℝHom fld = I

Proof

Step Hyp Ref Expression
1 uniretop = topGen ran .
2 rehaus topGen ran . Haus
3 2 a1i topGen ran . Haus
4 rerrext fld ℝExt
5 eqid topGen ran . = topGen ran .
6 retopn topGen ran . = TopOpen fld
7 5 6 rrhcne fld ℝExt ℝHom fld topGen ran . Cn topGen ran .
8 4 7 mp1i ℝHom fld topGen ran . Cn topGen ran .
9 retop topGen ran . Top
10 1 toptopon topGen ran . Top topGen ran . TopOn
11 9 10 mpbi topGen ran . TopOn
12 idcn topGen ran . TopOn I topGen ran . Cn topGen ran .
13 11 12 ax-mp I topGen ran . Cn topGen ran .
14 13 a1i I topGen ran . Cn topGen ran .
15 9 a1i topGen ran . Top
16 f1oi I : 1-1 onto
17 f1of I : 1-1 onto I :
18 16 17 ax-mp I :
19 qssre
20 fss I : I :
21 18 19 20 mp2an I :
22 21 a1i I :
23 19 a1i
24 qdensere cls topGen ran . =
25 24 a1i cls topGen ran . =
26 9 a1i x a topGen ran . x a topGen ran . Top
27 simplr x a topGen ran . x a a topGen ran .
28 simpr x a topGen ran . x a x a
29 opnneip topGen ran . Top a topGen ran . x a a nei topGen ran . x
30 26 27 28 29 syl3anc x a topGen ran . x a a nei topGen ran . x
31 fvex nei topGen ran . x V
32 qex V
33 elrestr nei topGen ran . x V V a nei topGen ran . x a nei topGen ran . x 𝑡
34 31 32 33 mp3an12 a nei topGen ran . x a nei topGen ran . x 𝑡
35 30 34 syl x a topGen ran . x a a nei topGen ran . x 𝑡
36 inss2 a
37 resiima a I a = a
38 36 37 ax-mp I a = a
39 inss1 a a
40 38 39 eqsstri I a a
41 40 a1i x a topGen ran . x a I a a
42 imaeq2 b = a I b = I a
43 42 sseq1d b = a I b a I a a
44 43 rspcev a nei topGen ran . x 𝑡 I a a b nei topGen ran . x 𝑡 I b a
45 35 41 44 syl2anc x a topGen ran . x a b nei topGen ran . x 𝑡 I b a
46 45 ex x a topGen ran . x a b nei topGen ran . x 𝑡 I b a
47 46 ralrimiva x a topGen ran . x a b nei topGen ran . x 𝑡 I b a
48 47 ancli x x a topGen ran . x a b nei topGen ran . x 𝑡 I b a
49 24 eleq2i x cls topGen ran . x
50 49 biimpri x x cls topGen ran .
51 trnei topGen ran . TopOn x x cls topGen ran . nei topGen ran . x 𝑡 Fil
52 11 19 51 mp3an12 x x cls topGen ran . nei topGen ran . x 𝑡 Fil
53 50 52 mpbid x nei topGen ran . x 𝑡 Fil
54 isflf topGen ran . TopOn nei topGen ran . x 𝑡 Fil I : x topGen ran . fLimf nei topGen ran . x 𝑡 I x a topGen ran . x a b nei topGen ran . x 𝑡 I b a
55 11 21 54 mp3an13 nei topGen ran . x 𝑡 Fil x topGen ran . fLimf nei topGen ran . x 𝑡 I x a topGen ran . x a b nei topGen ran . x 𝑡 I b a
56 53 55 syl x x topGen ran . fLimf nei topGen ran . x 𝑡 I x a topGen ran . x a b nei topGen ran . x 𝑡 I b a
57 48 56 mpbird x x topGen ran . fLimf nei topGen ran . x 𝑡 I
58 57 ne0d x topGen ran . fLimf nei topGen ran . x 𝑡 I
59 58 adantl x topGen ran . fLimf nei topGen ran . x 𝑡 I
60 recusp fld CUnifSp
61 cuspusp fld CUnifSp fld UnifSp
62 60 61 ax-mp fld UnifSp
63 6 uspreg fld UnifSp topGen ran . Haus topGen ran . Reg
64 62 2 63 mp2an topGen ran . Reg
65 64 a1i topGen ran . Reg
66 resabs1 I = I
67 19 66 ax-mp I = I
68 1 cnrest I topGen ran . Cn topGen ran . I topGen ran . 𝑡 Cn topGen ran .
69 13 19 68 mp2an I topGen ran . 𝑡 Cn topGen ran .
70 67 69 eqeltrri I topGen ran . 𝑡 Cn topGen ran .
71 70 a1i I topGen ran . 𝑡 Cn topGen ran .
72 1 1 15 3 22 23 25 59 65 71 cnextfres1 topGen ran . CnExt topGen ran . I = I
73 72 mptru topGen ran . CnExt topGen ran . I = I
74 recms fld CMetSp
75 74 elexi fld V
76 5 6 rrhval fld V ℝHom fld = topGen ran . CnExt topGen ran . ℚHom fld
77 75 76 ax-mp ℝHom fld = topGen ran . CnExt topGen ran . ℚHom fld
78 qqhre ℚHom fld = I
79 78 fveq2i topGen ran . CnExt topGen ran . ℚHom fld = topGen ran . CnExt topGen ran . I
80 77 79 eqtri ℝHom fld = topGen ran . CnExt topGen ran . I
81 80 reseq1i ℝHom fld = topGen ran . CnExt topGen ran . I
82 73 81 67 3eqtr4i ℝHom fld = I
83 82 a1i ℝHom fld = I
84 1 3 8 14 83 23 25 hauseqcn ℝHom fld = I
85 84 mptru ℝHom fld = I