This is an inofficial mirror of http://metamath.tirix.org for personal testing of a visualizer extension only.

Metamath Proof Explorer

Theorem cncls2

Description: Continuity in terms of closure. (Contributed by Mario Carneiro, 25-Aug-2015)

Ref Expression
Assertion cncls2 
|- ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) -> ( F e. ( J Cn K ) <-> ( F : X --> Y /\ A. x e. ~P Y ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) ) )

Proof

Step Hyp Ref Expression
1 cnf2 
 |-  ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) /\ F e. ( J Cn K ) ) -> F : X --> Y )
2 1 3expia 
 |-  ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) -> ( F e. ( J Cn K ) -> F : X --> Y ) )
3 elpwi 
 |-  ( x e. ~P Y -> x C_ Y )
4 3 adantl 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ x e. ~P Y ) -> x C_ Y )
5 toponuni 
 |-  ( K e. ( TopOn ` Y ) -> Y = U. K )
6 5 ad2antlr 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ x e. ~P Y ) -> Y = U. K )
7 4 6 sseqtrd 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ x e. ~P Y ) -> x C_ U. K )
8 eqid 
 |-  U. K = U. K
9 8 cncls2i 
 |-  ( ( F e. ( J Cn K ) /\ x C_ U. K ) -> ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) )
10 9 expcom 
 |-  ( x C_ U. K -> ( F e. ( J Cn K ) -> ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) )
11 7 10 syl 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ x e. ~P Y ) -> ( F e. ( J Cn K ) -> ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) )
12 11 ralrimdva 
 |-  ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) -> ( F e. ( J Cn K ) -> A. x e. ~P Y ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) )
13 2 12 jcad 
 |-  ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) -> ( F e. ( J Cn K ) -> ( F : X --> Y /\ A. x e. ~P Y ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) ) )
14 8 cldss2 
 |-  ( Clsd ` K ) C_ ~P U. K
15 5 ad2antlr 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ F : X --> Y ) -> Y = U. K )
16 15 pweqd 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ F : X --> Y ) -> ~P Y = ~P U. K )
17 14 16 sseqtrrid 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ F : X --> Y ) -> ( Clsd ` K ) C_ ~P Y )
18 17 sseld 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ F : X --> Y ) -> ( x e. ( Clsd ` K ) -> x e. ~P Y ) )
19 18 imim1d 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ F : X --> Y ) -> ( ( x e. ~P Y -> ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) -> ( x e. ( Clsd ` K ) -> ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) ) )
20 cldcls 
 |-  ( x e. ( Clsd ` K ) -> ( ( cls ` K ) ` x ) = x )
21 20 ad2antll 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ ( F : X --> Y /\ x e. ( Clsd ` K ) ) ) -> ( ( cls ` K ) ` x ) = x )
22 21 imaeq2d 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ ( F : X --> Y /\ x e. ( Clsd ` K ) ) ) -> ( `' F " ( ( cls ` K ) ` x ) ) = ( `' F " x ) )
23 22 sseq2d 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ ( F : X --> Y /\ x e. ( Clsd ` K ) ) ) -> ( ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) <-> ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " x ) ) )
24 topontop 
 |-  ( J e. ( TopOn ` X ) -> J e. Top )
25 24 ad2antrr 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ ( F : X --> Y /\ x e. ( Clsd ` K ) ) ) -> J e. Top )
26 cnvimass 
 |-  ( `' F " x ) C_ dom F
27 fdm 
 |-  ( F : X --> Y -> dom F = X )
28 27 ad2antrl 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ ( F : X --> Y /\ x e. ( Clsd ` K ) ) ) -> dom F = X )
29 toponuni 
 |-  ( J e. ( TopOn ` X ) -> X = U. J )
30 29 ad2antrr 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ ( F : X --> Y /\ x e. ( Clsd ` K ) ) ) -> X = U. J )
31 28 30 eqtrd 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ ( F : X --> Y /\ x e. ( Clsd ` K ) ) ) -> dom F = U. J )
32 26 31 sseqtrid 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ ( F : X --> Y /\ x e. ( Clsd ` K ) ) ) -> ( `' F " x ) C_ U. J )
33 eqid 
 |-  U. J = U. J
34 33 iscld4 
 |-  ( ( J e. Top /\ ( `' F " x ) C_ U. J ) -> ( ( `' F " x ) e. ( Clsd ` J ) <-> ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " x ) ) )
35 25 32 34 syl2anc 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ ( F : X --> Y /\ x e. ( Clsd ` K ) ) ) -> ( ( `' F " x ) e. ( Clsd ` J ) <-> ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " x ) ) )
36 23 35 bitr4d 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ ( F : X --> Y /\ x e. ( Clsd ` K ) ) ) -> ( ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) <-> ( `' F " x ) e. ( Clsd ` J ) ) )
37 36 expr 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ F : X --> Y ) -> ( x e. ( Clsd ` K ) -> ( ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) <-> ( `' F " x ) e. ( Clsd ` J ) ) ) )
38 37 pm5.74d 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ F : X --> Y ) -> ( ( x e. ( Clsd ` K ) -> ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) <-> ( x e. ( Clsd ` K ) -> ( `' F " x ) e. ( Clsd ` J ) ) ) )
39 19 38 sylibd 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ F : X --> Y ) -> ( ( x e. ~P Y -> ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) -> ( x e. ( Clsd ` K ) -> ( `' F " x ) e. ( Clsd ` J ) ) ) )
40 39 ralimdv2 
 |-  ( ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) /\ F : X --> Y ) -> ( A. x e. ~P Y ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) -> A. x e. ( Clsd ` K ) ( `' F " x ) e. ( Clsd ` J ) ) )
41 40 imdistanda 
 |-  ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) -> ( ( F : X --> Y /\ A. x e. ~P Y ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) -> ( F : X --> Y /\ A. x e. ( Clsd ` K ) ( `' F " x ) e. ( Clsd ` J ) ) ) )
42 iscncl 
 |-  ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) -> ( F e. ( J Cn K ) <-> ( F : X --> Y /\ A. x e. ( Clsd ` K ) ( `' F " x ) e. ( Clsd ` J ) ) ) )
43 41 42 sylibrd 
 |-  ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) -> ( ( F : X --> Y /\ A. x e. ~P Y ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) -> F e. ( J Cn K ) ) )
44 13 43 impbid 
 |-  ( ( J e. ( TopOn ` X ) /\ K e. ( TopOn ` Y ) ) -> ( F e. ( J Cn K ) <-> ( F : X --> Y /\ A. x e. ~P Y ( ( cls ` J ) ` ( `' F " x ) ) C_ ( `' F " ( ( cls ` K ) ` x ) ) ) ) )