Theorem issref 4929

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 2422	. 2 |- ( A. x e. A x R x <-> A. x ( x e. A -> x R x ) )
2		vex 2692	. . . . 5 |- x e. _V
3		opelresi 4838	. . . . 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 3938	. . . . 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 1447	. 2 |- ( A. x ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) <-> A. x ( x e. A -> x R x ) )
9		ralidm 3468	. . . . . 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 2706	. . . . . 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 2422	. . . . . . . . 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 4834	. . . . . . . . . . . . . . 15 |- ( z e. _V -> ( <. x , z >. e. ( _I |` A ) <-> ( <. x , z >. e. _I /\ x e. A ) ) )
15		df-br 3938	. . . . . . . . . . . . . . . . 17 |- ( x _I z <-> <. x , z >. e. _I )
16		vex 2692	. . . . . . . . . . . . . . . . . . 19 |- z e. _V
17	16	ideq 4699	. . . . . . . . . . . . . . . . . 18 |- ( x _I z <-> x = z )
18		opelresi 4838	. . . . . . . . . . . . . . . . . . . . 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 3714	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( x = z -> <. x , x >. = <. x , z >. )
21	20	eleq1d 2209	. . . . . . . . . . . . . . . . . . . . . . 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 2507	. . . . . . . . . . . 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 1518	. . . . . . . . 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 2498	. . . . . . 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 2203	. . . . . . . . 9 |- ( y = <. x , z >. -> ( y e. ( _I |` A ) <-> <. x , z >. e. ( _I |` A ) ) )
39		eleq1 2203	. . . . . . . . 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 4690	. . . . . . 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 2422	. . . . . . 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 4855	. . . . . . . . . . . 12 |- Rel ( _I |` A )
45		df-rel 4554	. . . . . . . . . . . 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 3098	. . . . . . . . . 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 1432	. . . . . . 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 3091	. . . 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 3096	. . . 4 |- ( ( _I |` A ) C_ R -> ( <. x , x >. e. ( _I |` A ) -> <. x , x >. e. R ) )
58	57	alrimiv 1847	. . 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 1330   = wceq 1332   e. wcel 1481   A.wral 2417   _Vcvv 2689   C_ wss 3076   <.cop 3535   class class class wbr 3937   _I cid 4218   X. cxp 4545   |` cres 4549   Rel wrel 4552

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 699  ax-5 1424  ax-7 1425  ax-gen 1426  ax-ie1 1470  ax-ie2 1471  ax-8 1483  ax-10 1484  ax-11 1485  ax-i12 1486  ax-bndl 1487  ax-4 1488  ax-14 1493  ax-17 1507  ax-i9 1511  ax-ial 1515  ax-i5r 1516  ax-ext 2122  ax-sep 4054  ax-pow 4106  ax-pr 4139

This theorem depends on definitions:  df-bi 116  df-3an 965  df-tru 1335  df-nf 1438  df-sb 1737  df-eu 2003  df-mo 2004  df-clab 2127  df-cleq 2133  df-clel 2136  df-nfc 2271  df-ral 2422  df-rex 2423  df-v 2691  df-sbc 2914  df-csb 3008  df-un 3080  df-in 3082  df-ss 3089  df-pw 3517  df-sn 3538  df-pr 3539  df-op 3541  df-iun 3823  df-br 3938  df-opab 3998  df-id 4223  df-xp 4553  df-rel 4554  df-res 4559

This theorem is referenced by: (None)