Theorem en2lp 4591

Description: No class has 2-cycle membership loops. Theorem 7X(b) of [Enderton] p. 206. (Contributed by NM, 16-Oct-1996.) (Proof rewritten by Mario Carneiro and Jim Kingdon, 27-Nov-2018.)

Assertion

Ref	Expression
en2lp	|- -. ( A e. B /\ B e. A )

Proof of Theorem en2lp

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

Step	Hyp	Ref	Expression
1		elex 2774	. . . . . . . . . . . 12 |- ( B e. A -> B e. _V )
2		prid2g 3728	. . . . . . . . . . . . 13 |- ( B e. _V -> B e. { A , B } )
3		eldif 3166	. . . . . . . . . . . . . . 15 |- ( B e. ( _V \ { A , B } ) <-> ( B e. _V /\ -. B e. { A , B } ) )
4		pm3.4 333	. . . . . . . . . . . . . . 15 |- ( ( B e. _V /\ -. B e. { A , B } ) -> ( B e. _V -> -. B e. { A , B } ) )
5	3, 4	sylbi 121	. . . . . . . . . . . . . 14 |- ( B e. ( _V \ { A , B } ) -> ( B e. _V -> -. B e. { A , B } ) )
6	5	com12 30	. . . . . . . . . . . . 13 |- ( B e. _V -> ( B e. ( _V \ { A , B } ) -> -. B e. { A , B } ) )
7	2, 6	mt2d 626	. . . . . . . . . . . 12 |- ( B e. _V -> -. B e. ( _V \ { A , B } ) )
8	1, 7	syl 14	. . . . . . . . . . 11 |- ( B e. A -> -. B e. ( _V \ { A , B } ) )
9	8	ad2antlr 489	. . . . . . . . . 10 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) ) -> -. B e. ( _V \ { A , B } ) )
10		simp1r 1024	. . . . . . . . . . . 12 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) /\ x = A ) -> B e. A )
11		eleq1 2259	. . . . . . . . . . . . . . . . 17 |- ( y = B -> ( y e. x <-> B e. x ) )
12		eleq1 2259	. . . . . . . . . . . . . . . . 17 |- ( y = B -> ( y e. ( _V \ { A , B } ) <-> B e. ( _V \ { A , B } ) ) )
13	11, 12	imbi12d 234	. . . . . . . . . . . . . . . 16 |- ( y = B -> ( ( y e. x -> y e. ( _V \ { A , B } ) ) <-> ( B e. x -> B e. ( _V \ { A , B } ) ) ) )
14	13	spcgv 2851	. . . . . . . . . . . . . . 15 |- ( B e. x -> ( A. y ( y e. x -> y e. ( _V \ { A , B } ) ) -> ( B e. x -> B e. ( _V \ { A , B } ) ) ) )
15	14	pm2.43b 52	. . . . . . . . . . . . . 14 |- ( A. y ( y e. x -> y e. ( _V \ { A , B } ) ) -> ( B e. x -> B e. ( _V \ { A , B } ) ) )
16	15	3ad2ant2 1021	. . . . . . . . . . . . 13 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) /\ x = A ) -> ( B e. x -> B e. ( _V \ { A , B } ) ) )
17		eleq2 2260	. . . . . . . . . . . . . . 15 |- ( x = A -> ( B e. x <-> B e. A ) )
18	17	imbi1d 231	. . . . . . . . . . . . . 14 |- ( x = A -> ( ( B e. x -> B e. ( _V \ { A , B } ) ) <-> ( B e. A -> B e. ( _V \ { A , B } ) ) ) )
19	18	3ad2ant3 1022	. . . . . . . . . . . . 13 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) /\ x = A ) -> ( ( B e. x -> B e. ( _V \ { A , B } ) ) <-> ( B e. A -> B e. ( _V \ { A , B } ) ) ) )
20	16, 19	mpbid 147	. . . . . . . . . . . 12 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) /\ x = A ) -> ( B e. A -> B e. ( _V \ { A , B } ) ) )
21	10, 20	mpd 13	. . . . . . . . . . 11 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) /\ x = A ) -> B e. ( _V \ { A , B } ) )
22	21	3expia 1207	. . . . . . . . . 10 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) ) -> ( x = A -> B e. ( _V \ { A , B } ) ) )
23	9, 22	mtod 664	. . . . . . . . 9 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) ) -> -. x = A )
24		elex 2774	. . . . . . . . . . . . 13 |- ( A e. B -> A e. _V )
25		prid1g 3727	. . . . . . . . . . . . . 14 |- ( A e. _V -> A e. { A , B } )
26		eldif 3166	. . . . . . . . . . . . . . . 16 |- ( A e. ( _V \ { A , B } ) <-> ( A e. _V /\ -. A e. { A , B } ) )
27		pm3.4 333	. . . . . . . . . . . . . . . 16 |- ( ( A e. _V /\ -. A e. { A , B } ) -> ( A e. _V -> -. A e. { A , B } ) )
28	26, 27	sylbi 121	. . . . . . . . . . . . . . 15 |- ( A e. ( _V \ { A , B } ) -> ( A e. _V -> -. A e. { A , B } ) )
29	28	com12 30	. . . . . . . . . . . . . 14 |- ( A e. _V -> ( A e. ( _V \ { A , B } ) -> -. A e. { A , B } ) )
30	25, 29	mt2d 626	. . . . . . . . . . . . 13 |- ( A e. _V -> -. A e. ( _V \ { A , B } ) )
31	24, 30	syl 14	. . . . . . . . . . . 12 |- ( A e. B -> -. A e. ( _V \ { A , B } ) )
32	31	adantr 276	. . . . . . . . . . 11 |- ( ( A e. B /\ B e. A ) -> -. A e. ( _V \ { A , B } ) )
33	32	adantr 276	. . . . . . . . . 10 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) ) -> -. A e. ( _V \ { A , B } ) )
34		simp1l 1023	. . . . . . . . . . . 12 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) /\ x = B ) -> A e. B )
35		eleq1 2259	. . . . . . . . . . . . . . . . 17 |- ( y = A -> ( y e. x <-> A e. x ) )
36		eleq1 2259	. . . . . . . . . . . . . . . . 17 |- ( y = A -> ( y e. ( _V \ { A , B } ) <-> A e. ( _V \ { A , B } ) ) )
37	35, 36	imbi12d 234	. . . . . . . . . . . . . . . 16 |- ( y = A -> ( ( y e. x -> y e. ( _V \ { A , B } ) ) <-> ( A e. x -> A e. ( _V \ { A , B } ) ) ) )
38	37	spcgv 2851	. . . . . . . . . . . . . . 15 |- ( A e. x -> ( A. y ( y e. x -> y e. ( _V \ { A , B } ) ) -> ( A e. x -> A e. ( _V \ { A , B } ) ) ) )
39	38	pm2.43b 52	. . . . . . . . . . . . . 14 |- ( A. y ( y e. x -> y e. ( _V \ { A , B } ) ) -> ( A e. x -> A e. ( _V \ { A , B } ) ) )
40	39	3ad2ant2 1021	. . . . . . . . . . . . 13 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) /\ x = B ) -> ( A e. x -> A e. ( _V \ { A , B } ) ) )
41		eleq2 2260	. . . . . . . . . . . . . . 15 |- ( x = B -> ( A e. x <-> A e. B ) )
42	41	imbi1d 231	. . . . . . . . . . . . . 14 |- ( x = B -> ( ( A e. x -> A e. ( _V \ { A , B } ) ) <-> ( A e. B -> A e. ( _V \ { A , B } ) ) ) )
43	42	3ad2ant3 1022	. . . . . . . . . . . . 13 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) /\ x = B ) -> ( ( A e. x -> A e. ( _V \ { A , B } ) ) <-> ( A e. B -> A e. ( _V \ { A , B } ) ) ) )
44	40, 43	mpbid 147	. . . . . . . . . . . 12 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) /\ x = B ) -> ( A e. B -> A e. ( _V \ { A , B } ) ) )
45	34, 44	mpd 13	. . . . . . . . . . 11 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) /\ x = B ) -> A e. ( _V \ { A , B } ) )
46	45	3expia 1207	. . . . . . . . . 10 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) ) -> ( x = B -> A e. ( _V \ { A , B } ) ) )
47	33, 46	mtod 664	. . . . . . . . 9 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) ) -> -. x = B )
48		ioran 753	. . . . . . . . 9 |- ( -. ( x = A \/ x = B ) <-> ( -. x = A /\ -. x = B ) )
49	23, 47, 48	sylanbrc 417	. . . . . . . 8 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) ) -> -. ( x = A \/ x = B ) )
50		vex 2766	. . . . . . . . . 10 |- x e. _V
51		eldif 3166	. . . . . . . . . 10 |- ( x e. ( _V \ { A , B } ) <-> ( x e. _V /\ -. x e. { A , B } ) )
52	50, 51	mpbiran 942	. . . . . . . . 9 |- ( x e. ( _V \ { A , B } ) <-> -. x e. { A , B } )
53	50	elpr 3644	. . . . . . . . 9 |- ( x e. { A , B } <-> ( x = A \/ x = B ) )
54	52, 53	xchbinx 683	. . . . . . . 8 |- ( x e. ( _V \ { A , B } ) <-> -. ( x = A \/ x = B ) )
55	49, 54	sylibr 134	. . . . . . 7 |- ( ( ( A e. B /\ B e. A ) /\ A. y ( y e. x -> y e. ( _V \ { A , B } ) ) ) -> x e. ( _V \ { A , B } ) )
56	55	ex 115	. . . . . 6 |- ( ( A e. B /\ B e. A ) -> ( A. y ( y e. x -> y e. ( _V \ { A , B } ) ) -> x e. ( _V \ { A , B } ) ) )
57	56	alrimiv 1888	. . . . 5 |- ( ( A e. B /\ B e. A ) -> A. x ( A. y ( y e. x -> y e. ( _V \ { A , B } ) ) -> x e. ( _V \ { A , B } ) ) )
58		df-ral 2480	. . . . . . . 8 |- ( A. y e. x [ y / x ] x e. ( _V \ { A , B } ) <-> A. y ( y e. x -> [ y / x ] x e. ( _V \ { A , B } ) ) )
59		clelsb1 2301	. . . . . . . . . 10 |- ( [ y / x ] x e. ( _V \ { A , B } ) <-> y e. ( _V \ { A , B } ) )
60	59	imbi2i 226	. . . . . . . . 9 |- ( ( y e. x -> [ y / x ] x e. ( _V \ { A , B } ) ) <-> ( y e. x -> y e. ( _V \ { A , B } ) ) )
61	60	albii 1484	. . . . . . . 8 |- ( A. y ( y e. x -> [ y / x ] x e. ( _V \ { A , B } ) ) <-> A. y ( y e. x -> y e. ( _V \ { A , B } ) ) )
62	58, 61	bitri 184	. . . . . . 7 |- ( A. y e. x [ y / x ] x e. ( _V \ { A , B } ) <-> A. y ( y e. x -> y e. ( _V \ { A , B } ) ) )
63	62	imbi1i 238	. . . . . 6 |- ( ( A. y e. x [ y / x ] x e. ( _V \ { A , B } ) -> x e. ( _V \ { A , B } ) ) <-> ( A. y ( y e. x -> y e. ( _V \ { A , B } ) ) -> x e. ( _V \ { A , B } ) ) )
64	63	albii 1484	. . . . 5 |- ( A. x ( A. y e. x [ y / x ] x e. ( _V \ { A , B } ) -> x e. ( _V \ { A , B } ) ) <-> A. x ( A. y ( y e. x -> y e. ( _V \ { A , B } ) ) -> x e. ( _V \ { A , B } ) ) )
65	57, 64	sylibr 134	. . . 4 |- ( ( A e. B /\ B e. A ) -> A. x ( A. y e. x [ y / x ] x e. ( _V \ { A , B } ) -> x e. ( _V \ { A , B } ) ) )
66		ax-setind 4574	. . . 4 |- ( A. x ( A. y e. x [ y / x ] x e. ( _V \ { A , B } ) -> x e. ( _V \ { A , B } ) ) -> A. x x e. ( _V \ { A , B } ) )
67	65, 66	syl 14	. . 3 |- ( ( A e. B /\ B e. A ) -> A. x x e. ( _V \ { A , B } ) )
68		eleq1 2259	. . . . 5 |- ( x = A -> ( x e. ( _V \ { A , B } ) <-> A e. ( _V \ { A , B } ) ) )
69	68	spcgv 2851	. . . 4 |- ( A e. B -> ( A. x x e. ( _V \ { A , B } ) -> A e. ( _V \ { A , B } ) ) )
70	69	adantr 276	. . 3 |- ( ( A e. B /\ B e. A ) -> ( A. x x e. ( _V \ { A , B } ) -> A e. ( _V \ { A , B } ) ) )
71	67, 70	mpd 13	. 2 |- ( ( A e. B /\ B e. A ) -> A e. ( _V \ { A , B } ) )
72	71, 32	pm2.65i 640	1 |- -. ( A e. B /\ B e. A )

Syntax hints:   -. wn 3   -> wi 4   /\ wa 104   <-> wb 105   \/ wo 709   /\ w3a 980   A.wal 1362   = wceq 1364   [wsb 1776   e. wcel 2167   A.wral 2475   _Vcvv 2763   \ cdif 3154   {cpr 3624

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 615  ax-in2 616  ax-io 710  ax-5 1461  ax-7 1462  ax-gen 1463  ax-ie1 1507  ax-ie2 1508  ax-8 1518  ax-10 1519  ax-11 1520  ax-i12 1521  ax-bndl 1523  ax-4 1524  ax-17 1540  ax-i9 1544  ax-ial 1548  ax-i5r 1549  ax-ext 2178  ax-setind 4574

This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-nf 1475  df-sb 1777  df-clab 2183  df-cleq 2189  df-clel 2192  df-nfc 2328  df-ral 2480  df-v 2765  df-dif 3159  df-un 3161  df-sn 3629  df-pr 3630

This theorem is referenced by:  preleq  4592  suc11g  4594  ordsuc  4600  2pwuninelg  6350  nntri2  6561  nndcel  6567