Theorem swopo 4341

Description: A strict weak order is a partial order. (Contributed by Mario Carneiro, 9-Jul-2014.)

Hypotheses

Ref	Expression
swopo.1	⊢ ((𝜑 ∧ (𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴)) → (𝑦𝑅𝑧 → ¬ 𝑧𝑅𝑦))
swopo.2	⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴)) → (𝑥𝑅𝑦 → (𝑥𝑅𝑧 ∨ 𝑧𝑅𝑦)))

Assertion

Ref	Expression
swopo	⊢ (𝜑 → 𝑅 Po 𝐴)

Distinct variable groups:   𝑥,𝑦,𝑧,𝐴   𝑥,𝑅,𝑦,𝑧   𝜑,𝑥,𝑦,𝑧

Proof of Theorem swopo

Step	Hyp	Ref	Expression
1		id 19	. . . . 5 ⊢ (𝑥 ∈ 𝐴 → 𝑥 ∈ 𝐴)
2	1	ancli 323	. . . 4 ⊢ (𝑥 ∈ 𝐴 → (𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴))
3		swopo.1	. . . . 5 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴)) → (𝑦𝑅𝑧 → ¬ 𝑧𝑅𝑦))
4	3	ralrimivva 2579	. . . 4 ⊢ (𝜑 → ∀𝑦 ∈ 𝐴 ∀𝑧 ∈ 𝐴 (𝑦𝑅𝑧 → ¬ 𝑧𝑅𝑦))
5		breq1 4036	. . . . . 6 ⊢ (𝑦 = 𝑥 → (𝑦𝑅𝑧 ↔ 𝑥𝑅𝑧))
6		breq2 4037	. . . . . . 7 ⊢ (𝑦 = 𝑥 → (𝑧𝑅𝑦 ↔ 𝑧𝑅𝑥))
7	6	notbid 668	. . . . . 6 ⊢ (𝑦 = 𝑥 → (¬ 𝑧𝑅𝑦 ↔ ¬ 𝑧𝑅𝑥))
8	5, 7	imbi12d 234	. . . . 5 ⊢ (𝑦 = 𝑥 → ((𝑦𝑅𝑧 → ¬ 𝑧𝑅𝑦) ↔ (𝑥𝑅𝑧 → ¬ 𝑧𝑅𝑥)))
9		breq2 4037	. . . . . 6 ⊢ (𝑧 = 𝑥 → (𝑥𝑅𝑧 ↔ 𝑥𝑅𝑥))
10		breq1 4036	. . . . . . 7 ⊢ (𝑧 = 𝑥 → (𝑧𝑅𝑥 ↔ 𝑥𝑅𝑥))
11	10	notbid 668	. . . . . 6 ⊢ (𝑧 = 𝑥 → (¬ 𝑧𝑅𝑥 ↔ ¬ 𝑥𝑅𝑥))
12	9, 11	imbi12d 234	. . . . 5 ⊢ (𝑧 = 𝑥 → ((𝑥𝑅𝑧 → ¬ 𝑧𝑅𝑥) ↔ (𝑥𝑅𝑥 → ¬ 𝑥𝑅𝑥)))
13	8, 12	rspc2va 2882	. . . 4 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ∧ ∀𝑦 ∈ 𝐴 ∀𝑧 ∈ 𝐴 (𝑦𝑅𝑧 → ¬ 𝑧𝑅𝑦)) → (𝑥𝑅𝑥 → ¬ 𝑥𝑅𝑥))
14	2, 4, 13	syl2anr 290	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝑥𝑅𝑥 → ¬ 𝑥𝑅𝑥))
15	14	pm2.01d 619	. 2 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ¬ 𝑥𝑅𝑥)
16	3	3adantr1 1158	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴)) → (𝑦𝑅𝑧 → ¬ 𝑧𝑅𝑦))
17		swopo.2	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴)) → (𝑥𝑅𝑦 → (𝑥𝑅𝑧 ∨ 𝑧𝑅𝑦)))
18	17	imp 124	. . . . . 6 ⊢ (((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴)) ∧ 𝑥𝑅𝑦) → (𝑥𝑅𝑧 ∨ 𝑧𝑅𝑦))
19	18	orcomd 730	. . . . 5 ⊢ (((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴)) ∧ 𝑥𝑅𝑦) → (𝑧𝑅𝑦 ∨ 𝑥𝑅𝑧))
20	19	ord 725	. . . 4 ⊢ (((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴)) ∧ 𝑥𝑅𝑦) → (¬ 𝑧𝑅𝑦 → 𝑥𝑅𝑧))
21	20	expimpd 363	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴)) → ((𝑥𝑅𝑦 ∧ ¬ 𝑧𝑅𝑦) → 𝑥𝑅𝑧))
22	16, 21	sylan2d 294	. 2 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴)) → ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))
23	15, 22	ispod 4339	1 ⊢ (𝜑 → 𝑅 Po 𝐴)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 104   ∨ wo 709   ∧ w3a 980   ∈ wcel 2167  ∀wral 2475   class class class wbr 4033   Po wpo 4329

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 1461  ax-7 1462  ax-gen 1463  ax-ie1 1507  ax-ie2 1508  ax-8 1518  ax-10 1519  ax-11 1520  ax-i12 1521  ax-bndl 1523  ax-4 1524  ax-17 1540  ax-i9 1544  ax-ial 1548  ax-i5r 1549  ax-ext 2178

This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-nf 1475  df-sb 1777  df-clab 2183  df-cleq 2189  df-clel 2192  df-nfc 2328  df-ral 2480  df-v 2765  df-un 3161  df-sn 3628  df-pr 3629  df-op 3631  df-br 4034  df-po 4331

This theorem is referenced by:  swoer  6620