Users' Mathboxes Mathbox for Zhi Wang < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  joindm3 Structured version   Visualization version   GIF version

Theorem joindm3 49788
Description: The join of any two elements always exists iff all unordered pairs have LUB (expanded version). (Contributed by Zhi Wang, 25-Sep-2024.)
Hypotheses
Ref Expression
joindm2.b 𝐵 = (Base‘𝐾)
joindm2.k (𝜑𝐾𝑉)
joindm2.u 𝑈 = (lub‘𝐾)
joindm2.j = (join‘𝐾)
joindm3.l = (le‘𝐾)
Assertion
Ref Expression
joindm3 (𝜑 → (dom = (𝐵 × 𝐵) ↔ ∀𝑥𝐵𝑦𝐵 ∃!𝑧𝐵 ((𝑥 𝑧𝑦 𝑧) ∧ ∀𝑤𝐵 ((𝑥 𝑤𝑦 𝑤) → 𝑧 𝑤))))
Distinct variable groups:   𝑥,𝑤,𝑦,𝑧,   𝑤,𝐵,𝑥,𝑦,𝑧   𝑤,𝐾,𝑧   𝜑,𝑥,𝑦
Allowed substitution hints:   𝜑(𝑧, 𝑤)   𝑈(𝑥, 𝑦, 𝑧, 𝑤)   𝐾(𝑥, 𝑦)   (𝑥, 𝑦, 𝑧, 𝑤)   𝑉(𝑥, 𝑦, 𝑧, 𝑤)

Proof of Theorem joindm3
Dummy variable 𝑣 is distinct from all other variables.
StepHypRef Expression
1 joindm2.b . . 3 𝐵 = (Base‘𝐾)
2 joindm2.k . . 3 (𝜑𝐾𝑉)
3 joindm2.u . . 3 𝑈 = (lub‘𝐾)
4 joindm2.j . . 3 = (join‘𝐾)
51, 2, 3, 4joindm2 49787 . 2 (𝜑 → (dom = (𝐵 × 𝐵) ↔ ∀𝑥𝐵𝑦𝐵 {𝑥, 𝑦} ∈ dom 𝑈))
6 simprl 783 . . . . . 6 ((𝜑 ∧ (𝑥𝐵𝑦𝐵)) → 𝑥𝐵)
7 simprr 785 . . . . . 6 ((𝜑 ∧ (𝑥𝐵𝑦𝐵)) → 𝑦𝐵)
86, 7prssd 4793 . . . . 5 ((𝜑 ∧ (𝑥𝐵𝑦𝐵)) → {𝑥, 𝑦} ⊆ 𝐵)
9 joindm3.l . . . . . . 7 = (le‘𝐾)
10 biid 264 . . . . . . 7 ((∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑧 ∧ ∀𝑤𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑤𝑧 𝑤)) ↔ (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑧 ∧ ∀𝑤𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑤𝑧 𝑤)))
111, 9, 3, 10, 2lubeldm 18432 . . . . . 6 (𝜑 → ({𝑥, 𝑦} ∈ dom 𝑈 ↔ ({𝑥, 𝑦} ⊆ 𝐵 ∧ ∃!𝑧𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑧 ∧ ∀𝑤𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑤𝑧 𝑤)))))
1211baibd 549 . . . . 5 ((𝜑 ∧ {𝑥, 𝑦} ⊆ 𝐵) → ({𝑥, 𝑦} ∈ dom 𝑈 ↔ ∃!𝑧𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑧 ∧ ∀𝑤𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑤𝑧 𝑤))))
138, 12syldan 603 . . . 4 ((𝜑 ∧ (𝑥𝐵𝑦𝐵)) → ({𝑥, 𝑦} ∈ dom 𝑈 ↔ ∃!𝑧𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑧 ∧ ∀𝑤𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑤𝑧 𝑤))))
142adantr 486 . . . . . . 7 ((𝜑 ∧ (𝑥𝐵𝑦𝐵)) → 𝐾𝑉)
151, 9, 4, 14, 6, 7joinval2lem 18459 . . . . . 6 ((𝑥𝐵𝑦𝐵) → ((∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑧 ∧ ∀𝑤𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑤𝑧 𝑤)) ↔ ((𝑥 𝑧𝑦 𝑧) ∧ ∀𝑤𝐵 ((𝑥 𝑤𝑦 𝑤) → 𝑧 𝑤))))
1615reubidv 3388 . . . . 5 ((𝑥𝐵𝑦𝐵) → (∃!𝑧𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑧 ∧ ∀𝑤𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑤𝑧 𝑤)) ↔ ∃!𝑧𝐵 ((𝑥 𝑧𝑦 𝑧) ∧ ∀𝑤𝐵 ((𝑥 𝑤𝑦 𝑤) → 𝑧 𝑤))))
1716adantl 487 . . . 4 ((𝜑 ∧ (𝑥𝐵𝑦𝐵)) → (∃!𝑧𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑧 ∧ ∀𝑤𝐵 (∀𝑣 ∈ {𝑥, 𝑦}𝑣 𝑤𝑧 𝑤)) ↔ ∃!𝑧𝐵 ((𝑥 𝑧𝑦 𝑧) ∧ ∀𝑤𝐵 ((𝑥 𝑤𝑦 𝑤) → 𝑧 𝑤))))
1813, 17bitrd 282 . . 3 ((𝜑 ∧ (𝑥𝐵𝑦𝐵)) → ({𝑥, 𝑦} ∈ dom 𝑈 ↔ ∃!𝑧𝐵 ((𝑥 𝑧𝑦 𝑧) ∧ ∀𝑤𝐵 ((𝑥 𝑤𝑦 𝑤) → 𝑧 𝑤))))
19182ralbidva 3230 . 2 (𝜑 → (∀𝑥𝐵𝑦𝐵 {𝑥, 𝑦} ∈ dom 𝑈 ↔ ∀𝑥𝐵𝑦𝐵 ∃!𝑧𝐵 ((𝑥 𝑧𝑦 𝑧) ∧ ∀𝑤𝐵 ((𝑥 𝑤𝑦 𝑤) → 𝑧 𝑤))))
205, 19bitrd 282 1 (𝜑 → (dom = (𝐵 × 𝐵) ↔ ∀𝑥𝐵𝑦𝐵 ∃!𝑧𝐵 ((𝑥 𝑧𝑦 𝑧) ∧ ∀𝑤𝐵 ((𝑥 𝑤𝑦 𝑤) → 𝑧 𝑤))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401   = wceq 1570  wcel 2146  wral 3082  ∃!wreu 3370  wss 3908  {cpr 4596   class class class wbr 5114   × cxp 5664  dom cdm 5666  cfv 6543  Basecbs 17294  lecple 17342  lubclub 18390  joincjn 18392
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-rep 5243  ax-sep 5262  ax-nul 5274  ax-pow 5341  ax-pr 5409  ax-un 7745
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-ral 3083  df-rex 3093  df-rmo 3372  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4878  df-iun 4963  df-br 5115  df-opab 5179  df-mpt 5198  df-id 5561  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-riota 7380  df-oprab 7427  df-lub 18425  df-join 18427
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator