Theorem issref 4921

Description: Two ways to state a relation is reflexive. Adapted from Tarski. (Contributed by FL, 15-Jan-2012.) (Revised by NM, 30-Mar-2016.)

Assertion

Ref	Expression
issref	|- ( ( _I |` A ) C_ R <-> A. x e. A x R x )

Distinct variable groups:   x, A   x, R

Proof of Theorem issref

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

Step	Hyp	Ref	Expression
1		df-ral 2421	. 2 |- ( A. x e. A x R x <-> A. x ( x e. A -> x R x ) )
2		vex 2689	. . . . 5 |- x e. _V
3		opelresi 4830	. . . . 5 |- ( x e. _V -> ( <. x , x >. e. ( _I |` A ) <-> x e. A ) )
4	2, 3	ax-mp 5	. . . 4 |- ( <. x , x >. e. ( _I |` A ) <-> x e. A )
5		df-br 3930	. . . . 5 |- ( x R x <-> <. x , x >. e. R )
6	5	bicomi 131	. . . 4 |- ( <. x , x >. e. R <-> x R x )
7	4, 6	imbi12i 238	. . 3 |- ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) <-> ( x e. A -> x R x ) )
8	7	albii 1446	. 2 |- ( A. x ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) <-> A. x ( x e. A -> x R x ) )
9		ralidm 3463	. . . . . 6 |- ( A. x e. _V A. x e. _V ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) <-> A. x e. _V ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) )
10		ralv 2703	. . . . . 6 |- ( A. x e. _V ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) <-> A. x ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) )
11	9, 10	bitri 183	. . . . 5 |- ( A. x e. _V A. x e. _V ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) <-> A. x ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) )
12		df-ral 2421	. . . . . . . . 9 |- ( A. x e. _V ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) <-> A. x ( x e. _V -> ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) ) )
13		pm2.27 40	. . . . . . . . . . . 12 |- ( x e. _V -> ( ( x e. _V -> ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) ) -> ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) ) )
14		opelresg 4826	. . . . . . . . . . . . . . 15 |- ( z e. _V -> ( <. x , z >. e. ( _I |` A ) <-> ( <. x , z >. e. _I /\ x e. A ) ) )
15		df-br 3930	. . . . . . . . . . . . . . . . 17 |- ( x _I z <-> <. x , z >. e. _I )
16		vex 2689	. . . . . . . . . . . . . . . . . . 19 |- z e. _V
17	16	ideq 4691	. . . . . . . . . . . . . . . . . 18 |- ( x _I z <-> x = z )
18		opelresi 4830	. . . . . . . . . . . . . . . . . . . . 21 |- ( x e. A -> ( <. x , x >. e. ( _I |` A ) <-> x e. A ) )
19		pm2.27 40	. . . . . . . . . . . . . . . . . . . . . 22 |- ( <. x , x >. e. ( _I |` A ) -> ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> <. x , x >. e. R ) )
20		opeq2 3706	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( x = z -> <. x , x >. = <. x , z >. )
21	20	eleq1d 2208	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( x = z -> ( <. x , x >. e. R <-> <. x , z >. e. R ) )
22	21	biimpcd 158	. . . . . . . . . . . . . . . . . . . . . 22 |- ( <. x , x >. e. R -> ( x = z -> <. x , z >. e. R ) )
23	19, 22	syl6 33	. . . . . . . . . . . . . . . . . . . . 21 |- ( <. x , x >. e. ( _I |` A ) -> ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> ( x = z -> <. x , z >. e. R ) ) )
24	18, 23	syl6bir 163	. . . . . . . . . . . . . . . . . . . 20 |- ( x e. A -> ( x e. A -> ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> ( x = z -> <. x , z >. e. R ) ) ) )
25	24	pm2.43i 49	. . . . . . . . . . . . . . . . . . 19 |- ( x e. A -> ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> ( x = z -> <. x , z >. e. R ) ) )
26	25	com3r 79	. . . . . . . . . . . . . . . . . 18 |- ( x = z -> ( x e. A -> ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> <. x , z >. e. R ) ) )
27	17, 26	sylbi 120	. . . . . . . . . . . . . . . . 17 |- ( x _I z -> ( x e. A -> ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> <. x , z >. e. R ) ) )
28	15, 27	sylbir 134	. . . . . . . . . . . . . . . 16 |- ( <. x , z >. e. _I -> ( x e. A -> ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> <. x , z >. e. R ) ) )
29	28	imp 123	. . . . . . . . . . . . . . 15 |- ( ( <. x , z >. e. _I /\ x e. A ) -> ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> <. x , z >. e. R ) )
30	14, 29	syl6bi 162	. . . . . . . . . . . . . 14 |- ( z e. _V -> ( <. x , z >. e. ( _I |` A ) -> ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> <. x , z >. e. R ) ) )
31	30	com3r 79	. . . . . . . . . . . . 13 |- ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> ( z e. _V -> ( <. x , z >. e. ( _I |` A ) -> <. x , z >. e. R ) ) )
32	31	ralrimiv 2504	. . . . . . . . . . . 12 |- ( ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> A. z e. _V ( <. x , z >. e. ( _I |` A ) -> <. x , z >. e. R ) )
33	13, 32	syl6 33	. . . . . . . . . . 11 |- ( x e. _V -> ( ( x e. _V -> ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) ) -> A. z e. _V ( <. x , z >. e. ( _I |` A ) -> <. x , z >. e. R ) ) )
34	2, 33	ax-mp 5	. . . . . . . . . 10 |- ( ( x e. _V -> ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) ) -> A. z e. _V ( <. x , z >. e. ( _I |` A ) -> <. x , z >. e. R ) )
35	34	sps 1517	. . . . . . . . 9 |- ( A. x ( x e. _V -> ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) ) -> A. z e. _V ( <. x , z >. e. ( _I |` A ) -> <. x , z >. e. R ) )
36	12, 35	sylbi 120	. . . . . . . 8 |- ( A. x e. _V ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> A. z e. _V ( <. x , z >. e. ( _I |` A ) -> <. x , z >. e. R ) )
37	36	ralimi 2495	. . . . . . 7 |- ( A. x e. _V A. x e. _V ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> A. x e. _V A. z e. _V ( <. x , z >. e. ( _I |` A ) -> <. x , z >. e. R ) )
38		eleq1 2202	. . . . . . . . 9 |- ( y = <. x , z >. -> ( y e. ( _I |` A ) <-> <. x , z >. e. ( _I |` A ) ) )
39		eleq1 2202	. . . . . . . . 9 |- ( y = <. x , z >. -> ( y e. R <-> <. x , z >. e. R ) )
40	38, 39	imbi12d 233	. . . . . . . 8 |- ( y = <. x , z >. -> ( ( y e. ( _I |` A ) -> y e. R ) <-> ( <. x , z >. e. ( _I |` A ) -> <. x , z >. e. R ) ) )
41	40	ralxp 4682	. . . . . . 7 |- ( A. y e. ( _V X. _V ) ( y e. ( _I |` A ) -> y e. R ) <-> A. x e. _V A. z e. _V ( <. x , z >. e. ( _I |` A ) -> <. x , z >. e. R ) )
42	37, 41	sylibr 133	. . . . . 6 |- ( A. x e. _V A. x e. _V ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> A. y e. ( _V X. _V ) ( y e. ( _I |` A ) -> y e. R ) )
43		df-ral 2421	. . . . . . 7 |- ( A. y e. ( _V X. _V ) ( y e. ( _I |` A ) -> y e. R ) <-> A. y ( y e. ( _V X. _V ) -> ( y e. ( _I |` A ) -> y e. R ) ) )
44		relres 4847	. . . . . . . . . . . 12 |- Rel ( _I |` A )
45		df-rel 4546	. . . . . . . . . . . 12 |- ( Rel ( _I |` A ) <-> ( _I |` A ) C_ ( _V X. _V ) )
46	44, 45	mpbi 144	. . . . . . . . . . 11 |- ( _I |` A ) C_ ( _V X. _V )
47	46	sseli 3093	. . . . . . . . . 10 |- ( y e. ( _I |` A ) -> y e. ( _V X. _V ) )
48	47	ancri 322	. . . . . . . . 9 |- ( y e. ( _I |` A ) -> ( y e. ( _V X. _V ) /\ y e. ( _I |` A ) ) )
49		pm3.31 260	. . . . . . . . 9 |- ( ( y e. ( _V X. _V ) -> ( y e. ( _I |` A ) -> y e. R ) ) -> ( ( y e. ( _V X. _V ) /\ y e. ( _I |` A ) ) -> y e. R ) )
50	48, 49	syl5 32	. . . . . . . 8 |- ( ( y e. ( _V X. _V ) -> ( y e. ( _I |` A ) -> y e. R ) ) -> ( y e. ( _I |` A ) -> y e. R ) )
51	50	alimi 1431	. . . . . . 7 |- ( A. y ( y e. ( _V X. _V ) -> ( y e. ( _I |` A ) -> y e. R ) ) -> A. y ( y e. ( _I |` A ) -> y e. R ) )
52	43, 51	sylbi 120	. . . . . 6 |- ( A. y e. ( _V X. _V ) ( y e. ( _I |` A ) -> y e. R ) -> A. y ( y e. ( _I |` A ) -> y e. R ) )
53	42, 52	syl 14	. . . . 5 |- ( A. x e. _V A. x e. _V ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> A. y ( y e. ( _I |` A ) -> y e. R ) )
54	11, 53	sylbir 134	. . . 4 |- ( A. x ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> A. y ( y e. ( _I |` A ) -> y e. R ) )
55		dfss2 3086	. . . 4 |- ( ( _I |` A ) C_ R <-> A. y ( y e. ( _I |` A ) -> y e. R ) )
56	54, 55	sylibr 133	. . 3 |- ( A. x ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) -> ( _I |` A ) C_ R )
57		ssel 3091	. . . 4 |- ( ( _I |` A ) C_ R -> ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) )
58	57	alrimiv 1846	. . 3 |- ( ( _I |` A ) C_ R -> A. x ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) )
59	56, 58	impbii 125	. 2 |- ( A. x ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) <-> ( _I |` A ) C_ R )
60	1, 8, 59	3bitr2ri 208	1 |- ( ( _I |` A ) C_ R <-> A. x e. A x R x )

