Theorem cnconst2 15098

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

Assertion

Ref	Expression
cnconst2	|- ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) -> ( X X. { B } ) e. ( J Cn K ) )

Proof of Theorem cnconst2

Dummy variables x u y are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fconst6g 5566	. . 3 |- ( B e. Y -> ( X X. { B } ) : X --> Y )
2	1	3ad2ant3 1047	. 2 |- ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) -> ( X X. { B } ) : X --> Y )
3	2	adantr 276	. . . 4 |- ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) -> ( X X. { B } ) : X --> Y )
4		simpll3 1065	. . . . . . . 8 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ y e. K ) -> B e. Y )
5		simplr 529	. . . . . . . 8 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ y e. K ) -> x e. X )
6		fvconst2g 5898	. . . . . . . 8 |- ( ( B e. Y /\ x e. X ) -> ( ( X X. { B } ) ` x ) = B )
7	4, 5, 6	syl2anc 411	. . . . . . 7 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ y e. K ) -> ( ( X X. { B } ) ` x ) = B )
8	7	eleq1d 2301	. . . . . 6 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ y e. K ) -> ( ( ( X X. { B } ) ` x ) e. y <-> B e. y ) )
9		simpll1 1063	. . . . . . . . 9 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ ( y e. K /\ B e. y ) ) -> J e. (TopOn ` X ) )
10		toponmax 14890	. . . . . . . . 9 |- ( J e. (TopOn ` X ) -> X e. J )
11	9, 10	syl 14	. . . . . . . 8 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ ( y e. K /\ B e. y ) ) -> X e. J )
12		simplr 529	. . . . . . . 8 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ ( y e. K /\ B e. y ) ) -> x e. X )
13		df-ima 4762	. . . . . . . . 9 |- ( ( X X. { B } ) " X ) = ran ( ( X X. { B } ) |` X )
14		ssid 3258	. . . . . . . . . . . . 13 |- X C_ X
15		xpssres 5073	. . . . . . . . . . . . 13 |- ( X C_ X -> ( ( X X. { B } ) |` X ) = ( X X. { B } ) )
16	14, 15	ax-mp 5	. . . . . . . . . . . 12 |- ( ( X X. { B } ) |` X ) = ( X X. { B } )
17	16	rneqi 4985	. . . . . . . . . . 11 |- ran ( ( X X. { B } ) |` X ) = ran ( X X. { B } )
18		rnxpss 5194	. . . . . . . . . . 11 |- ran ( X X. { B } ) C_ { B }
19	17, 18	eqsstri 3270	. . . . . . . . . 10 |- ran ( ( X X. { B } ) |` X ) C_ { B }
20		simprr 533	. . . . . . . . . . 11 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ ( y e. K /\ B e. y ) ) -> B e. y )
21	20	snssd 3839	. . . . . . . . . 10 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ ( y e. K /\ B e. y ) ) -> { B } C_ y )
22	19, 21	sstrid 3249	. . . . . . . . 9 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ ( y e. K /\ B e. y ) ) -> ran ( ( X X. { B } ) |` X ) C_ y )
23	13, 22	eqsstrid 3284	. . . . . . . 8 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ ( y e. K /\ B e. y ) ) -> ( ( X X. { B } ) " X ) C_ y )
24		eleq2 2296	. . . . . . . . . 10 |- ( u = X -> ( x e. u <-> x e. X ) )
25		imaeq2 5097	. . . . . . . . . . 11 |- ( u = X -> ( ( X X. { B } ) " u ) = ( ( X X. { B } ) " X ) )
26	25	sseq1d 3267	. . . . . . . . . 10 |- ( u = X -> ( ( ( X X. { B } ) " u ) C_ y <-> ( ( X X. { B } ) " X ) C_ y ) )
27	24, 26	anbi12d 473	. . . . . . . . 9 |- ( u = X -> ( ( x e. u /\ ( ( X X. { B } ) " u ) C_ y ) <-> ( x e. X /\ ( ( X X. { B } ) " X ) C_ y ) ) )
28	27	rspcev 2921	. . . . . . . 8 |- ( ( X e. J /\ ( x e. X /\ ( ( X X. { B } ) " X ) C_ y ) ) -> E. u e. J ( x e. u /\ ( ( X X. { B } ) " u ) C_ y ) )
29	11, 12, 23, 28	syl12anc 1272	. . . . . . 7 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ ( y e. K /\ B e. y ) ) -> E. u e. J ( x e. u /\ ( ( X X. { B } ) " u ) C_ y ) )
30	29	expr 375	. . . . . 6 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ y e. K ) -> ( B e. y -> E. u e. J ( x e. u /\ ( ( X X. { B } ) " u ) C_ y ) ) )
31	8, 30	sylbid 150	. . . . 5 |- ( ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) /\ y e. K ) -> ( ( ( X X. { B } ) ` x ) e. y -> E. u e. J ( x e. u /\ ( ( X X. { B } ) " u ) C_ y ) ) )
32	31	ralrimiva 2615	. . . 4 |- ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) -> A. y e. K ( ( ( X X. { B } ) ` x ) e. y -> E. u e. J ( x e. u /\ ( ( X X. { B } ) " u ) C_ y ) ) )
33		simpl1 1027	. . . . 5 |- ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) -> J e. (TopOn ` X ) )
34		simpl2 1028	. . . . 5 |- ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) -> K e. (TopOn ` Y ) )
35		simpr 110	. . . . 5 |- ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) -> x e. X )
36		iscnp 15064	. . . . 5 |- ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ x e. X ) -> ( ( X X. { B } ) e. ( ( J CnP K ) ` x ) <-> ( ( X X. { B } ) : X --> Y /\ A. y e. K ( ( ( X X. { B } ) ` x ) e. y -> E. u e. J ( x e. u /\ ( ( X X. { B } ) " u ) C_ y ) ) ) ) )
37	33, 34, 35, 36	syl3anc 1274	. . . 4 |- ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) -> ( ( X X. { B } ) e. ( ( J CnP K ) ` x ) <-> ( ( X X. { B } ) : X --> Y /\ A. y e. K ( ( ( X X. { B } ) ` x ) e. y -> E. u e. J ( x e. u /\ ( ( X X. { B } ) " u ) C_ y ) ) ) ) )
38	3, 32, 37	mpbir2and 953	. . 3 |- ( ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) /\ x e. X ) -> ( X X. { B } ) e. ( ( J CnP K ) ` x ) )
39	38	ralrimiva 2615	. 2 |- ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) -> A. x e. X ( X X. { B } ) e. ( ( J CnP K ) ` x ) )
40		cncnp 15095	. . 3 |- ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) ) -> ( ( X X. { B } ) e. ( J Cn K ) <-> ( ( X X. { B } ) : X --> Y /\ A. x e. X ( X X. { B } ) e. ( ( J CnP K ) ` x ) ) ) )
41	40	3adant3 1044	. 2 |- ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) -> ( ( X X. { B } ) e. ( J Cn K ) <-> ( ( X X. { B } ) : X --> Y /\ A. x e. X ( X X. { B } ) e. ( ( J CnP K ) ` x ) ) ) )
42	2, 39, 41	mpbir2and 953	1 |- ( ( J e. (TopOn ` X ) /\ K e. (TopOn ` Y ) /\ B e. Y ) -> ( X X. { B } ) e. ( J Cn K ) )

Syntax hints:   -> wi 4   /\ wa 104   <-> wb 105   /\ w3a 1005   = wceq 1398   e. wcel 2203   A.wral 2520   E.wrex 2521   C_ wss 3211   {csn 3689   X. cxp 4747   ran crn 4750   |` cres 4751   "cima 4752   -->wf 5348   ` cfv 5352  (class class class)co 6050  TopOnctopon 14875   Cn ccn 15050   CnP ccnp 15051

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2205  ax-14 2206  ax-ext 2214  ax-coll 4225  ax-sep 4228  ax-pow 4287  ax-pr 4322  ax-un 4554  ax-setind 4659

This theorem depends on definitions:  df-bi 117  df-3an 1007  df-tru 1401  df-fal 1404  df-nf 1510  df-sb 1812  df-eu 2083  df-mo 2084  df-clab 2219  df-cleq 2225  df-clel 2228  df-nfc 2373  df-ne 2413  df-ral 2525  df-rex 2526  df-reu 2527  df-rab 2529  df-v 2815  df-sbc 3043  df-csb 3139  df-dif 3213  df-un 3215  df-in 3217  df-ss 3224  df-pw 3671  df-sn 3695  df-pr 3696  df-op 3698  df-uni 3915  df-iun 3993  df-br 4110  df-opab 4172  df-mpt 4173  df-id 4414  df-xp 4755  df-rel 4756  df-cnv 4757  df-co 4758  df-dm 4759  df-rn 4760  df-res 4761  df-ima 4762  df-iota 5312  df-fun 5354  df-fn 5355  df-f 5356  df-f1 5357  df-fo 5358  df-f1o 5359  df-fv 5360  df-ov 6053  df-oprab 6054  df-mpo 6055  df-1st 6334  df-2nd 6335  df-map 6884  df-topgen 13473  df-top 14863  df-topon 14876  df-cn 15053  df-cnp 15054

This theorem is referenced by:  cnconst  15099  cnmptc  15147