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

Theorem fr3nr 7616
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 7591 . . . . . . 7 {𝐵, 𝐶, 𝐷} ∈ V
21a1i 11 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → {𝐵, 𝐶, 𝐷} ∈ V)
3 simpl 483 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝑅 Fr 𝐴)
4 df-tp 4572 . . . . . . 7 {𝐵, 𝐶, 𝐷} = ({𝐵, 𝐶} ∪ {𝐷})
5 simpr1 1193 . . . . . . . . 9 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐵𝐴)
6 simpr2 1194 . . . . . . . . 9 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐶𝐴)
75, 6prssd 4761 . . . . . . . 8 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → {𝐵, 𝐶} ⊆ 𝐴)
8 simpr3 1195 . . . . . . . . 9 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐷𝐴)
98snssd 4748 . . . . . . . 8 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → {𝐷} ⊆ 𝐴)
107, 9unssd 4125 . . . . . . 7 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ({𝐵, 𝐶} ∪ {𝐷}) ⊆ 𝐴)
114, 10eqsstrid 3974 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → {𝐵, 𝐶, 𝐷} ⊆ 𝐴)
125tpnzd 4722 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → {𝐵, 𝐶, 𝐷} ≠ ∅)
13 fri 5550 . . . . . 6 ((({𝐵, 𝐶, 𝐷} ∈ V ∧ 𝑅 Fr 𝐴) ∧ ({𝐵, 𝐶, 𝐷} ⊆ 𝐴 ∧ {𝐵, 𝐶, 𝐷} ≠ ∅)) → ∃𝑥 ∈ {𝐵, 𝐶, 𝐷}∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥)
142, 3, 11, 12, 13syl22anc 836 . . . . 5 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ∃𝑥 ∈ {𝐵, 𝐶, 𝐷}∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥)
15 breq2 5083 . . . . . . . . 9 (𝑥 = 𝐵 → (𝑦𝑅𝑥𝑦𝑅𝐵))
1615notbid 318 . . . . . . . 8 (𝑥 = 𝐵 → (¬ 𝑦𝑅𝑥 ↔ ¬ 𝑦𝑅𝐵))
1716ralbidv 3123 . . . . . . 7 (𝑥 = 𝐵 → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥 ↔ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵))
18 breq2 5083 . . . . . . . . 9 (𝑥 = 𝐶 → (𝑦𝑅𝑥𝑦𝑅𝐶))
1918notbid 318 . . . . . . . 8 (𝑥 = 𝐶 → (¬ 𝑦𝑅𝑥 ↔ ¬ 𝑦𝑅𝐶))
2019ralbidv 3123 . . . . . . 7 (𝑥 = 𝐶 → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥 ↔ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶))
21 breq2 5083 . . . . . . . . 9 (𝑥 = 𝐷 → (𝑦𝑅𝑥𝑦𝑅𝐷))
2221notbid 318 . . . . . . . 8 (𝑥 = 𝐷 → (¬ 𝑦𝑅𝑥 ↔ ¬ 𝑦𝑅𝐷))
2322ralbidv 3123 . . . . . . 7 (𝑥 = 𝐷 → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥 ↔ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷))
2417, 20, 23rextpg 4641 . . . . . 6 ((𝐵𝐴𝐶𝐴𝐷𝐴) → (∃𝑥 ∈ {𝐵, 𝐶, 𝐷}∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥 ↔ (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷)))
2524adantl 482 . . . . 5 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (∃𝑥 ∈ {𝐵, 𝐶, 𝐷}∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝑥 ↔ (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷)))
2614, 25mpbid 231 . . . 4 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷))
27 snsstp3 4757 . . . . . . 7 {𝐷} ⊆ {𝐵, 𝐶, 𝐷}
28 snssg 4724 . . . . . . . 8 (𝐷𝐴 → (𝐷 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐷} ⊆ {𝐵, 𝐶, 𝐷}))
298, 28syl 17 . . . . . . 7 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (𝐷 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐷} ⊆ {𝐵, 𝐶, 𝐷}))
3027, 29mpbiri 257 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐷 ∈ {𝐵, 𝐶, 𝐷})
31 breq1 5082 . . . . . . . 8 (𝑦 = 𝐷 → (𝑦𝑅𝐵𝐷𝑅𝐵))
3231notbid 318 . . . . . . 7 (𝑦 = 𝐷 → (¬ 𝑦𝑅𝐵 ↔ ¬ 𝐷𝑅𝐵))
3332rspcv 3556 . . . . . 6 (𝐷 ∈ {𝐵, 𝐶, 𝐷} → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 → ¬ 𝐷𝑅𝐵))
3430, 33syl 17 . . . . 5 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 → ¬ 𝐷𝑅𝐵))
35 snsstp1 4755 . . . . . . 7 {𝐵} ⊆ {𝐵, 𝐶, 𝐷}
36 snssg 4724 . . . . . . . 8 (𝐵𝐴 → (𝐵 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐵} ⊆ {𝐵, 𝐶, 𝐷}))
375, 36syl 17 . . . . . . 7 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (𝐵 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐵} ⊆ {𝐵, 𝐶, 𝐷}))
3835, 37mpbiri 257 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐵 ∈ {𝐵, 𝐶, 𝐷})
39 breq1 5082 . . . . . . . 8 (𝑦 = 𝐵 → (𝑦𝑅𝐶𝐵𝑅𝐶))
4039notbid 318 . . . . . . 7 (𝑦 = 𝐵 → (¬ 𝑦𝑅𝐶 ↔ ¬ 𝐵𝑅𝐶))
4140rspcv 3556 . . . . . 6 (𝐵 ∈ {𝐵, 𝐶, 𝐷} → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 → ¬ 𝐵𝑅𝐶))
4238, 41syl 17 . . . . 5 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 → ¬ 𝐵𝑅𝐶))
43 snsstp2 4756 . . . . . . 7 {𝐶} ⊆ {𝐵, 𝐶, 𝐷}
44 snssg 4724 . . . . . . . 8 (𝐶𝐴 → (𝐶 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐶} ⊆ {𝐵, 𝐶, 𝐷}))
456, 44syl 17 . . . . . . 7 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (𝐶 ∈ {𝐵, 𝐶, 𝐷} ↔ {𝐶} ⊆ {𝐵, 𝐶, 𝐷}))
4643, 45mpbiri 257 . . . . . 6 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → 𝐶 ∈ {𝐵, 𝐶, 𝐷})
47 breq1 5082 . . . . . . . 8 (𝑦 = 𝐶 → (𝑦𝑅𝐷𝐶𝑅𝐷))
4847notbid 318 . . . . . . 7 (𝑦 = 𝐶 → (¬ 𝑦𝑅𝐷 ↔ ¬ 𝐶𝑅𝐷))
4948rspcv 3556 . . . . . 6 (𝐶 ∈ {𝐵, 𝐶, 𝐷} → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷 → ¬ 𝐶𝑅𝐷))
5046, 49syl 17 . . . . 5 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷 → ¬ 𝐶𝑅𝐷))
5134, 42, 503orim123d 1443 . . . 4 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ((∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐵 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐶 ∨ ∀𝑦 ∈ {𝐵, 𝐶, 𝐷} ¬ 𝑦𝑅𝐷) → (¬ 𝐷𝑅𝐵 ∨ ¬ 𝐵𝑅𝐶 ∨ ¬ 𝐶𝑅𝐷)))
5226, 51mpd 15 . . 3 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → (¬ 𝐷𝑅𝐵 ∨ ¬ 𝐵𝑅𝐶 ∨ ¬ 𝐶𝑅𝐷))
53 3ianor 1106 . . 3 (¬ (𝐷𝑅𝐵𝐵𝑅𝐶𝐶𝑅𝐷) ↔ (¬ 𝐷𝑅𝐵 ∨ ¬ 𝐵𝑅𝐶 ∨ ¬ 𝐶𝑅𝐷))
5452, 53sylibr 233 . 2 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ¬ (𝐷𝑅𝐵𝐵𝑅𝐶𝐶𝑅𝐷))
55 3anrot 1099 . 2 ((𝐷𝑅𝐵𝐵𝑅𝐶𝐶𝑅𝐷) ↔ (𝐵𝑅𝐶𝐶𝑅𝐷𝐷𝑅𝐵))
5654, 55sylnib 328 1 ((𝑅 Fr 𝐴 ∧ (𝐵𝐴𝐶𝐴𝐷𝐴)) → ¬ (𝐵𝑅𝐶𝐶𝑅𝐷𝐷𝑅𝐵))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396  w3o 1085  w3a 1086   = wceq 1542  wcel 2110  wne 2945  wral 3066  wrex 3067  Vcvv 3431  cun 3890  wss 3892  c0 4262  {csn 4567  {cpr 4569  {ctp 4571   class class class wbr 5079   Fr wfr 5542
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1975  ax-7 2015  ax-8 2112  ax-9 2120  ax-ext 2711  ax-sep 5227  ax-nul 5234  ax-pr 5356  ax-un 7582
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1545  df-fal 1555  df-ex 1787  df-sb 2072  df-clab 2718  df-cleq 2732  df-clel 2818  df-ne 2946  df-ral 3071  df-rex 3072  df-rab 3075  df-v 3433  df-dif 3895  df-un 3897  df-in 3899  df-ss 3909  df-nul 4263  df-if 4466  df-pw 4541  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-uni 4846  df-br 5080  df-fr 5545
This theorem is referenced by:  epne3  7617  dfwe2  7618
  Copyright terms: Public domain W3C validator