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

Theorem en2lp 4538
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 2741 . . . . . . . . . . . 12 (𝐵𝐴𝐵 ∈ V)
2 prid2g 3688 . . . . . . . . . . . . 13 (𝐵 ∈ V → 𝐵 ∈ {𝐴, 𝐵})
3 eldif 3130 . . . . . . . . . . . . . . 15 (𝐵 ∈ (V ∖ {𝐴, 𝐵}) ↔ (𝐵 ∈ V ∧ ¬ 𝐵 ∈ {𝐴, 𝐵}))
4 pm3.4 331 . . . . . . . . . . . . . . 15 ((𝐵 ∈ V ∧ ¬ 𝐵 ∈ {𝐴, 𝐵}) → (𝐵 ∈ V → ¬ 𝐵 ∈ {𝐴, 𝐵}))
53, 4sylbi 120 . . . . . . . . . . . . . 14 (𝐵 ∈ (V ∖ {𝐴, 𝐵}) → (𝐵 ∈ V → ¬ 𝐵 ∈ {𝐴, 𝐵}))
65com12 30 . . . . . . . . . . . . 13 (𝐵 ∈ V → (𝐵 ∈ (V ∖ {𝐴, 𝐵}) → ¬ 𝐵 ∈ {𝐴, 𝐵}))
72, 6mt2d 620 . . . . . . . . . . . 12 (𝐵 ∈ V → ¬ 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
81, 7syl 14 . . . . . . . . . . 11 (𝐵𝐴 → ¬ 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
98ad2antlr 486 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
10 simp1r 1017 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → 𝐵𝐴)
11 eleq1 2233 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐵 → (𝑦𝑥𝐵𝑥))
12 eleq1 2233 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐵 → (𝑦 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝐵 ∈ (V ∖ {𝐴, 𝐵})))
1311, 12imbi12d 233 . . . . . . . . . . . . . . . 16 (𝑦 = 𝐵 → ((𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
1413spcgv 2817 . . . . . . . . . . . . . . 15 (𝐵𝑥 → (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
1514pm2.43b 52 . . . . . . . . . . . . . 14 (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})))
16153ad2ant2 1014 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})))
17 eleq2 2234 . . . . . . . . . . . . . . 15 (𝑥 = 𝐴 → (𝐵𝑥𝐵𝐴))
1817imbi1d 230 . . . . . . . . . . . . . 14 (𝑥 = 𝐴 → ((𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐵𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
19183ad2ant3 1015 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → ((𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐵𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
2016, 19mpbid 146 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → (𝐵𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵})))
2110, 20mpd 13 . . . . . . . . . . 11 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
22213expia 1200 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → (𝑥 = 𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵})))
239, 22mtod 658 . . . . . . . . 9 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝑥 = 𝐴)
24 elex 2741 . . . . . . . . . . . . 13 (𝐴𝐵𝐴 ∈ V)
25 prid1g 3687 . . . . . . . . . . . . . 14 (𝐴 ∈ V → 𝐴 ∈ {𝐴, 𝐵})
26 eldif 3130 . . . . . . . . . . . . . . . 16 (𝐴 ∈ (V ∖ {𝐴, 𝐵}) ↔ (𝐴 ∈ V ∧ ¬ 𝐴 ∈ {𝐴, 𝐵}))
27 pm3.4 331 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ V ∧ ¬ 𝐴 ∈ {𝐴, 𝐵}) → (𝐴 ∈ V → ¬ 𝐴 ∈ {𝐴, 𝐵}))
2826, 27sylbi 120 . . . . . . . . . . . . . . 15 (𝐴 ∈ (V ∖ {𝐴, 𝐵}) → (𝐴 ∈ V → ¬ 𝐴 ∈ {𝐴, 𝐵}))
2928com12 30 . . . . . . . . . . . . . 14 (𝐴 ∈ V → (𝐴 ∈ (V ∖ {𝐴, 𝐵}) → ¬ 𝐴 ∈ {𝐴, 𝐵}))
3025, 29mt2d 620 . . . . . . . . . . . . 13 (𝐴 ∈ V → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
3124, 30syl 14 . . . . . . . . . . . 12 (𝐴𝐵 → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
3231adantr 274 . . . . . . . . . . 11 ((𝐴𝐵𝐵𝐴) → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
3332adantr 274 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
34 simp1l 1016 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → 𝐴𝐵)
35 eleq1 2233 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐴 → (𝑦𝑥𝐴𝑥))
36 eleq1 2233 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐴 → (𝑦 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
3735, 36imbi12d 233 . . . . . . . . . . . . . . . 16 (𝑦 = 𝐴 → ((𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
3837spcgv 2817 . . . . . . . . . . . . . . 15 (𝐴𝑥 → (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
3938pm2.43b 52 . . . . . . . . . . . . . 14 (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})))
40393ad2ant2 1014 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})))
41 eleq2 2234 . . . . . . . . . . . . . . 15 (𝑥 = 𝐵 → (𝐴𝑥𝐴𝐵))
4241imbi1d 230 . . . . . . . . . . . . . 14 (𝑥 = 𝐵 → ((𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐴𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
43423ad2ant3 1015 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → ((𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐴𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
4440, 43mpbid 146 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → (𝐴𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵})))
4534, 44mpd 13 . . . . . . . . . . 11 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
46453expia 1200 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → (𝑥 = 𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵})))
4733, 46mtod 658 . . . . . . . . 9 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝑥 = 𝐵)
48 ioran 747 . . . . . . . . 9 (¬ (𝑥 = 𝐴𝑥 = 𝐵) ↔ (¬ 𝑥 = 𝐴 ∧ ¬ 𝑥 = 𝐵))
4923, 47, 48sylanbrc 415 . . . . . . . 8 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ (𝑥 = 𝐴𝑥 = 𝐵))
50 vex 2733 . . . . . . . . . 10 𝑥 ∈ V
51 eldif 3130 . . . . . . . . . 10 (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ (𝑥 ∈ V ∧ ¬ 𝑥 ∈ {𝐴, 𝐵}))
5250, 51mpbiran 935 . . . . . . . . 9 (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ¬ 𝑥 ∈ {𝐴, 𝐵})
5350elpr 3604 . . . . . . . . 9 (𝑥 ∈ {𝐴, 𝐵} ↔ (𝑥 = 𝐴𝑥 = 𝐵))
5452, 53xchbinx 677 . . . . . . . 8 (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ¬ (𝑥 = 𝐴𝑥 = 𝐵))
5549, 54sylibr 133 . . . . . . 7 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → 𝑥 ∈ (V ∖ {𝐴, 𝐵}))
5655ex 114 . . . . . 6 ((𝐴𝐵𝐵𝐴) → (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
5756alrimiv 1867 . . . . 5 ((𝐴𝐵𝐵𝐴) → ∀𝑥(∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
58 df-ral 2453 . . . . . . . 8 (∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ∀𝑦(𝑦𝑥 → [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵})))
59 clelsb1 2275 . . . . . . . . . 10 ([𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝑦 ∈ (V ∖ {𝐴, 𝐵}))
6059imbi2i 225 . . . . . . . . 9 ((𝑦𝑥 → [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})))
6160albii 1463 . . . . . . . 8 (∀𝑦(𝑦𝑥 → [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})))
6258, 61bitri 183 . . . . . . 7 (∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})))
6362imbi1i 237 . . . . . 6 ((∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
6463albii 1463 . . . . 5 (∀𝑥(∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ ∀𝑥(∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
6557, 64sylibr 133 . . . 4 ((𝐴𝐵𝐵𝐴) → ∀𝑥(∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
66 ax-setind 4521 . . . 4 (∀𝑥(∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})) → ∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}))
6765, 66syl 14 . . 3 ((𝐴𝐵𝐵𝐴) → ∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}))
68 eleq1 2233 . . . . 5 (𝑥 = 𝐴 → (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
6968spcgv 2817 . . . 4 (𝐴𝐵 → (∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
7069adantr 274 . . 3 ((𝐴𝐵𝐵𝐴) → (∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
7167, 70mpd 13 . 2 ((𝐴𝐵𝐵𝐴) → 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
7271, 32pm2.65i 634 1 ¬ (𝐴𝐵𝐵𝐴)
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wi 4  wa 103  wb 104  wo 703  w3a 973  wal 1346   = wceq 1348  [wsb 1755  wcel 2141  wral 2448  Vcvv 2730  cdif 3118  {cpr 3584
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 609  ax-in2 610  ax-io 704  ax-5 1440  ax-7 1441  ax-gen 1442  ax-ie1 1486  ax-ie2 1487  ax-8 1497  ax-10 1498  ax-11 1499  ax-i12 1500  ax-bndl 1502  ax-4 1503  ax-17 1519  ax-i9 1523  ax-ial 1527  ax-i5r 1528  ax-ext 2152  ax-setind 4521
This theorem depends on definitions:  df-bi 116  df-3an 975  df-tru 1351  df-nf 1454  df-sb 1756  df-clab 2157  df-cleq 2163  df-clel 2166  df-nfc 2301  df-ral 2453  df-v 2732  df-dif 3123  df-un 3125  df-sn 3589  df-pr 3590
This theorem is referenced by:  preleq  4539  suc11g  4541  ordsuc  4547  2pwuninelg  6262  nntri2  6473  nndcel  6479
  Copyright terms: Public domain W3C validator