Metamath Proof Explorer


Theorem cnconst2

Description: A constant function is continuous. (Contributed by Mario Carneiro, 19-Mar-2015)

Ref Expression
Assertion cnconst2 J TopOn X K TopOn Y B Y X × B J Cn K

Proof

Step Hyp Ref Expression
1 fconst6g B Y X × B : X Y
2 1 3ad2ant3 J TopOn X K TopOn Y B Y X × B : X Y
3 2 adantr J TopOn X K TopOn Y B Y x X X × B : X Y
4 simpll3 J TopOn X K TopOn Y B Y x X y K B Y
5 simplr J TopOn X K TopOn Y B Y x X y K x X
6 fvconst2g B Y x X X × B x = B
7 4 5 6 syl2anc J TopOn X K TopOn Y B Y x X y K X × B x = B
8 7 eleq1d J TopOn X K TopOn Y B Y x X y K X × B x y B y
9 simpll1 J TopOn X K TopOn Y B Y x X y K B y J TopOn X
10 toponmax J TopOn X X J
11 9 10 syl J TopOn X K TopOn Y B Y x X y K B y X J
12 simplr J TopOn X K TopOn Y B Y x X y K B y x X
13 df-ima X × B X = ran X × B X
14 ssid X X
15 xpssres X X X × B X = X × B
16 14 15 ax-mp X × B X = X × B
17 16 rneqi ran X × B X = ran X × B
18 rnxpss ran X × B B
19 17 18 eqsstri ran X × B X B
20 simprr J TopOn X K TopOn Y B Y x X y K B y B y
21 20 snssd J TopOn X K TopOn Y B Y x X y K B y B y
22 19 21 sstrid J TopOn X K TopOn Y B Y x X y K B y ran X × B X y
23 13 22 eqsstrid J TopOn X K TopOn Y B Y x X y K B y X × B X y
24 eleq2 u = X x u x X
25 imaeq2 u = X X × B u = X × B X
26 25 sseq1d u = X X × B u y X × B X y
27 24 26 anbi12d u = X x u X × B u y x X X × B X y
28 27 rspcev X J x X X × B X y u J x u X × B u y
29 11 12 23 28 syl12anc J TopOn X K TopOn Y B Y x X y K B y u J x u X × B u y
30 29 expr J TopOn X K TopOn Y B Y x X y K B y u J x u X × B u y
31 8 30 sylbid J TopOn X K TopOn Y B Y x X y K X × B x y u J x u X × B u y
32 31 ralrimiva J TopOn X K TopOn Y B Y x X y K X × B x y u J x u X × B u y
33 simpl1 J TopOn X K TopOn Y B Y x X J TopOn X
34 simpl2 J TopOn X K TopOn Y B Y x X K TopOn Y
35 simpr J TopOn X K TopOn Y B Y x X x X
36 iscnp J TopOn X K TopOn Y x X X × B J CnP K x X × B : X Y y K X × B x y u J x u X × B u y
37 33 34 35 36 syl3anc J TopOn X K TopOn Y B Y x X X × B J CnP K x X × B : X Y y K X × B x y u J x u X × B u y
38 3 32 37 mpbir2and J TopOn X K TopOn Y B Y x X X × B J CnP K x
39 38 ralrimiva J TopOn X K TopOn Y B Y x X X × B J CnP K x
40 cncnp J TopOn X K TopOn Y X × B J Cn K X × B : X Y x X X × B J CnP K x
41 40 3adant3 J TopOn X K TopOn Y B Y X × B J Cn K X × B : X Y x X X × B J CnP K x
42 2 39 41 mpbir2and J TopOn X K TopOn Y B Y X × B J Cn K