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

Theorem en2lp 4586
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 2771 . . . . . . . . . . . 12 (𝐵𝐴𝐵 ∈ V)
2 prid2g 3723 . . . . . . . . . . . . 13 (𝐵 ∈ V → 𝐵 ∈ {𝐴, 𝐵})
3 eldif 3162 . . . . . . . . . . . . . . 15 (𝐵 ∈ (V ∖ {𝐴, 𝐵}) ↔ (𝐵 ∈ V ∧ ¬ 𝐵 ∈ {𝐴, 𝐵}))
4 pm3.4 333 . . . . . . . . . . . . . . 15 ((𝐵 ∈ V ∧ ¬ 𝐵 ∈ {𝐴, 𝐵}) → (𝐵 ∈ V → ¬ 𝐵 ∈ {𝐴, 𝐵}))
53, 4sylbi 121 . . . . . . . . . . . . . 14 (𝐵 ∈ (V ∖ {𝐴, 𝐵}) → (𝐵 ∈ V → ¬ 𝐵 ∈ {𝐴, 𝐵}))
65com12 30 . . . . . . . . . . . . 13 (𝐵 ∈ V → (𝐵 ∈ (V ∖ {𝐴, 𝐵}) → ¬ 𝐵 ∈ {𝐴, 𝐵}))
72, 6mt2d 626 . . . . . . . . . . . 12 (𝐵 ∈ V → ¬ 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
81, 7syl 14 . . . . . . . . . . 11 (𝐵𝐴 → ¬ 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
98ad2antlr 489 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
10 simp1r 1024 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → 𝐵𝐴)
11 eleq1 2256 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐵 → (𝑦𝑥𝐵𝑥))
12 eleq1 2256 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐵 → (𝑦 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝐵 ∈ (V ∖ {𝐴, 𝐵})))
1311, 12imbi12d 234 . . . . . . . . . . . . . . . 16 (𝑦 = 𝐵 → ((𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
1413spcgv 2847 . . . . . . . . . . . . . . 15 (𝐵𝑥 → (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
1514pm2.43b 52 . . . . . . . . . . . . . 14 (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})))
16153ad2ant2 1021 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → (𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})))
17 eleq2 2257 . . . . . . . . . . . . . . 15 (𝑥 = 𝐴 → (𝐵𝑥𝐵𝐴))
1817imbi1d 231 . . . . . . . . . . . . . 14 (𝑥 = 𝐴 → ((𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐵𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
19183ad2ant3 1022 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → ((𝐵𝑥𝐵 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐵𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵}))))
2016, 19mpbid 147 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → (𝐵𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵})))
2110, 20mpd 13 . . . . . . . . . . 11 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐴) → 𝐵 ∈ (V ∖ {𝐴, 𝐵}))
22213expia 1207 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → (𝑥 = 𝐴𝐵 ∈ (V ∖ {𝐴, 𝐵})))
239, 22mtod 664 . . . . . . . . 9 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝑥 = 𝐴)
24 elex 2771 . . . . . . . . . . . . 13 (𝐴𝐵𝐴 ∈ V)
25 prid1g 3722 . . . . . . . . . . . . . 14 (𝐴 ∈ V → 𝐴 ∈ {𝐴, 𝐵})
26 eldif 3162 . . . . . . . . . . . . . . . 16 (𝐴 ∈ (V ∖ {𝐴, 𝐵}) ↔ (𝐴 ∈ V ∧ ¬ 𝐴 ∈ {𝐴, 𝐵}))
27 pm3.4 333 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ V ∧ ¬ 𝐴 ∈ {𝐴, 𝐵}) → (𝐴 ∈ V → ¬ 𝐴 ∈ {𝐴, 𝐵}))
2826, 27sylbi 121 . . . . . . . . . . . . . . 15 (𝐴 ∈ (V ∖ {𝐴, 𝐵}) → (𝐴 ∈ V → ¬ 𝐴 ∈ {𝐴, 𝐵}))
2928com12 30 . . . . . . . . . . . . . 14 (𝐴 ∈ V → (𝐴 ∈ (V ∖ {𝐴, 𝐵}) → ¬ 𝐴 ∈ {𝐴, 𝐵}))
3025, 29mt2d 626 . . . . . . . . . . . . 13 (𝐴 ∈ V → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
3124, 30syl 14 . . . . . . . . . . . 12 (𝐴𝐵 → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
3231adantr 276 . . . . . . . . . . 11 ((𝐴𝐵𝐵𝐴) → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
3332adantr 276 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
34 simp1l 1023 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → 𝐴𝐵)
35 eleq1 2256 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐴 → (𝑦𝑥𝐴𝑥))
36 eleq1 2256 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝐴 → (𝑦 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
3735, 36imbi12d 234 . . . . . . . . . . . . . . . 16 (𝑦 = 𝐴 → ((𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
3837spcgv 2847 . . . . . . . . . . . . . . 15 (𝐴𝑥 → (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
3938pm2.43b 52 . . . . . . . . . . . . . 14 (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})))
40393ad2ant2 1021 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → (𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})))
41 eleq2 2257 . . . . . . . . . . . . . . 15 (𝑥 = 𝐵 → (𝐴𝑥𝐴𝐵))
4241imbi1d 231 . . . . . . . . . . . . . 14 (𝑥 = 𝐵 → ((𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐴𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
43423ad2ant3 1022 . . . . . . . . . . . . 13 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → ((𝐴𝑥𝐴 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝐴𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵}))))
4440, 43mpbid 147 . . . . . . . . . . . 12 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → (𝐴𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵})))
4534, 44mpd 13 . . . . . . . . . . 11 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) ∧ 𝑥 = 𝐵) → 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
46453expia 1207 . . . . . . . . . 10 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → (𝑥 = 𝐵𝐴 ∈ (V ∖ {𝐴, 𝐵})))
4733, 46mtod 664 . . . . . . . . 9 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ 𝑥 = 𝐵)
48 ioran 753 . . . . . . . . 9 (¬ (𝑥 = 𝐴𝑥 = 𝐵) ↔ (¬ 𝑥 = 𝐴 ∧ ¬ 𝑥 = 𝐵))
4923, 47, 48sylanbrc 417 . . . . . . . 8 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → ¬ (𝑥 = 𝐴𝑥 = 𝐵))
50 vex 2763 . . . . . . . . . 10 𝑥 ∈ V
51 eldif 3162 . . . . . . . . . 10 (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ (𝑥 ∈ V ∧ ¬ 𝑥 ∈ {𝐴, 𝐵}))
5250, 51mpbiran 942 . . . . . . . . 9 (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ¬ 𝑥 ∈ {𝐴, 𝐵})
5350elpr 3639 . . . . . . . . 9 (𝑥 ∈ {𝐴, 𝐵} ↔ (𝑥 = 𝐴𝑥 = 𝐵))
5452, 53xchbinx 683 . . . . . . . 8 (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ¬ (𝑥 = 𝐴𝑥 = 𝐵))
5549, 54sylibr 134 . . . . . . 7 (((𝐴𝐵𝐵𝐴) ∧ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵}))) → 𝑥 ∈ (V ∖ {𝐴, 𝐵}))
5655ex 115 . . . . . 6 ((𝐴𝐵𝐵𝐴) → (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
5756alrimiv 1885 . . . . 5 ((𝐴𝐵𝐵𝐴) → ∀𝑥(∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
58 df-ral 2477 . . . . . . . 8 (∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ∀𝑦(𝑦𝑥 → [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵})))
59 clelsb1 2298 . . . . . . . . . 10 ([𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝑦 ∈ (V ∖ {𝐴, 𝐵}))
6059imbi2i 226 . . . . . . . . 9 ((𝑦𝑥 → [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ (𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})))
6160albii 1481 . . . . . . . 8 (∀𝑦(𝑦𝑥 → [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})))
6258, 61bitri 184 . . . . . . 7 (∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ ∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})))
6362imbi1i 238 . . . . . 6 ((∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ (∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
6463albii 1481 . . . . 5 (∀𝑥(∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})) ↔ ∀𝑥(∀𝑦(𝑦𝑥𝑦 ∈ (V ∖ {𝐴, 𝐵})) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
6557, 64sylibr 134 . . . 4 ((𝐴𝐵𝐵𝐴) → ∀𝑥(∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})))
66 ax-setind 4569 . . . 4 (∀𝑥(∀𝑦𝑥 [𝑦 / 𝑥]𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝑥 ∈ (V ∖ {𝐴, 𝐵})) → ∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}))
6765, 66syl 14 . . 3 ((𝐴𝐵𝐵𝐴) → ∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}))
68 eleq1 2256 . . . . 5 (𝑥 = 𝐴 → (𝑥 ∈ (V ∖ {𝐴, 𝐵}) ↔ 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
6968spcgv 2847 . . . 4 (𝐴𝐵 → (∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
7069adantr 276 . . 3 ((𝐴𝐵𝐵𝐴) → (∀𝑥 𝑥 ∈ (V ∖ {𝐴, 𝐵}) → 𝐴 ∈ (V ∖ {𝐴, 𝐵})))
7167, 70mpd 13 . 2 ((𝐴𝐵𝐵𝐴) → 𝐴 ∈ (V ∖ {𝐴, 𝐵}))
7271, 32pm2.65i 640 1 ¬ (𝐴𝐵𝐵𝐴)
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wi 4  wa 104  wb 105  wo 709  w3a 980  wal 1362   = wceq 1364  [wsb 1773  wcel 2164  wral 2472  Vcvv 2760  cdif 3150  {cpr 3619
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 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-ext 2175  ax-setind 4569
This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-nf 1472  df-sb 1774  df-clab 2180  df-cleq 2186  df-clel 2189  df-nfc 2325  df-ral 2477  df-v 2762  df-dif 3155  df-un 3157  df-sn 3624  df-pr 3625
This theorem is referenced by:  preleq  4587  suc11g  4589  ordsuc  4595  2pwuninelg  6336  nntri2  6547  nndcel  6553
  Copyright terms: Public domain W3C validator