ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  en2lp GIF version

Theorem en2lp 4464
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 ¬ (𝐴𝐵𝐵𝐴)

Proof of Theorem en2lp
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elex 2692 . . . . . . . . . . . 12 (𝐵𝐴𝐵 ∈ V)
2 prid2g 3623 . . . . . . . . . . . . 13 (𝐵 ∈ V → 𝐵 ∈ {𝐴, 𝐵})
3 eldif 3075 . . . . . . . . . . . . . . 15 (𝐵 ∈ (V ∖ {𝐴, 𝐵}) ↔ (𝐵 ∈ V ∧ ¬ 𝐵 ∈ {𝐴, 𝐵}))
4 pm3.4 331 . . . . . . . . . . . . . . 15 ((𝐵 ∈ V ∧ ¬ 𝐵 ∈ {𝐴, 𝐵}) → (𝐵 ∈ V → ¬ 𝐵 ∈ {𝐴, 𝐵}))
53, 4sylbi 120 . . . . . . . . . . . . . 14 (𝐵 ∈ (V ∖ {𝐴, 𝐵}) → (𝐵 ∈ V → ¬ 𝐵 ∈ {𝐴, 𝐵}))
65com12 30 . . . . . . . . . . . . 13 (𝐵 ∈ V → (𝐵 ∈ (V ∖ {𝐴, 𝐵}) → ¬ 𝐵 ∈ {𝐴, 𝐵}))
72, 6mt2d 614 . . . . . . . . . . . 12 (𝐵 ∈ V → ¬ 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
81, 7syl 14 . . . . . . . . . . 11 (𝐵𝐴 → ¬ 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
98ad2antlr 480 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
10 simp1r 1006 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → 𝐵𝐴)
11 eleq1 2200 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐵 → (𝑦𝑥𝐵𝑥))
12 eleq1 2200 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐵 → (𝑦 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝐵 ∈ (V ∖ {𝐴, 𝐵})))
1311, 12imbi12d 233 . . . . . . . . . . . . . . . 16 (𝑦 = 𝐵 → ((𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
1413spcgv 2768 . . . . . . . . . . . . . . 15 (𝐵𝑥 → (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
1514pm2.43b 52 . . . . . . . . . . . . . 14 (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})))
16153ad2ant2 1003 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})))
17 eleq2 2201 . . . . . . . . . . . . . . 15 (𝑥 = 𝐴 → (𝐵𝑥𝐵𝐴))
1817imbi1d 230 . . . . . . . . . . . . . 14 (𝑥 = 𝐴 → ((𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐵𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
19183ad2ant3 1004 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → ((𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐵𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
2016, 19mpbid 146 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → (𝐵𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵})))
2110, 20mpd 13 . . . . . . . . . . 11 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
22213expia 1183 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → (𝑥 = 𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵})))
239, 22mtod 652 . . . . . . . . 9 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝑥 = 𝐴)
24 elex 2692 . . . . . . . . . . . . 13 (𝐴𝐵𝐴 ∈ V)
25 prid1g 3622 . . . . . . . . . . . . . 14 (𝐴 ∈ V → 𝐴 ∈ {𝐴, 𝐵})
26 eldif 3075 . . . . . . . . . . . . . . . 16 (𝐴 ∈ (V ∖ {𝐴, 𝐵}) ↔ (𝐴 ∈ V ∧ ¬ 𝐴 ∈ {𝐴, 𝐵}))
27 pm3.4 331 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ V ∧ ¬ 𝐴 ∈ {𝐴, 𝐵}) → (𝐴 ∈ V → ¬ 𝐴 ∈ {𝐴, 𝐵}))
2826, 27sylbi 120 . . . . . . . . . . . . . . 15 (𝐴 ∈ (V ∖ {𝐴, 𝐵}) → (𝐴 ∈ V → ¬ 𝐴 ∈ {𝐴, 𝐵}))
2928com12 30 . . . . . . . . . . . . . 14 (𝐴 ∈ V → (𝐴 ∈ (V ∖ {𝐴, 𝐵}) → ¬ 𝐴 ∈ {𝐴, 𝐵}))
3025, 29mt2d 614 . . . . . . . . . . . . 13 (𝐴 ∈ V → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
3124, 30syl 14 . . . . . . . . . . . 12 (𝐴𝐵 → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
3231adantr 274 . . . . . . . . . . 11 ((𝐴𝐵𝐵𝐴) → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
3332adantr 274 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
34 simp1l 1005 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → 𝐴𝐵)
35 eleq1 2200 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐴 → (𝑦𝑥𝐴𝑥))
36 eleq1 2200 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐴 → (𝑦 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
3735, 36imbi12d 233 . . . . . . . . . . . . . . . 16 (𝑦 = 𝐴 → ((𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
3837spcgv 2768 . . . . . . . . . . . . . . 15 (𝐴𝑥 → (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
3938pm2.43b 52 . . . . . . . . . . . . . 14 (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})))
40393ad2ant2 1003 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})))
41 eleq2 2201 . . . . . . . . . . . . . . 15 (𝑥 = 𝐵 → (𝐴𝑥𝐴𝐵))
4241imbi1d 230 . . . . . . . . . . . . . 14 (𝑥 = 𝐵 → ((𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐴𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
43423ad2ant3 1004 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → ((𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐴𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
4440, 43mpbid 146 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → (𝐴𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵})))
4534, 44mpd 13 . . . . . . . . . . 11 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
46453expia 1183 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → (𝑥 = 𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵})))
4733, 46mtod 652 . . . . . . . . 9 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝑥 = 𝐵)
48 ioran 741 . . . . . . . . 9 (¬ (𝑥 = 𝐴𝑥 = 𝐵) ↔ (¬ 𝑥 = 𝐴 ∧ ¬ 𝑥 = 𝐵))
4923, 47, 48sylanbrc 413 . . . . . . . 8 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ (𝑥 = 𝐴𝑥 = 𝐵))
50 vex 2684 . . . . . . . . . 10 𝑥 ∈ V
51 eldif 3075 . . . . . . . . . 10 (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ (𝑥 ∈ V ∧ ¬ 𝑥 ∈ {𝐴, 𝐵}))
5250, 51mpbiran 924 . . . . . . . . 9 (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ¬ 𝑥 ∈ {𝐴, 𝐵})
5350elpr 3543 . . . . . . . . 9 (𝑥 ∈ {𝐴, 𝐵} ↔ (𝑥 = 𝐴𝑥 = 𝐵))
5452, 53xchbinx 671 . . . . . . . 8 (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ¬ (𝑥 = 𝐴𝑥 = 𝐵))
5549, 54sylibr 133 . . . . . . 7 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → 𝑥 ∈ (V ∖ {𝐴, 𝐵}))
5655ex 114 . . . . . 6 ((𝐴𝐵𝐵𝐴) → (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
5756alrimiv 1846 . . . . 5 ((𝐴𝐵𝐵𝐴) → ∀𝑥(∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
58 df-ral 2419 . . . . . . . 8 (∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ∀𝑦(𝑦𝑥 → [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵})))
59 clelsb3 2242 . . . . . . . . . 10 ([𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝑦 ∈ (V ∖ {𝐴, 𝐵}))
6059imbi2i 225 . . . . . . . . 9 ((𝑦𝑥 → [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})))
6160albii 1446 . . . . . . . 8 (∀𝑦(𝑦𝑥 → [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})))
6258, 61bitri 183 . . . . . . 7 (∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})))
6362imbi1i 237 . . . . . 6 ((∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
6463albii 1446 . . . . 5 (∀𝑥(∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ ∀𝑥(∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
6557, 64sylibr 133 . . . 4 ((𝐴𝐵𝐵𝐴) → ∀𝑥(∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
66 ax-setind 4447 . . . 4 (∀𝑥(∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})) → ∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}))
6765, 66syl 14 . . 3 ((𝐴𝐵𝐵𝐴) → ∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}))
68 eleq1 2200 . . . . 5 (𝑥 = 𝐴 → (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
6968spcgv 2768 . . . 4 (𝐴𝐵 → (∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
7069adantr 274 . . 3 ((𝐴𝐵𝐵𝐴) → (∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
7167, 70mpd 13 . 2 ((𝐴𝐵𝐵𝐴) → 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
7271, 32pm2.65i 628 1 ¬ (𝐴𝐵𝐵𝐴)
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wi 4  wa 103  wb 104  wo 697  w3a 962  wal 1329   = wceq 1331  wcel 1480  [wsb 1735  wral 2414  Vcvv 2681  cdif 3063  {cpr 3523
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-in1 603  ax-in2 604  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-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-ext 2119  ax-setind 4447
This theorem depends on definitions:  df-bi 116  df-3an 964  df-tru 1334  df-nf 1437  df-sb 1736  df-clab 2124  df-cleq 2130  df-clel 2133  df-nfc 2268  df-ral 2419  df-v 2683  df-dif 3068  df-un 3070  df-sn 3528  df-pr 3529
This theorem is referenced by:  preleq  4465  suc11g  4467  ordsuc  4473  2pwuninelg  6173  nntri2  6383  nndcel  6389
  Copyright terms: Public domain W3C validator