Metamath Proof Explorer


Theorem iccntr

Description: The interior of a closed interval in the standard topology on RR is the corresponding open interval. (Contributed by Mario Carneiro, 1-Sep-2014)

Ref Expression
Assertion iccntr ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) = ( 𝐴 (,) 𝐡 ) )

Proof

Step Hyp Ref Expression
1 rexr ⊒ ( 𝐴 ∈ ℝ β†’ 𝐴 ∈ ℝ* )
2 rexr ⊒ ( 𝐡 ∈ ℝ β†’ 𝐡 ∈ ℝ* )
3 icc0 ⊒ ( ( 𝐴 ∈ ℝ* ∧ 𝐡 ∈ ℝ* ) β†’ ( ( 𝐴 [,] 𝐡 ) = βˆ… ↔ 𝐡 < 𝐴 ) )
4 1 2 3 syl2an ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( 𝐴 [,] 𝐡 ) = βˆ… ↔ 𝐡 < 𝐴 ) )
5 4 biimpar ⊒ ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 < 𝐴 ) β†’ ( 𝐴 [,] 𝐡 ) = βˆ… )
6 5 fveq2d ⊒ ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 < 𝐴 ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) = ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ βˆ… ) )
7 retop ⊒ ( topGen β€˜ ran (,) ) ∈ Top
8 ntr0 ⊒ ( ( topGen β€˜ ran (,) ) ∈ Top β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ βˆ… ) = βˆ… )
9 7 8 ax-mp ⊒ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ βˆ… ) = βˆ…
10 0ss ⊒ βˆ… βŠ† ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) )
11 9 10 eqsstri ⊒ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ βˆ… ) βŠ† ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) )
12 6 11 eqsstrdi ⊒ ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 < 𝐴 ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) ) )
13 iccssre ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( 𝐴 [,] 𝐡 ) βŠ† ℝ )
14 uniretop ⊒ ℝ = βˆͺ ( topGen β€˜ ran (,) )
15 14 ntrss2 ⊒ ( ( ( topGen β€˜ ran (,) ) ∈ Top ∧ ( 𝐴 [,] 𝐡 ) βŠ† ℝ ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( 𝐴 [,] 𝐡 ) )
16 7 13 15 sylancr ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( 𝐴 [,] 𝐡 ) )
17 16 adantr ⊒ ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ≀ 𝐡 ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( 𝐴 [,] 𝐡 ) )
18 1 2 anim12i ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( 𝐴 ∈ ℝ* ∧ 𝐡 ∈ ℝ* ) )
19 uncom ⊒ ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) ) = ( ( 𝐴 (,) 𝐡 ) βˆͺ { 𝐴 , 𝐡 } )
20 prunioo ⊒ ( ( 𝐴 ∈ ℝ* ∧ 𝐡 ∈ ℝ* ∧ 𝐴 ≀ 𝐡 ) β†’ ( ( 𝐴 (,) 𝐡 ) βˆͺ { 𝐴 , 𝐡 } ) = ( 𝐴 [,] 𝐡 ) )
21 19 20 eqtrid ⊒ ( ( 𝐴 ∈ ℝ* ∧ 𝐡 ∈ ℝ* ∧ 𝐴 ≀ 𝐡 ) β†’ ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) ) = ( 𝐴 [,] 𝐡 ) )
22 21 3expa ⊒ ( ( ( 𝐴 ∈ ℝ* ∧ 𝐡 ∈ ℝ* ) ∧ 𝐴 ≀ 𝐡 ) β†’ ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) ) = ( 𝐴 [,] 𝐡 ) )
23 18 22 sylan ⊒ ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ≀ 𝐡 ) β†’ ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) ) = ( 𝐴 [,] 𝐡 ) )
24 17 23 sseqtrrd ⊒ ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ≀ 𝐡 ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) ) )
25 simpr ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ 𝐡 ∈ ℝ )
26 simpl ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ 𝐴 ∈ ℝ )
27 12 24 25 26 ltlecasei ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) ) )
28 14 ntropn ⊒ ( ( ( topGen β€˜ ran (,) ) ∈ Top ∧ ( 𝐴 [,] 𝐡 ) βŠ† ℝ ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ∈ ( topGen β€˜ ran (,) ) )
29 7 13 28 sylancr ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ∈ ( topGen β€˜ ran (,) ) )
30 eqid ⊒ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) = ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) )
31 30 rexmet ⊒ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ∈ ( ∞Met β€˜ ℝ )
32 eqid ⊒ ( MetOpen β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) = ( MetOpen β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) )
33 30 32 tgioo ⊒ ( topGen β€˜ ran (,) ) = ( MetOpen β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) )
34 33 mopni2 ⊒ ( ( ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ∈ ( ∞Met β€˜ ℝ ) ∧ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ∈ ( topGen β€˜ ran (,) ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) β†’ βˆƒ π‘₯ ∈ ℝ+ ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
35 31 34 mp3an1 ⊒ ( ( ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ∈ ( topGen β€˜ ran (,) ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) β†’ βˆƒ π‘₯ ∈ ℝ+ ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
36 29 35 sylan ⊒ ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) β†’ βˆƒ π‘₯ ∈ ℝ+ ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
37 26 ad2antrr ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ 𝐴 ∈ ℝ )
38 rphalfcl ⊒ ( π‘₯ ∈ ℝ+ β†’ ( π‘₯ / 2 ) ∈ ℝ+ )
39 38 adantl ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( π‘₯ / 2 ) ∈ ℝ+ )
40 37 39 ltsubrpd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) < 𝐴 )
41 39 rpred ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( π‘₯ / 2 ) ∈ ℝ )
42 37 41 resubcld ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ℝ )
43 42 37 ltnled ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) < 𝐴 ↔ Β¬ 𝐴 ≀ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ) )
44 40 43 mpbid ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ Β¬ 𝐴 ≀ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) )
45 rpre ⊒ ( π‘₯ ∈ ℝ+ β†’ π‘₯ ∈ ℝ )
46 45 adantl ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ π‘₯ ∈ ℝ )
47 rphalflt ⊒ ( π‘₯ ∈ ℝ+ β†’ ( π‘₯ / 2 ) < π‘₯ )
48 47 adantl ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( π‘₯ / 2 ) < π‘₯ )
49 41 46 37 48 ltsub2dd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 βˆ’ π‘₯ ) < ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) )
50 37 46 readdcld ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 + π‘₯ ) ∈ ℝ )
51 ltaddrp ⊒ ( ( 𝐴 ∈ ℝ ∧ π‘₯ ∈ ℝ+ ) β†’ 𝐴 < ( 𝐴 + π‘₯ ) )
52 37 51 sylancom ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ 𝐴 < ( 𝐴 + π‘₯ ) )
53 42 37 50 40 52 lttrd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) < ( 𝐴 + π‘₯ ) )
54 37 46 resubcld ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 βˆ’ π‘₯ ) ∈ ℝ )
55 54 rexrd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 βˆ’ π‘₯ ) ∈ ℝ* )
56 50 rexrd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 + π‘₯ ) ∈ ℝ* )
57 elioo2 ⊒ ( ( ( 𝐴 βˆ’ π‘₯ ) ∈ ℝ* ∧ ( 𝐴 + π‘₯ ) ∈ ℝ* ) β†’ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( ( 𝐴 βˆ’ π‘₯ ) (,) ( 𝐴 + π‘₯ ) ) ↔ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ℝ ∧ ( 𝐴 βˆ’ π‘₯ ) < ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∧ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) < ( 𝐴 + π‘₯ ) ) ) )
58 55 56 57 syl2anc ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( ( 𝐴 βˆ’ π‘₯ ) (,) ( 𝐴 + π‘₯ ) ) ↔ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ℝ ∧ ( 𝐴 βˆ’ π‘₯ ) < ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∧ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) < ( 𝐴 + π‘₯ ) ) ) )
59 42 49 53 58 mpbir3and ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( ( 𝐴 βˆ’ π‘₯ ) (,) ( 𝐴 + π‘₯ ) ) )
60 30 bl2ioo ⊒ ( ( 𝐴 ∈ ℝ ∧ π‘₯ ∈ ℝ ) β†’ ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) = ( ( 𝐴 βˆ’ π‘₯ ) (,) ( 𝐴 + π‘₯ ) ) )
61 37 46 60 syl2anc ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) = ( ( 𝐴 βˆ’ π‘₯ ) (,) ( 𝐴 + π‘₯ ) ) )
62 59 61 eleqtrrd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) )
63 ssel ⊒ ( ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) β†’ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) β†’ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) )
64 62 63 syl5com ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) β†’ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) )
65 16 ad2antrr ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( 𝐴 [,] 𝐡 ) )
66 65 sseld ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) β†’ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( 𝐴 [,] 𝐡 ) ) )
67 elicc2 ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( 𝐴 [,] 𝐡 ) ↔ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ℝ ∧ 𝐴 ≀ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∧ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ≀ 𝐡 ) ) )
68 simp2 ⊒ ( ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ℝ ∧ 𝐴 ≀ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∧ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ≀ 𝐡 ) β†’ 𝐴 ≀ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) )
69 67 68 syl6bi ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( 𝐴 [,] 𝐡 ) β†’ 𝐴 ≀ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ) )
70 69 ad2antrr ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ∈ ( 𝐴 [,] 𝐡 ) β†’ 𝐴 ≀ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ) )
71 64 66 70 3syld ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) β†’ 𝐴 ≀ ( 𝐴 βˆ’ ( π‘₯ / 2 ) ) ) )
72 44 71 mtod ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ Β¬ ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
73 72 nrexdv ⊒ ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) β†’ Β¬ βˆƒ π‘₯ ∈ ℝ+ ( 𝐴 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
74 36 73 pm2.65da ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ Β¬ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
75 33 mopni2 ⊒ ( ( ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ∈ ( ∞Met β€˜ ℝ ) ∧ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ∈ ( topGen β€˜ ran (,) ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) β†’ βˆƒ π‘₯ ∈ ℝ+ ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
76 31 75 mp3an1 ⊒ ( ( ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ∈ ( topGen β€˜ ran (,) ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) β†’ βˆƒ π‘₯ ∈ ℝ+ ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
77 29 76 sylan ⊒ ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) β†’ βˆƒ π‘₯ ∈ ℝ+ ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
78 25 ad2antrr ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ 𝐡 ∈ ℝ )
79 38 adantl ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( π‘₯ / 2 ) ∈ ℝ+ )
80 78 79 ltaddrpd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ 𝐡 < ( 𝐡 + ( π‘₯ / 2 ) ) )
81 79 rpred ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( π‘₯ / 2 ) ∈ ℝ )
82 78 81 readdcld ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ℝ )
83 78 82 ltnled ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 < ( 𝐡 + ( π‘₯ / 2 ) ) ↔ Β¬ ( 𝐡 + ( π‘₯ / 2 ) ) ≀ 𝐡 ) )
84 80 83 mpbid ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ Β¬ ( 𝐡 + ( π‘₯ / 2 ) ) ≀ 𝐡 )
85 45 adantl ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ π‘₯ ∈ ℝ )
86 78 85 resubcld ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 βˆ’ π‘₯ ) ∈ ℝ )
87 ltsubrp ⊒ ( ( 𝐡 ∈ ℝ ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 βˆ’ π‘₯ ) < 𝐡 )
88 78 87 sylancom ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 βˆ’ π‘₯ ) < 𝐡 )
89 86 78 82 88 80 lttrd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 βˆ’ π‘₯ ) < ( 𝐡 + ( π‘₯ / 2 ) ) )
90 47 adantl ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( π‘₯ / 2 ) < π‘₯ )
91 81 85 78 90 ltadd2dd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) < ( 𝐡 + π‘₯ ) )
92 86 rexrd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 βˆ’ π‘₯ ) ∈ ℝ* )
93 78 85 readdcld ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 + π‘₯ ) ∈ ℝ )
94 93 rexrd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 + π‘₯ ) ∈ ℝ* )
95 elioo2 ⊒ ( ( ( 𝐡 βˆ’ π‘₯ ) ∈ ℝ* ∧ ( 𝐡 + π‘₯ ) ∈ ℝ* ) β†’ ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( ( 𝐡 βˆ’ π‘₯ ) (,) ( 𝐡 + π‘₯ ) ) ↔ ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ℝ ∧ ( 𝐡 βˆ’ π‘₯ ) < ( 𝐡 + ( π‘₯ / 2 ) ) ∧ ( 𝐡 + ( π‘₯ / 2 ) ) < ( 𝐡 + π‘₯ ) ) ) )
96 92 94 95 syl2anc ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( ( 𝐡 βˆ’ π‘₯ ) (,) ( 𝐡 + π‘₯ ) ) ↔ ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ℝ ∧ ( 𝐡 βˆ’ π‘₯ ) < ( 𝐡 + ( π‘₯ / 2 ) ) ∧ ( 𝐡 + ( π‘₯ / 2 ) ) < ( 𝐡 + π‘₯ ) ) ) )
97 82 89 91 96 mpbir3and ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( ( 𝐡 βˆ’ π‘₯ ) (,) ( 𝐡 + π‘₯ ) ) )
98 30 bl2ioo ⊒ ( ( 𝐡 ∈ ℝ ∧ π‘₯ ∈ ℝ ) β†’ ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) = ( ( 𝐡 βˆ’ π‘₯ ) (,) ( 𝐡 + π‘₯ ) ) )
99 78 85 98 syl2anc ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) = ( ( 𝐡 βˆ’ π‘₯ ) (,) ( 𝐡 + π‘₯ ) ) )
100 97 99 eleqtrrd ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) )
101 ssel ⊒ ( ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) β†’ ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) )
102 100 101 syl5com ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) )
103 16 ad2antrr ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( 𝐴 [,] 𝐡 ) )
104 103 sseld ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( 𝐴 [,] 𝐡 ) ) )
105 elicc2 ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( 𝐴 [,] 𝐡 ) ↔ ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ℝ ∧ 𝐴 ≀ ( 𝐡 + ( π‘₯ / 2 ) ) ∧ ( 𝐡 + ( π‘₯ / 2 ) ) ≀ 𝐡 ) ) )
106 simp3 ⊒ ( ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ℝ ∧ 𝐴 ≀ ( 𝐡 + ( π‘₯ / 2 ) ) ∧ ( 𝐡 + ( π‘₯ / 2 ) ) ≀ 𝐡 ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) ≀ 𝐡 )
107 105 106 syl6bi ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( 𝐴 [,] 𝐡 ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) ≀ 𝐡 ) )
108 107 ad2antrr ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐡 + ( π‘₯ / 2 ) ) ∈ ( 𝐴 [,] 𝐡 ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) ≀ 𝐡 ) )
109 102 104 108 3syld ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ ( ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) β†’ ( 𝐡 + ( π‘₯ / 2 ) ) ≀ 𝐡 ) )
110 84 109 mtod ⊒ ( ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ∧ π‘₯ ∈ ℝ+ ) β†’ Β¬ ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
111 110 nrexdv ⊒ ( ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) ∧ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) β†’ Β¬ βˆƒ π‘₯ ∈ ℝ+ ( 𝐡 ( ball β€˜ ( ( abs ∘ βˆ’ ) β†Ύ ( ℝ Γ— ℝ ) ) ) π‘₯ ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
112 77 111 pm2.65da ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ Β¬ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
113 eleq1 ⊒ ( π‘₯ = 𝐴 β†’ ( π‘₯ ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ↔ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) )
114 113 notbid ⊒ ( π‘₯ = 𝐴 β†’ ( Β¬ π‘₯ ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ↔ Β¬ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) )
115 eleq1 ⊒ ( π‘₯ = 𝐡 β†’ ( π‘₯ ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ↔ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) )
116 115 notbid ⊒ ( π‘₯ = 𝐡 β†’ ( Β¬ π‘₯ ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ↔ Β¬ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) )
117 114 116 ralprg ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( βˆ€ π‘₯ ∈ { 𝐴 , 𝐡 } Β¬ π‘₯ ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ↔ ( Β¬ 𝐴 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ∧ Β¬ 𝐡 ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ) ) )
118 74 112 117 mpbir2and ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ βˆ€ π‘₯ ∈ { 𝐴 , 𝐡 } Β¬ π‘₯ ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
119 disjr ⊒ ( ( ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ∩ { 𝐴 , 𝐡 } ) = βˆ… ↔ βˆ€ π‘₯ ∈ { 𝐴 , 𝐡 } Β¬ π‘₯ ∈ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
120 118 119 sylibr ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ∩ { 𝐴 , 𝐡 } ) = βˆ… )
121 disjssun ⊒ ( ( ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) ∩ { 𝐴 , 𝐡 } ) = βˆ… β†’ ( ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) ) ↔ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( 𝐴 (,) 𝐡 ) ) )
122 120 121 syl ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( { 𝐴 , 𝐡 } βˆͺ ( 𝐴 (,) 𝐡 ) ) ↔ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( 𝐴 (,) 𝐡 ) ) )
123 27 122 mpbid ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) βŠ† ( 𝐴 (,) 𝐡 ) )
124 iooretop ⊒ ( 𝐴 (,) 𝐡 ) ∈ ( topGen β€˜ ran (,) )
125 ioossicc ⊒ ( 𝐴 (,) 𝐡 ) βŠ† ( 𝐴 [,] 𝐡 )
126 14 ssntr ⊒ ( ( ( ( topGen β€˜ ran (,) ) ∈ Top ∧ ( 𝐴 [,] 𝐡 ) βŠ† ℝ ) ∧ ( ( 𝐴 (,) 𝐡 ) ∈ ( topGen β€˜ ran (,) ) ∧ ( 𝐴 (,) 𝐡 ) βŠ† ( 𝐴 [,] 𝐡 ) ) ) β†’ ( 𝐴 (,) 𝐡 ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
127 124 125 126 mpanr12 ⊒ ( ( ( topGen β€˜ ran (,) ) ∈ Top ∧ ( 𝐴 [,] 𝐡 ) βŠ† ℝ ) β†’ ( 𝐴 (,) 𝐡 ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
128 7 13 127 sylancr ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( 𝐴 (,) 𝐡 ) βŠ† ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) )
129 123 128 eqssd ⊒ ( ( 𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ) β†’ ( ( int β€˜ ( topGen β€˜ ran (,) ) ) β€˜ ( 𝐴 [,] 𝐡 ) ) = ( 𝐴 (,) 𝐡 ) )