Theorem funinsn 5342

Description: A function based on the singleton of an ordered pair. Unlike funsng 5339, this holds even if A or B is a proper class. (Contributed by Jim Kingdon, 17-Apr-2022.)

Assertion

Ref	Expression
funinsn	|- Fun ( { <. A , B >. } i^i ( V X. W ) )

Proof of Theorem funinsn

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

Step	Hyp	Ref	Expression
1		inss2 3402	. . . 4 |- ( { <. A , B >. } i^i ( V X. W ) ) C_ ( V X. W )
2		xpss 4801	. . . 4 |- ( V X. W ) C_ ( _V X. _V )
3	1, 2	sstri 3210	. . 3 |- ( { <. A , B >. } i^i ( V X. W ) ) C_ ( _V X. _V )
4		df-rel 4700	. . 3 |- ( Rel ( { <. A , B >. } i^i ( V X. W ) ) <-> ( { <. A , B >. } i^i ( V X. W ) ) C_ ( _V X. _V ) )
5	3, 4	mpbir 146	. 2 |- Rel ( { <. A , B >. } i^i ( V X. W ) )
6		elin 3364	. . . . . . . . 9 |- ( <. x , y >. e. ( { <. A , B >. } i^i ( V X. W ) ) <-> ( <. x , y >. e. { <. A , B >. } /\ <. x , y >. e. ( V X. W ) ) )
7	6	simplbi 274	. . . . . . . 8 |- ( <. x , y >. e. ( { <. A , B >. } i^i ( V X. W ) ) -> <. x , y >. e. { <. A , B >. } )
8		elsni 3661	. . . . . . . 8 |- ( <. x , y >. e. { <. A , B >. } -> <. x , y >. = <. A , B >. )
9	7, 8	syl 14	. . . . . . 7 |- ( <. x , y >. e. ( { <. A , B >. } i^i ( V X. W ) ) -> <. x , y >. = <. A , B >. )
10		vex 2779	. . . . . . . 8 |- x e. _V
11		vex 2779	. . . . . . . 8 |- y e. _V
12	10, 11	opth 4299	. . . . . . 7 |- ( <. x , y >. = <. A , B >. <-> ( x = A /\ y = B ) )
13	9, 12	sylib 122	. . . . . 6 |- ( <. x , y >. e. ( { <. A , B >. } i^i ( V X. W ) ) -> ( x = A /\ y = B ) )
14	13	simprd 114	. . . . 5 |- ( <. x , y >. e. ( { <. A , B >. } i^i ( V X. W ) ) -> y = B )
15		elin 3364	. . . . . . . . 9 |- ( <. x , z >. e. ( { <. A , B >. } i^i ( V X. W ) ) <-> ( <. x , z >. e. { <. A , B >. } /\ <. x , z >. e. ( V X. W ) ) )
16	15	simplbi 274	. . . . . . . 8 |- ( <. x , z >. e. ( { <. A , B >. } i^i ( V X. W ) ) -> <. x , z >. e. { <. A , B >. } )
17		elsni 3661	. . . . . . . 8 |- ( <. x , z >. e. { <. A , B >. } -> <. x , z >. = <. A , B >. )
18	16, 17	syl 14	. . . . . . 7 |- ( <. x , z >. e. ( { <. A , B >. } i^i ( V X. W ) ) -> <. x , z >. = <. A , B >. )
19		vex 2779	. . . . . . . 8 |- z e. _V
20	10, 19	opth 4299	. . . . . . 7 |- ( <. x , z >. = <. A , B >. <-> ( x = A /\ z = B ) )
21	18, 20	sylib 122	. . . . . 6 |- ( <. x , z >. e. ( { <. A , B >. } i^i ( V X. W ) ) -> ( x = A /\ z = B ) )
22	21	simprd 114	. . . . 5 |- ( <. x , z >. e. ( { <. A , B >. } i^i ( V X. W ) ) -> z = B )
23		eqtr3 2227	. . . . 5 |- ( ( y = B /\ z = B ) -> y = z )
24	14, 22, 23	syl2an 289	. . . 4 |- ( ( <. x , y >. e. ( { <. A , B >. } i^i ( V X. W ) ) /\ <. x , z >. e. ( { <. A , B >. } i^i ( V X. W ) ) ) -> y = z )
25	24	gen2 1474	. . 3 |- A. y A. z ( ( <. x , y >. e. ( { <. A , B >. } i^i ( V X. W ) ) /\ <. x , z >. e. ( { <. A , B >. } i^i ( V X. W ) ) ) -> y = z )
26	25	ax-gen 1473	. 2 |- A. x A. y A. z ( ( <. x , y >. e. ( { <. A , B >. } i^i ( V X. W ) ) /\ <. x , z >. e. ( { <. A , B >. } i^i ( V X. W ) ) ) -> y = z )
27		dffun4 5301	. 2 |- ( Fun ( { <. A , B >. } i^i ( V X. W ) ) <-> ( Rel ( { <. A , B >. } i^i ( V X. W ) ) /\ A. x A. y A. z ( ( <. x , y >. e. ( { <. A , B >. } i^i ( V X. W ) ) /\ <. x , z >. e. ( { <. A , B >. } i^i ( V X. W ) ) ) -> y = z ) ) )
28	5, 26, 27	mpbir2an 945	1 |- Fun ( { <. A , B >. } i^i ( V X. W ) )

Syntax hints:   -> wi 4   /\ wa 104   A.wal 1371   = wceq 1373   e. wcel 2178   _Vcvv 2776   i^i cin 3173   C_ wss 3174   {csn 3643   <.cop 3646   X. cxp 4691   Rel wrel 4698   Fun wfun 5284

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-io 711  ax-5 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-14 2181  ax-ext 2189  ax-sep 4178  ax-pow 4234  ax-pr 4269

This theorem depends on definitions:  df-bi 117  df-3an 983  df-tru 1376  df-nf 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2194  df-cleq 2200  df-clel 2203  df-nfc 2339  df-ral 2491  df-v 2778  df-un 3178  df-in 3180  df-ss 3187  df-pw 3628  df-sn 3649  df-pr 3650  df-op 3652  df-br 4060  df-opab 4122  df-id 4358  df-xp 4699  df-rel 4700  df-cnv 4701  df-co 4702  df-fun 5292

This theorem is referenced by: (None)