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

Theorem pospo 17582
Description: Write a poset structure in terms of the proper-class poset predicate (strict less than version). (Contributed by Mario Carneiro, 8-Feb-2015.)
Hypotheses
Ref Expression
pospo.b 𝐵 = (Base‘𝐾)
pospo.l = (le‘𝐾)
pospo.s < = (lt‘𝐾)
Assertion
Ref Expression
pospo (𝐾𝑉 → (𝐾 ∈ Poset ↔ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )))

Proof of Theorem pospo
Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 pospo.s . . . . 5 < = (lt‘𝐾)
21pltirr 17572 . . . 4 ((𝐾 ∈ Poset ∧ 𝑥𝐵) → ¬ 𝑥 < 𝑥)
3 pospo.b . . . . 5 𝐵 = (Base‘𝐾)
43, 1plttr 17579 . . . 4 ((𝐾 ∈ Poset ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → ((𝑥 < 𝑦𝑦 < 𝑧) → 𝑥 < 𝑧))
52, 4ispod 5481 . . 3 (𝐾 ∈ Poset → < Po 𝐵)
6 relres 5881 . . . . 5 Rel ( I ↾ 𝐵)
76a1i 11 . . . 4 (𝐾 ∈ Poset → Rel ( I ↾ 𝐵))
8 opabresid 5916 . . . . . . . 8 ( I ↾ 𝐵) = {⟨𝑥, 𝑦⟩ ∣ (𝑥𝐵𝑦 = 𝑥)}
98eqcomi 2830 . . . . . . 7 {⟨𝑥, 𝑦⟩ ∣ (𝑥𝐵𝑦 = 𝑥)} = ( I ↾ 𝐵)
109eleq2i 2904 . . . . . 6 (⟨𝑥, 𝑦⟩ ∈ {⟨𝑥, 𝑦⟩ ∣ (𝑥𝐵𝑦 = 𝑥)} ↔ ⟨𝑥, 𝑦⟩ ∈ ( I ↾ 𝐵))
11 opabidw 5411 . . . . . 6 (⟨𝑥, 𝑦⟩ ∈ {⟨𝑥, 𝑦⟩ ∣ (𝑥𝐵𝑦 = 𝑥)} ↔ (𝑥𝐵𝑦 = 𝑥))
1210, 11bitr3i 279 . . . . 5 (⟨𝑥, 𝑦⟩ ∈ ( I ↾ 𝐵) ↔ (𝑥𝐵𝑦 = 𝑥))
13 pospo.l . . . . . . . 8 = (le‘𝐾)
143, 13posref 17560 . . . . . . 7 ((𝐾 ∈ Poset ∧ 𝑥𝐵) → 𝑥 𝑥)
15 df-br 5066 . . . . . . . 8 (𝑥 𝑦 ↔ ⟨𝑥, 𝑦⟩ ∈ )
16 breq2 5069 . . . . . . . 8 (𝑦 = 𝑥 → (𝑥 𝑦𝑥 𝑥))
1715, 16syl5bbr 287 . . . . . . 7 (𝑦 = 𝑥 → (⟨𝑥, 𝑦⟩ ∈ 𝑥 𝑥))
1814, 17syl5ibrcom 249 . . . . . 6 ((𝐾 ∈ Poset ∧ 𝑥𝐵) → (𝑦 = 𝑥 → ⟨𝑥, 𝑦⟩ ∈ ))
1918expimpd 456 . . . . 5 (𝐾 ∈ Poset → ((𝑥𝐵𝑦 = 𝑥) → ⟨𝑥, 𝑦⟩ ∈ ))
2012, 19syl5bi 244 . . . 4 (𝐾 ∈ Poset → (⟨𝑥, 𝑦⟩ ∈ ( I ↾ 𝐵) → ⟨𝑥, 𝑦⟩ ∈ ))
217, 20relssdv 5660 . . 3 (𝐾 ∈ Poset → ( I ↾ 𝐵) ⊆ )
225, 21jca 514 . 2 (𝐾 ∈ Poset → ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ ))
23 elex 3512 . . . . 5 (𝐾𝑉𝐾 ∈ V)
2423adantr 483 . . . 4 ((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) → 𝐾 ∈ V)
253a1i 11 . . . 4 ((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) → 𝐵 = (Base‘𝐾))
2613a1i 11 . . . 4 ((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) → = (le‘𝐾))
27 equid 2015 . . . . . 6 𝑥 = 𝑥
28 simpr 487 . . . . . . 7 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵) → 𝑥𝐵)
29 resieq 5863 . . . . . . 7 ((𝑥𝐵𝑥𝐵) → (𝑥( I ↾ 𝐵)𝑥𝑥 = 𝑥))
3028, 28, 29syl2anc 586 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵) → (𝑥( I ↾ 𝐵)𝑥𝑥 = 𝑥))
3127, 30mpbiri 260 . . . . 5 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵) → 𝑥( I ↾ 𝐵)𝑥)
32 simplrr 776 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵) → ( I ↾ 𝐵) ⊆ )
3332ssbrd 5108 . . . . 5 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵) → (𝑥( I ↾ 𝐵)𝑥𝑥 𝑥))
3431, 33mpd 15 . . . 4 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵) → 𝑥 𝑥)
353, 13, 1pleval2i 17573 . . . . . 6 ((𝑥𝐵𝑦𝐵) → (𝑥 𝑦 → (𝑥 < 𝑦𝑥 = 𝑦)))
36353adant1 1126 . . . . 5 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵𝑦𝐵) → (𝑥 𝑦 → (𝑥 < 𝑦𝑥 = 𝑦)))
373, 13, 1pleval2i 17573 . . . . . . 7 ((𝑦𝐵𝑥𝐵) → (𝑦 𝑥 → (𝑦 < 𝑥𝑦 = 𝑥)))
3837ancoms 461 . . . . . 6 ((𝑥𝐵𝑦𝐵) → (𝑦 𝑥 → (𝑦 < 𝑥𝑦 = 𝑥)))
39383adant1 1126 . . . . 5 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵𝑦𝐵) → (𝑦 𝑥 → (𝑦 < 𝑥𝑦 = 𝑥)))
40 simprl 769 . . . . . . . 8 ((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) → < Po 𝐵)
41 po2nr 5486 . . . . . . . . 9 (( < Po 𝐵 ∧ (𝑥𝐵𝑦𝐵)) → ¬ (𝑥 < 𝑦𝑦 < 𝑥))
42413impb 1111 . . . . . . . 8 (( < Po 𝐵𝑥𝐵𝑦𝐵) → ¬ (𝑥 < 𝑦𝑦 < 𝑥))
4340, 42syl3an1 1159 . . . . . . 7 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵𝑦𝐵) → ¬ (𝑥 < 𝑦𝑦 < 𝑥))
4443pm2.21d 121 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵𝑦𝐵) → ((𝑥 < 𝑦𝑦 < 𝑥) → 𝑥 = 𝑦))
45 simpl 485 . . . . . . 7 ((𝑥 = 𝑦𝑦 < 𝑥) → 𝑥 = 𝑦)
4645a1i 11 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵𝑦𝐵) → ((𝑥 = 𝑦𝑦 < 𝑥) → 𝑥 = 𝑦))
47 simpr 487 . . . . . . . 8 ((𝑥 < 𝑦𝑦 = 𝑥) → 𝑦 = 𝑥)
4847equcomd 2022 . . . . . . 7 ((𝑥 < 𝑦𝑦 = 𝑥) → 𝑥 = 𝑦)
4948a1i 11 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵𝑦𝐵) → ((𝑥 < 𝑦𝑦 = 𝑥) → 𝑥 = 𝑦))
50 simpl 485 . . . . . . 7 ((𝑥 = 𝑦𝑦 = 𝑥) → 𝑥 = 𝑦)
5150a1i 11 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵𝑦𝐵) → ((𝑥 = 𝑦𝑦 = 𝑥) → 𝑥 = 𝑦))
5244, 46, 49, 51ccased 1033 . . . . 5 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵𝑦𝐵) → (((𝑥 < 𝑦𝑥 = 𝑦) ∧ (𝑦 < 𝑥𝑦 = 𝑥)) → 𝑥 = 𝑦))
5336, 39, 52syl2and 609 . . . 4 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ 𝑥𝐵𝑦𝐵) → ((𝑥 𝑦𝑦 𝑥) → 𝑥 = 𝑦))
54 simpr1 1190 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → 𝑥𝐵)
55 simpr2 1191 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → 𝑦𝐵)
5654, 55, 35syl2anc 586 . . . . 5 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → (𝑥 𝑦 → (𝑥 < 𝑦𝑥 = 𝑦)))
57 simpr3 1192 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → 𝑧𝐵)
583, 13, 1pleval2i 17573 . . . . . 6 ((𝑦𝐵𝑧𝐵) → (𝑦 𝑧 → (𝑦 < 𝑧𝑦 = 𝑧)))
5955, 57, 58syl2anc 586 . . . . 5 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → (𝑦 𝑧 → (𝑦 < 𝑧𝑦 = 𝑧)))
60 potr 5485 . . . . . . . 8 (( < Po 𝐵 ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → ((𝑥 < 𝑦𝑦 < 𝑧) → 𝑥 < 𝑧))
6140, 60sylan 582 . . . . . . 7 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → ((𝑥 < 𝑦𝑦 < 𝑧) → 𝑥 < 𝑧))
62 simpll 765 . . . . . . . 8 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → 𝐾𝑉)
6313, 1pltle 17570 . . . . . . . 8 ((𝐾𝑉𝑥𝐵𝑧𝐵) → (𝑥 < 𝑧𝑥 𝑧))
6462, 54, 57, 63syl3anc 1367 . . . . . . 7 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → (𝑥 < 𝑧𝑥 𝑧))
6561, 64syld 47 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → ((𝑥 < 𝑦𝑦 < 𝑧) → 𝑥 𝑧))
66 breq1 5068 . . . . . . . 8 (𝑥 = 𝑦 → (𝑥 < 𝑧𝑦 < 𝑧))
6766biimpar 480 . . . . . . 7 ((𝑥 = 𝑦𝑦 < 𝑧) → 𝑥 < 𝑧)
6867, 64syl5 34 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → ((𝑥 = 𝑦𝑦 < 𝑧) → 𝑥 𝑧))
69 breq2 5069 . . . . . . . 8 (𝑦 = 𝑧 → (𝑥 < 𝑦𝑥 < 𝑧))
7069biimpac 481 . . . . . . 7 ((𝑥 < 𝑦𝑦 = 𝑧) → 𝑥 < 𝑧)
7170, 64syl5 34 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → ((𝑥 < 𝑦𝑦 = 𝑧) → 𝑥 𝑧))
7254, 34syldan 593 . . . . . . 7 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → 𝑥 𝑥)
73 eqtr 2841 . . . . . . . 8 ((𝑥 = 𝑦𝑦 = 𝑧) → 𝑥 = 𝑧)
7473breq2d 5077 . . . . . . 7 ((𝑥 = 𝑦𝑦 = 𝑧) → (𝑥 𝑥𝑥 𝑧))
7572, 74syl5ibcom 247 . . . . . 6 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → ((𝑥 = 𝑦𝑦 = 𝑧) → 𝑥 𝑧))
7665, 68, 71, 75ccased 1033 . . . . 5 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → (((𝑥 < 𝑦𝑥 = 𝑦) ∧ (𝑦 < 𝑧𝑦 = 𝑧)) → 𝑥 𝑧))
7756, 59, 76syl2and 609 . . . 4 (((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) ∧ (𝑥𝐵𝑦𝐵𝑧𝐵)) → ((𝑥 𝑦𝑦 𝑧) → 𝑥 𝑧))
7824, 25, 26, 34, 53, 77isposd 17564 . . 3 ((𝐾𝑉 ∧ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )) → 𝐾 ∈ Poset)
7978ex 415 . 2 (𝐾𝑉 → (( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ ) → 𝐾 ∈ Poset))
8022, 79impbid2 228 1 (𝐾𝑉 → (𝐾 ∈ Poset ↔ ( < Po 𝐵 ∧ ( I ↾ 𝐵) ⊆ )))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  wo 843  w3a 1083   = wceq 1533  wcel 2110  Vcvv 3494  wss 3935  cop 4572   class class class wbr 5065  {copab 5127   I cid 5458   Po wpo 5471  cres 5556  Rel wrel 5559  cfv 6354  Basecbs 16482  lecple 16571  Posetcpo 17549  ltcplt 17550
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-sep 5202  ax-nul 5209  ax-pow 5265  ax-pr 5329
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-rab 3147  df-v 3496  df-sbc 3772  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-nul 4291  df-if 4467  df-sn 4567  df-pr 4569  df-op 4573  df-uni 4838  df-br 5066  df-opab 5128  df-mpt 5146  df-id 5459  df-po 5473  df-xp 5560  df-rel 5561  df-cnv 5562  df-co 5563  df-dm 5564  df-res 5566  df-iota 6313  df-fun 6356  df-fv 6362  df-proset 17537  df-poset 17555  df-plt 17567
This theorem is referenced by:  tosso  17645
  Copyright terms: Public domain W3C validator