Metamath Proof Explorer


Theorem connsuba

Description: Connectedness for a subspace. See connsub . (Contributed by FL, 29-May-2014) (Proof shortened by Mario Carneiro, 10-Mar-2015)

Ref Expression
Assertion connsuba ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) → ( ( 𝐽t 𝐴 ) ∈ Conn ↔ ∀ 𝑥𝐽𝑦𝐽 ( ( ( 𝑥𝐴 ) ≠ ∅ ∧ ( 𝑦𝐴 ) ≠ ∅ ∧ ( ( 𝑥𝑦 ) ∩ 𝐴 ) = ∅ ) → ( ( 𝑥𝑦 ) ∩ 𝐴 ) ≠ 𝐴 ) ) )

Proof

Step Hyp Ref Expression
1 resttopon ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) → ( 𝐽t 𝐴 ) ∈ ( TopOn ‘ 𝐴 ) )
2 dfconn2 ( ( 𝐽t 𝐴 ) ∈ ( TopOn ‘ 𝐴 ) → ( ( 𝐽t 𝐴 ) ∈ Conn ↔ ∀ 𝑢 ∈ ( 𝐽t 𝐴 ) ∀ 𝑣 ∈ ( 𝐽t 𝐴 ) ( ( 𝑢 ≠ ∅ ∧ 𝑣 ≠ ∅ ∧ ( 𝑢𝑣 ) = ∅ ) → ( 𝑢𝑣 ) ≠ 𝐴 ) ) )
3 1 2 syl ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) → ( ( 𝐽t 𝐴 ) ∈ Conn ↔ ∀ 𝑢 ∈ ( 𝐽t 𝐴 ) ∀ 𝑣 ∈ ( 𝐽t 𝐴 ) ( ( 𝑢 ≠ ∅ ∧ 𝑣 ≠ ∅ ∧ ( 𝑢𝑣 ) = ∅ ) → ( 𝑢𝑣 ) ≠ 𝐴 ) ) )
4 vex 𝑥 ∈ V
5 4 inex1 ( 𝑥𝐴 ) ∈ V
6 5 a1i ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑥𝐽 ) → ( 𝑥𝐴 ) ∈ V )
7 toponmax ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) → 𝑋𝐽 )
8 7 adantr ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) → 𝑋𝐽 )
9 simpr ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) → 𝐴𝑋 )
10 8 9 ssexd ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) → 𝐴 ∈ V )
11 elrest ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴 ∈ V ) → ( 𝑢 ∈ ( 𝐽t 𝐴 ) ↔ ∃ 𝑥𝐽 𝑢 = ( 𝑥𝐴 ) ) )
12 10 11 syldan ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) → ( 𝑢 ∈ ( 𝐽t 𝐴 ) ↔ ∃ 𝑥𝐽 𝑢 = ( 𝑥𝐴 ) ) )
13 vex 𝑦 ∈ V
14 13 inex1 ( 𝑦𝐴 ) ∈ V
15 14 a1i ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑦𝐽 ) → ( 𝑦𝐴 ) ∈ V )
16 elrest ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴 ∈ V ) → ( 𝑣 ∈ ( 𝐽t 𝐴 ) ↔ ∃ 𝑦𝐽 𝑣 = ( 𝑦𝐴 ) ) )
17 10 16 syldan ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) → ( 𝑣 ∈ ( 𝐽t 𝐴 ) ↔ ∃ 𝑦𝐽 𝑣 = ( 𝑦𝐴 ) ) )
18 17 adantr ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) → ( 𝑣 ∈ ( 𝐽t 𝐴 ) ↔ ∃ 𝑦𝐽 𝑣 = ( 𝑦𝐴 ) ) )
19 simplr ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → 𝑢 = ( 𝑥𝐴 ) )
20 19 neeq1d ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → ( 𝑢 ≠ ∅ ↔ ( 𝑥𝐴 ) ≠ ∅ ) )
21 simpr ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → 𝑣 = ( 𝑦𝐴 ) )
22 21 neeq1d ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → ( 𝑣 ≠ ∅ ↔ ( 𝑦𝐴 ) ≠ ∅ ) )
23 19 21 ineq12d ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → ( 𝑢𝑣 ) = ( ( 𝑥𝐴 ) ∩ ( 𝑦𝐴 ) ) )
24 inindir ( ( 𝑥𝑦 ) ∩ 𝐴 ) = ( ( 𝑥𝐴 ) ∩ ( 𝑦𝐴 ) )
25 23 24 eqtr4di ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → ( 𝑢𝑣 ) = ( ( 𝑥𝑦 ) ∩ 𝐴 ) )
26 25 eqeq1d ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → ( ( 𝑢𝑣 ) = ∅ ↔ ( ( 𝑥𝑦 ) ∩ 𝐴 ) = ∅ ) )
27 20 22 26 3anbi123d ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → ( ( 𝑢 ≠ ∅ ∧ 𝑣 ≠ ∅ ∧ ( 𝑢𝑣 ) = ∅ ) ↔ ( ( 𝑥𝐴 ) ≠ ∅ ∧ ( 𝑦𝐴 ) ≠ ∅ ∧ ( ( 𝑥𝑦 ) ∩ 𝐴 ) = ∅ ) ) )
28 19 21 uneq12d ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → ( 𝑢𝑣 ) = ( ( 𝑥𝐴 ) ∪ ( 𝑦𝐴 ) ) )
29 indir ( ( 𝑥𝑦 ) ∩ 𝐴 ) = ( ( 𝑥𝐴 ) ∪ ( 𝑦𝐴 ) )
30 28 29 eqtr4di ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → ( 𝑢𝑣 ) = ( ( 𝑥𝑦 ) ∩ 𝐴 ) )
31 30 neeq1d ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → ( ( 𝑢𝑣 ) ≠ 𝐴 ↔ ( ( 𝑥𝑦 ) ∩ 𝐴 ) ≠ 𝐴 ) )
32 27 31 imbi12d ( ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) ∧ 𝑣 = ( 𝑦𝐴 ) ) → ( ( ( 𝑢 ≠ ∅ ∧ 𝑣 ≠ ∅ ∧ ( 𝑢𝑣 ) = ∅ ) → ( 𝑢𝑣 ) ≠ 𝐴 ) ↔ ( ( ( 𝑥𝐴 ) ≠ ∅ ∧ ( 𝑦𝐴 ) ≠ ∅ ∧ ( ( 𝑥𝑦 ) ∩ 𝐴 ) = ∅ ) → ( ( 𝑥𝑦 ) ∩ 𝐴 ) ≠ 𝐴 ) ) )
33 15 18 32 ralxfr2d ( ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) ∧ 𝑢 = ( 𝑥𝐴 ) ) → ( ∀ 𝑣 ∈ ( 𝐽t 𝐴 ) ( ( 𝑢 ≠ ∅ ∧ 𝑣 ≠ ∅ ∧ ( 𝑢𝑣 ) = ∅ ) → ( 𝑢𝑣 ) ≠ 𝐴 ) ↔ ∀ 𝑦𝐽 ( ( ( 𝑥𝐴 ) ≠ ∅ ∧ ( 𝑦𝐴 ) ≠ ∅ ∧ ( ( 𝑥𝑦 ) ∩ 𝐴 ) = ∅ ) → ( ( 𝑥𝑦 ) ∩ 𝐴 ) ≠ 𝐴 ) ) )
34 6 12 33 ralxfr2d ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) → ( ∀ 𝑢 ∈ ( 𝐽t 𝐴 ) ∀ 𝑣 ∈ ( 𝐽t 𝐴 ) ( ( 𝑢 ≠ ∅ ∧ 𝑣 ≠ ∅ ∧ ( 𝑢𝑣 ) = ∅ ) → ( 𝑢𝑣 ) ≠ 𝐴 ) ↔ ∀ 𝑥𝐽𝑦𝐽 ( ( ( 𝑥𝐴 ) ≠ ∅ ∧ ( 𝑦𝐴 ) ≠ ∅ ∧ ( ( 𝑥𝑦 ) ∩ 𝐴 ) = ∅ ) → ( ( 𝑥𝑦 ) ∩ 𝐴 ) ≠ 𝐴 ) ) )
35 3 34 bitrd ( ( 𝐽 ∈ ( TopOn ‘ 𝑋 ) ∧ 𝐴𝑋 ) → ( ( 𝐽t 𝐴 ) ∈ Conn ↔ ∀ 𝑥𝐽𝑦𝐽 ( ( ( 𝑥𝐴 ) ≠ ∅ ∧ ( 𝑦𝐴 ) ≠ ∅ ∧ ( ( 𝑥𝑦 ) ∩ 𝐴 ) = ∅ ) → ( ( 𝑥𝑦 ) ∩ 𝐴 ) ≠ 𝐴 ) ) )