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

Theorem istos 18443
Description: The predicate "is a toset". (Contributed by FL, 17-Nov-2014.)
Hypotheses
Ref Expression
istos.b 𝐵 = (Base‘𝐾)
istos.l = (le‘𝐾)
Assertion
Ref Expression
istos (𝐾 ∈ Toset ↔ (𝐾 ∈ Poset ∧ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))
Distinct variable groups:   𝑥,𝑦,𝐵   𝑥, ,𝑦
Allowed substitution hints:   𝐾(𝑥,𝑦)

Proof of Theorem istos
Dummy variables 𝑓 𝑏 𝑟 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveq2 6901 . . . 4 (𝑓 = 𝐾 → (Base‘𝑓) = (Base‘𝐾))
2 fveq2 6901 . . . . 5 (𝑓 = 𝐾 → (le‘𝑓) = (le‘𝐾))
32sbceq1d 3781 . . . 4 (𝑓 = 𝐾 → ([(le‘𝑓) / 𝑟]𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ [(le‘𝐾) / 𝑟]𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥)))
41, 3sbceqbid 3783 . . 3 (𝑓 = 𝐾 → ([(Base‘𝑓) / 𝑏][(le‘𝑓) / 𝑟]𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ [(Base‘𝐾) / 𝑏][(le‘𝐾) / 𝑟]𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥)))
5 fvex 6914 . . . 4 (Base‘𝐾) ∈ V
6 fvex 6914 . . . 4 (le‘𝐾) ∈ V
7 istos.b . . . . . 6 𝐵 = (Base‘𝐾)
8 eqtr 2749 . . . . . . . . 9 ((𝑏 = (Base‘𝐾) ∧ (Base‘𝐾) = 𝐵) → 𝑏 = 𝐵)
9 istos.l . . . . . . . . . 10 = (le‘𝐾)
10 eqtr 2749 . . . . . . . . . . . . 13 ((𝑟 = (le‘𝐾) ∧ (le‘𝐾) = ) → 𝑟 = )
11 breq 5155 . . . . . . . . . . . . . . . . 17 (𝑟 = → (𝑥𝑟𝑦𝑥 𝑦))
12 breq 5155 . . . . . . . . . . . . . . . . 17 (𝑟 = → (𝑦𝑟𝑥𝑦 𝑥))
1311, 12orbi12d 916 . . . . . . . . . . . . . . . 16 (𝑟 = → ((𝑥𝑟𝑦𝑦𝑟𝑥) ↔ (𝑥 𝑦𝑦 𝑥)))
14132ralbidv 3209 . . . . . . . . . . . . . . 15 (𝑟 = → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝑏𝑦𝑏 (𝑥 𝑦𝑦 𝑥)))
15 raleq 3312 . . . . . . . . . . . . . . . 16 (𝑏 = 𝐵 → (∀𝑦𝑏 (𝑥 𝑦𝑦 𝑥) ↔ ∀𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))
1615raleqbi1dv 3323 . . . . . . . . . . . . . . 15 (𝑏 = 𝐵 → (∀𝑥𝑏𝑦𝑏 (𝑥 𝑦𝑦 𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))
1714, 16sylan9bb 508 . . . . . . . . . . . . . 14 ((𝑟 = 𝑏 = 𝐵) → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))
1817ex 411 . . . . . . . . . . . . 13 (𝑟 = → (𝑏 = 𝐵 → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥))))
1910, 18syl 17 . . . . . . . . . . . 12 ((𝑟 = (le‘𝐾) ∧ (le‘𝐾) = ) → (𝑏 = 𝐵 → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥))))
2019expcom 412 . . . . . . . . . . 11 ((le‘𝐾) = → (𝑟 = (le‘𝐾) → (𝑏 = 𝐵 → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))))
2120eqcoms 2734 . . . . . . . . . 10 ( = (le‘𝐾) → (𝑟 = (le‘𝐾) → (𝑏 = 𝐵 → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))))
229, 21ax-mp 5 . . . . . . . . 9 (𝑟 = (le‘𝐾) → (𝑏 = 𝐵 → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥))))
238, 22syl5com 31 . . . . . . . 8 ((𝑏 = (Base‘𝐾) ∧ (Base‘𝐾) = 𝐵) → (𝑟 = (le‘𝐾) → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥))))
2423expcom 412 . . . . . . 7 ((Base‘𝐾) = 𝐵 → (𝑏 = (Base‘𝐾) → (𝑟 = (le‘𝐾) → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))))
2524eqcoms 2734 . . . . . 6 (𝐵 = (Base‘𝐾) → (𝑏 = (Base‘𝐾) → (𝑟 = (le‘𝐾) → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))))
267, 25ax-mp 5 . . . . 5 (𝑏 = (Base‘𝐾) → (𝑟 = (le‘𝐾) → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥))))
2726imp 405 . . . 4 ((𝑏 = (Base‘𝐾) ∧ 𝑟 = (le‘𝐾)) → (∀𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))
285, 6, 27sbc2ie 3859 . . 3 ([(Base‘𝐾) / 𝑏][(le‘𝐾) / 𝑟]𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥))
294, 28bitrdi 286 . 2 (𝑓 = 𝐾 → ([(Base‘𝑓) / 𝑏][(le‘𝑓) / 𝑟]𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥) ↔ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))
30 df-toset 18442 . 2 Toset = {𝑓 ∈ Poset ∣ [(Base‘𝑓) / 𝑏][(le‘𝑓) / 𝑟]𝑥𝑏𝑦𝑏 (𝑥𝑟𝑦𝑦𝑟𝑥)}
3129, 30elrab2 3684 1 (𝐾 ∈ Toset ↔ (𝐾 ∈ Poset ∧ ∀𝑥𝐵𝑦𝐵 (𝑥 𝑦𝑦 𝑥)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 394  wo 845   = wceq 1534  wcel 2099  wral 3051  [wsbc 3776   class class class wbr 5153  cfv 6554  Basecbs 17213  lecple 17273  Posetcpo 18332  Tosetctos 18441
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-ext 2697  ax-nul 5311
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3an 1086  df-tru 1537  df-fal 1547  df-ex 1775  df-sb 2061  df-clab 2704  df-cleq 2718  df-clel 2803  df-ne 2931  df-ral 3052  df-rex 3061  df-rab 3420  df-v 3464  df-sbc 3777  df-dif 3950  df-un 3952  df-ss 3964  df-nul 4326  df-if 4534  df-sn 4634  df-pr 4636  df-op 4640  df-uni 4914  df-br 5154  df-iota 6506  df-fv 6562  df-toset 18442
This theorem is referenced by:  tosso  18444  tospos  18445  tleile  18446  zntoslem  21554  resstos  32837  odutos  32838  xrstos  32890  xrge0omnd  32946
  Copyright terms: Public domain W3C validator