Syntax hints:   -> wi 4   /\ wa 103   <-> wb 104   A.wal 1329   = wceq 1331   e. wcel 1480   A.wral 2416   _Vcvv 2686   C_ wss 3071   <.cop 3530   class class class wbr 3929   _I cid 4210   X. cxp 4537   |` cres 4541   Rel wrel 4544

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 698  ax-5 1423  ax-7 1424  ax-gen 1425  ax-ie1 1469  ax-ie2 1470  ax-8 1482  ax-10 1483  ax-11 1484  ax-i12 1485  ax-bndl 1486  ax-4 1487  ax-14 1492  ax-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-ext 2121  ax-sep 4046  ax-pow 4098  ax-pr 4131

This theorem depends on definitions:  df-bi 116  df-3an 964  df-tru 1334  df-nf 1437  df-sb 1736  df-eu 2002  df-mo 2003  df-clab 2126  df-cleq 2132  df-clel 2135  df-nfc 2270  df-ral 2421  df-rex 2422  df-v 2688  df-sbc 2910  df-csb 3004  df-un 3075  df-in 3077  df-ss 3084  df-pw 3512  df-sn 3533  df-pr 3534  df-op 3536  df-iun 3815  df-br 3930  df-opab 3990  df-id 4215  df-xp 4545  df-rel 4546  df-res 4551

This theorem is referenced by: (None)