Theorem tx1cn 13631

Description: Continuity of the first projection map of a topological product. (Contributed by Jeff Madsen, 2-Sep-2009.) (Proof shortened by Mario Carneiro, 22-Aug-2015.)

Assertion

Ref	Expression
tx1cn	|- ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) -> ( 1st |` ( X X. Y ) ) e. ( ( R tX S ) Cn R ) )

Proof of Theorem tx1cn

Dummy variables w z are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		f1stres 6156	. . 3 |- ( 1st |` ( X X. Y ) ) : ( X X. Y ) --> X
2	1	a1i 9	. 2 |- ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) -> ( 1st |` ( X X. Y ) ) : ( X X. Y ) --> X )
3		ffn 5363	. . . . . . . 8 |- ( ( 1st |` ( X X. Y ) ) : ( X X. Y ) --> X -> ( 1st |` ( X X. Y ) ) Fn ( X X. Y ) )
4		elpreima 5633	. . . . . . . 8 |- ( ( 1st |` ( X X. Y ) ) Fn ( X X. Y ) -> ( z e. ( `' ( 1st |` ( X X. Y ) ) " w ) <-> ( z e. ( X X. Y ) /\ ( ( 1st |` ( X X. Y ) ) ` z ) e. w ) ) )
5	1, 3, 4	mp2b 8	. . . . . . 7 |- ( z e. ( `' ( 1st |` ( X X. Y ) ) " w ) <-> ( z e. ( X X. Y ) /\ ( ( 1st |` ( X X. Y ) ) ` z ) e. w ) )
6		fvres 5537	. . . . . . . . . 10 |- ( z e. ( X X. Y ) -> ( ( 1st |` ( X X. Y ) ) ` z ) = ( 1st ` z ) )
7	6	eleq1d 2246	. . . . . . . . 9 |- ( z e. ( X X. Y ) -> ( ( ( 1st |` ( X X. Y ) ) ` z ) e. w <-> ( 1st ` z ) e. w ) )
8		1st2nd2 6172	. . . . . . . . . 10 |- ( z e. ( X X. Y ) -> z = <. ( 1st ` z ) , ( 2nd ` z ) >. )
9		xp2nd 6163	. . . . . . . . . 10 |- ( z e. ( X X. Y ) -> ( 2nd ` z ) e. Y )
10		elxp6 6166	. . . . . . . . . . . 12 |- ( z e. ( w X. Y ) <-> ( z = <. ( 1st ` z ) , ( 2nd ` z ) >. /\ ( ( 1st ` z ) e. w /\ ( 2nd ` z ) e. Y ) ) )
11		anass 401	. . . . . . . . . . . 12 |- ( ( ( z = <. ( 1st ` z ) , ( 2nd ` z ) >. /\ ( 1st ` z ) e. w ) /\ ( 2nd ` z ) e. Y ) <-> ( z = <. ( 1st ` z ) , ( 2nd ` z ) >. /\ ( ( 1st ` z ) e. w /\ ( 2nd ` z ) e. Y ) ) )
12		an32 562	. . . . . . . . . . . 12 |- ( ( ( z = <. ( 1st ` z ) , ( 2nd ` z ) >. /\ ( 1st ` z ) e. w ) /\ ( 2nd ` z ) e. Y ) <-> ( ( z = <. ( 1st ` z ) , ( 2nd ` z ) >. /\ ( 2nd ` z ) e. Y ) /\ ( 1st ` z ) e. w ) )
13	10, 11, 12	3bitr2i 208	. . . . . . . . . . 11 |- ( z e. ( w X. Y ) <-> ( ( z = <. ( 1st ` z ) , ( 2nd ` z ) >. /\ ( 2nd ` z ) e. Y ) /\ ( 1st ` z ) e. w ) )
14	13	baib 919	. . . . . . . . . 10 |- ( ( z = <. ( 1st ` z ) , ( 2nd ` z ) >. /\ ( 2nd ` z ) e. Y ) -> ( z e. ( w X. Y ) <-> ( 1st ` z ) e. w ) )
15	8, 9, 14	syl2anc 411	. . . . . . . . 9 |- ( z e. ( X X. Y ) -> ( z e. ( w X. Y ) <-> ( 1st ` z ) e. w ) )
16	7, 15	bitr4d 191	. . . . . . . 8 |- ( z e. ( X X. Y ) -> ( ( ( 1st |` ( X X. Y ) ) ` z ) e. w <-> z e. ( w X. Y ) ) )
17	16	pm5.32i 454	. . . . . . 7 |- ( ( z e. ( X X. Y ) /\ ( ( 1st |` ( X X. Y ) ) ` z ) e. w ) <-> ( z e. ( X X. Y ) /\ z e. ( w X. Y ) ) )
18	5, 17	bitri 184	. . . . . 6 |- ( z e. ( `' ( 1st |` ( X X. Y ) ) " w ) <-> ( z e. ( X X. Y ) /\ z e. ( w X. Y ) ) )
19		toponss 13386	. . . . . . . . . 10 |- ( ( R e. (TopOn ` X ) /\ w e. R ) -> w C_ X )
20	19	adantlr 477	. . . . . . . . 9 |- ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ w e. R ) -> w C_ X )
21		xpss1 4735	. . . . . . . . 9 |- ( w C_ X -> ( w X. Y ) C_ ( X X. Y ) )
22	20, 21	syl 14	. . . . . . . 8 |- ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ w e. R ) -> ( w X. Y ) C_ ( X X. Y ) )
23	22	sseld 3154	. . . . . . 7 |- ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ w e. R ) -> ( z e. ( w X. Y ) -> z e. ( X X. Y ) ) )
24	23	pm4.71rd 394	. . . . . 6 |- ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ w e. R ) -> ( z e. ( w X. Y ) <-> ( z e. ( X X. Y ) /\ z e. ( w X. Y ) ) ) )
25	18, 24	bitr4id 199	. . . . 5 |- ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ w e. R ) -> ( z e. ( `' ( 1st |` ( X X. Y ) ) " w ) <-> z e. ( w X. Y ) ) )
26	25	eqrdv 2175	. . . 4 |- ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ w e. R ) -> ( `' ( 1st |` ( X X. Y ) ) " w ) = ( w X. Y ) )
27		toponmax 13385	. . . . . 6 |- ( S e. (TopOn ` Y ) -> Y e. S )
28	27	ad2antlr 489	. . . . 5 |- ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ w e. R ) -> Y e. S )
29		txopn 13627	. . . . . 6 |- ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ ( w e. R /\ Y e. S ) ) -> ( w X. Y ) e. ( R tX S ) )
30	29	anassrs 400	. . . . 5 |- ( ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ w e. R ) /\ Y e. S ) -> ( w X. Y ) e. ( R tX S ) )
31	28, 30	mpdan 421	. . . 4 |- ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ w e. R ) -> ( w X. Y ) e. ( R tX S ) )
32	26, 31	eqeltrd 2254	. . 3 |- ( ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) /\ w e. R ) -> ( `' ( 1st |` ( X X. Y ) ) " w ) e. ( R tX S ) )
33	32	ralrimiva 2550	. 2 |- ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) -> A. w e. R ( `' ( 1st |` ( X X. Y ) ) " w ) e. ( R tX S ) )
34		txtopon 13624	. . 3 |- ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) -> ( R tX S ) e. (TopOn ` ( X X. Y ) ) )
35		simpl 109	. . 3 |- ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) -> R e. (TopOn ` X ) )
36		iscn 13559	. . 3 |- ( ( ( R tX S ) e. (TopOn ` ( X X. Y ) ) /\ R e. (TopOn ` X ) ) -> ( ( 1st |` ( X X. Y ) ) e. ( ( R tX S ) Cn R ) <-> ( ( 1st |` ( X X. Y ) ) : ( X X. Y ) --> X /\ A. w e. R ( `' ( 1st |` ( X X. Y ) ) " w ) e. ( R tX S ) ) ) )
37	34, 35, 36	syl2anc 411	. 2 |- ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) -> ( ( 1st |` ( X X. Y ) ) e. ( ( R tX S ) Cn R ) <-> ( ( 1st |` ( X X. Y ) ) : ( X X. Y ) --> X /\ A. w e. R ( `' ( 1st |` ( X X. Y ) ) " w ) e. ( R tX S ) ) ) )
38	2, 33, 37	mpbir2and 944	1 |- ( ( R e. (TopOn ` X ) /\ S e. (TopOn ` Y ) ) -> ( 1st |` ( X X. Y ) ) e. ( ( R tX S ) Cn R ) )

Syntax hints:   -> wi 4   /\ wa 104   <-> wb 105   = wceq 1353   e. wcel 2148   A.wral 2455   C_ wss 3129   <.cop 3595   X. cxp 4623   `'ccnv 4624   |` cres 4627   "cima 4628   Fn wfn 5209   -->wf 5210   ` cfv 5214  (class class class)co 5871   1stc1st 6135   2ndc2nd 6136  TopOnctopon 13370   Cn ccn 13547   tX ctx 13614

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 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-coll 4117  ax-sep 4120  ax-pow 4173  ax-pr 4208  ax-un 4432  ax-setind 4535

This theorem depends on definitions:  df-bi 117  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-ral 2460  df-rex 2461  df-reu 2462  df-rab 2464  df-v 2739  df-sbc 2963  df-csb 3058  df-dif 3131  df-un 3133  df-in 3135  df-ss 3142  df-pw 3577  df-sn 3598  df-pr 3599  df-op 3601  df-uni 3810  df-iun 3888  df-br 4003  df-opab 4064  df-mpt 4065  df-id 4292  df-xp 4631  df-rel 4632  df-cnv 4633  df-co 4634  df-dm 4635  df-rn 4636  df-res 4637  df-ima 4638  df-iota 5176  df-fun 5216  df-fn 5217  df-f 5218  df-f1 5219  df-fo 5220  df-f1o 5221  df-fv 5222  df-ov 5874  df-oprab 5875  df-mpo 5876  df-1st 6137  df-2nd 6138  df-map 6646  df-topgen 12696  df-top 13358  df-topon 13371  df-bases 13403  df-cn 13550  df-tx 13615

This theorem is referenced by:  txcn  13637  cnmpt1st  13650