MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  fr3nr Structured version   Visualization version   GIF version

Theorem fr3nr 7711
Description: A well-founded relation has no 3-cycle loops. Special case of Proposition 6.23 of [TakeutiZaring] p. 30. (Contributed by NM, 10-Apr-1994.) (Revised by Mario Carneiro, 22-Jun-2015.)
Assertion
Ref Expression
fr3nr ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ¬ (𝐵𝑅𝐶𝐶𝑅𝐷𝐷𝑅𝐵))

Proof of Theorem fr3nr
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 tpex 7686 . . . . . . 7 {𝐵, 𝐶, 𝐷} ∈ V
21a1i 11 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → {𝐵, 𝐶, 𝐷} ∈ V)
3 simpl 484 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝑅 Fr 𝐴)
4 df-tp 4596 . . . . . . 7 {𝐵, 𝐶, 𝐷} = ({𝐵, 𝐶} ∪ {𝐷})
5 simpr1 1195 . . . . . . . . 9 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐵𝐴)
6 simpr2 1196 . . . . . . . . 9 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐶𝐴)
75, 6prssd 4787 . . . . . . . 8 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → {𝐵, 𝐶} ⊆ 𝐴)
8 simpr3 1197 . . . . . . . . 9 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐷𝐴)
98snssd 4774 . . . . . . . 8 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → {𝐷} ⊆ 𝐴)
107, 9unssd 4151 . . . . . . 7 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ({𝐵, 𝐶} ∪ {𝐷}) ⊆ 𝐴)
114, 10eqsstrid 3997 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → {𝐵, 𝐶, 𝐷} ⊆ 𝐴)
125tpnzd 4746 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → {𝐵, 𝐶, 𝐷} ≠ ∅)
13 fri 5598 . . . . . 6 ((({𝐵, 𝐶, 𝐷} ∈ V ∧ 𝑅 Fr 𝐴) ∧ ({𝐵, 𝐶, 𝐷} ⊆ 𝐴 ∧ {𝐵, 𝐶, 𝐷} ≠ ∅)) → ∃𝑥 ∈ {𝐵, 𝐶, 𝐷}∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥)
142, 3, 11, 12, 13syl22anc 838 . . . . 5 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ∃𝑥 ∈ {𝐵, 𝐶, 𝐷}∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥)
15 breq2 5114 . . . . . . . . 9 (𝑥 = 𝐵 → (𝑦𝑅𝑥𝑦𝑅𝐵))
1615notbid 318 . . . . . . . 8 (𝑥 = 𝐵 → (¬ 𝑦𝑅𝑥 ↔ ¬ 𝑦𝑅𝐵))
1716ralbidv 3175 . . . . . . 7 (𝑥 = 𝐵 → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥 ↔ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵))
18 breq2 5114 . . . . . . . . 9 (𝑥 = 𝐶 → (𝑦𝑅𝑥𝑦𝑅𝐶))
1918notbid 318 . . . . . . . 8 (𝑥 = 𝐶 → (¬ 𝑦𝑅𝑥 ↔ ¬ 𝑦𝑅𝐶))
2019ralbidv 3175 . . . . . . 7 (𝑥 = 𝐶 → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥 ↔ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶))
21 breq2 5114 . . . . . . . . 9 (𝑥 = 𝐷 → (𝑦𝑅𝑥𝑦𝑅𝐷))
2221notbid 318 . . . . . . . 8 (𝑥 = 𝐷 → (¬ 𝑦𝑅𝑥 ↔ ¬ 𝑦𝑅𝐷))
2322ralbidv 3175 . . . . . . 7 (𝑥 = 𝐷 → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥 ↔ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷))
2417, 20, 23rextpg 4665 . . . . . 6 ((𝐵𝐴𝐶𝐴𝐷𝐴) → (∃𝑥 ∈ {𝐵, 𝐶, 𝐷}∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥 ↔ (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷)))
2524adantl 483 . . . . 5 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (∃𝑥 ∈ {𝐵, 𝐶, 𝐷}∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥 ↔ (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷)))
2614, 25mpbid 231 . . . 4 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷))
27 snsstp3 4783 . . . . . . 7 {𝐷} ⊆ {𝐵, 𝐶, 𝐷}
28 snssg 4749 . . . . . . . 8 (𝐷𝐴 → (𝐷 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐷} ⊆ {𝐵, 𝐶, 𝐷}))
298, 28syl 17 . . . . . . 7 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (𝐷 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐷} ⊆ {𝐵, 𝐶, 𝐷}))
3027, 29mpbiri 258 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐷 ∈ {𝐵, 𝐶, 𝐷})
31 breq1 5113 . . . . . . . 8 (𝑦 = 𝐷 → (𝑦𝑅𝐵𝐷𝑅𝐵))
3231notbid 318 . . . . . . 7 (𝑦 = 𝐷 → (¬ 𝑦𝑅𝐵 ↔ ¬ 𝐷𝑅𝐵))
3332rspcv 3580 . . . . . 6 (𝐷 ∈ {𝐵, 𝐶, 𝐷} → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 → ¬ 𝐷𝑅𝐵))
3430, 33syl 17 . . . . 5 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 → ¬ 𝐷𝑅𝐵))
35 snsstp1 4781 . . . . . . 7 {𝐵} ⊆ {𝐵, 𝐶, 𝐷}
36 snssg 4749 . . . . . . . 8 (𝐵𝐴 → (𝐵 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐵} ⊆ {𝐵, 𝐶, 𝐷}))
375, 36syl 17 . . . . . . 7 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (𝐵 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐵} ⊆ {𝐵, 𝐶, 𝐷}))
3835, 37mpbiri 258 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐵 ∈ {𝐵, 𝐶, 𝐷})
39 breq1 5113 . . . . . . . 8 (𝑦 = 𝐵 → (𝑦𝑅𝐶𝐵𝑅𝐶))
4039notbid 318 . . . . . . 7 (𝑦 = 𝐵 → (¬ 𝑦𝑅𝐶 ↔ ¬ 𝐵𝑅𝐶))
4140rspcv 3580 . . . . . 6 (𝐵 ∈ {𝐵, 𝐶, 𝐷} → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 → ¬ 𝐵𝑅𝐶))
4238, 41syl 17 . . . . 5 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 → ¬ 𝐵𝑅𝐶))
43 snsstp2 4782 . . . . . . 7 {𝐶} ⊆ {𝐵, 𝐶, 𝐷}
44 snssg 4749 . . . . . . . 8 (𝐶𝐴 → (𝐶 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐶} ⊆ {𝐵, 𝐶, 𝐷}))
456, 44syl 17 . . . . . . 7 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (𝐶 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐶} ⊆ {𝐵, 𝐶, 𝐷}))
4643, 45mpbiri 258 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐶 ∈ {𝐵, 𝐶, 𝐷})
47 breq1 5113 . . . . . . . 8 (𝑦 = 𝐶 → (𝑦𝑅𝐷𝐶𝑅𝐷))
4847notbid 318 . . . . . . 7 (𝑦 = 𝐶 → (¬ 𝑦𝑅𝐷 ↔ ¬ 𝐶𝑅𝐷))
4948rspcv 3580 . . . . . 6 (𝐶 ∈ {𝐵, 𝐶, 𝐷} → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷 → ¬ 𝐶𝑅𝐷))
5046, 49syl 17 . . . . 5 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷 → ¬ 𝐶𝑅𝐷))
5134, 42, 503orim123d 1445 . . . 4 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ((∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷) → (¬ 𝐷𝑅𝐵 ∨ ¬ 𝐵𝑅𝐶 ∨ ¬ 𝐶𝑅𝐷)))
5226, 51mpd 15 . . 3 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (¬ 𝐷𝑅𝐵 ∨ ¬ 𝐵𝑅𝐶 ∨ ¬ 𝐶𝑅𝐷))
53 3ianor 1108 . . 3 (¬ (𝐷𝑅𝐵𝐵𝑅𝐶𝐶𝑅𝐷) ↔ (¬ 𝐷𝑅𝐵 ∨ ¬ 𝐵𝑅𝐶 ∨ ¬ 𝐶𝑅𝐷))
5452, 53sylibr 233 . 2 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ¬ (𝐷𝑅𝐵𝐵𝑅𝐶𝐶𝑅𝐷))
55 3anrot 1101 . 2 ((𝐷𝑅𝐵𝐵𝑅𝐶𝐶𝑅𝐷) ↔ (𝐵𝑅𝐶𝐶𝑅𝐷𝐷𝑅𝐵))
5654, 55sylnib 328 1 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ¬ (𝐵𝑅𝐶𝐶𝑅𝐷𝐷𝑅𝐵))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 397  w3o 1087  w3a 1088   = wceq 1542  wcel 2107  wne 2944  wral 3065  wrex 3074  Vcvv 3448  cun 3913  wss 3915  c0 4287  {csn 4591  {cpr 4593  {ctp 4595   class class class wbr 5110   Fr wfr 5590
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-ext 2708  ax-sep 5261  ax-nul 5268  ax-pr 5389  ax-un 7677
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-sb 2069  df-clab 2715  df-cleq 2729  df-clel 2815  df-ne 2945  df-ral 3066  df-rex 3075  df-rab 3411  df-v 3450  df-dif 3918  df-un 3920  df-in 3922  df-ss 3932  df-nul 4288  df-if 4492  df-pw 4567  df-sn 4592  df-pr 4594  df-tp 4596  df-op 4598  df-uni 4871  df-br 5111  df-fr 5593
This theorem is referenced by:  epne3  7712  dfwe2  7713
  Copyright terms: Public domain W3C validator