Metamath Proof Explorer


Theorem io1ii

Description: ( A (,] 1 ) is open in II . (Contributed by Zhi Wang, 9-Sep-2024)

Ref Expression
Assertion io1ii 0AA1II

Proof

Step Hyp Ref Expression
1 0xr 0*
2 lerelxr *×*
3 2 brel 0A0*A*
4 3 simprd 0AA*
5 rexr xx*
6 xrlelttr 0*A*x*0AA<x0<x
7 xrltle 0*x*0<x0x
8 7 3adant2 0*A*x*0<x0x
9 6 8 syld 0*A*x*0AA<x0x
10 1 4 5 9 mp3an3an 0Ax0AA<x0x
11 10 imp 0Ax0AA<x0x
12 11 3impdi 0AxA<x0x
13 12 3expib 0AxA<x0x
14 13 pm4.71d 0AxA<xxA<x0x
15 14 anbi1d 0AxA<xx1xA<x0xx1
16 df-3an xA<xx1xA<xx1
17 3anass x0xx1x0xx1
18 17 anbi2i xA<xx0xx1xA<xx0xx1
19 anandi xA<x0xx1xA<xx0xx1
20 anass xA<x0xx1xA<x0xx1
21 anass xA<x0xx1xA<x0xx1
22 20 21 bitr2i xA<x0xx1xA<x0xx1
23 18 19 22 3bitr2i xA<xx0xx1xA<x0xx1
24 15 16 23 3bitr4g 0AxA<xx1xA<xx0xx1
25 1re 1
26 elioc2 A*1xA1xA<xx1
27 4 25 26 sylancl 0AxA1xA<xx1
28 elin xA+∞01xA+∞x01
29 elicc01 x01x0xx1
30 29 anbi2i xA+∞x01xA+∞x0xx1
31 28 30 bitri xA+∞01xA+∞x0xx1
32 elioopnf A*xA+∞xA<x
33 4 32 syl 0AxA+∞xA<x
34 33 anbi1d 0AxA+∞x0xx1xA<xx0xx1
35 31 34 bitrid 0AxA+∞01xA<xx0xx1
36 24 27 35 3bitr4rd 0AxA+∞01xA1
37 36 eqrdv 0AA+∞01=A1
38 fvex topGenran.V
39 ovex 01V
40 iooretop A+∞topGenran.
41 elrestr topGenran.V01VA+∞topGenran.A+∞01topGenran.𝑡01
42 38 39 40 41 mp3an A+∞01topGenran.𝑡01
43 dfii2 II=topGenran.𝑡01
44 42 43 eleqtrri A+∞01II
45 37 44 eqeltrrdi 0AA1II