Users' Mathboxes Mathbox for Peter Mazsa < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  raldmqseu Structured version   Visualization version   GIF version

Theorem raldmqseu 38686
Description: Equivalence between "exactly one" on the quotient carrier and "at most one" globally. Provides a type-safe way to talk about unique representatives either as ∃! on the intended carrier or as a global ∃* statement. (Contributed by Peter Mazsa, 6-Feb-2026.)
Assertion
Ref Expression
raldmqseu (𝑅𝑉 → (∀𝑢 ∈ (dom 𝑅 / 𝑅)∃!𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ↔ ∀𝑢∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅))
Distinct variable groups:   𝑡,𝑅,𝑢   𝑡,𝑉,𝑢

Proof of Theorem raldmqseu
StepHypRef Expression
1 raldmqsmo 38684 . . 3 (∀𝑢 ∈ (dom 𝑅 / 𝑅)∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ↔ ∀𝑢 ∈ (dom 𝑅 / 𝑅)∃!𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅)
2 ralrmo3 38685 . . 3 (∀𝑢 ∈ (dom 𝑅 / 𝑅)∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ↔ ∀𝑢∃*𝑡 ∈ dom 𝑅(𝑢 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅))
31, 2bitr3i 277 . 2 (∀𝑢 ∈ (dom 𝑅 / 𝑅)∃!𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ↔ ∀𝑢∃*𝑡 ∈ dom 𝑅(𝑢 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅))
4 eqelb 38562 . . . . . . 7 ((𝑢 = [𝑡]𝑅𝑢 ∈ (dom 𝑅 / 𝑅)) ↔ (𝑢 = [𝑡]𝑅 ∧ [𝑡]𝑅 ∈ (dom 𝑅 / 𝑅)))
5 ancom 460 . . . . . . 7 ((𝑢 = [𝑡]𝑅𝑢 ∈ (dom 𝑅 / 𝑅)) ↔ (𝑢 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅))
6 ancom 460 . . . . . . 7 ((𝑢 = [𝑡]𝑅 ∧ [𝑡]𝑅 ∈ (dom 𝑅 / 𝑅)) ↔ ([𝑡]𝑅 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅))
74, 5, 63bitr3i 301 . . . . . 6 ((𝑢 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅) ↔ ([𝑡]𝑅 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅))
8 eceldmqs 8734 . . . . . . 7 (𝑅𝑉 → ([𝑡]𝑅 ∈ (dom 𝑅 / 𝑅) ↔ 𝑡 ∈ dom 𝑅))
98anbi1d 632 . . . . . 6 (𝑅𝑉 → (([𝑡]𝑅 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅) ↔ (𝑡 ∈ dom 𝑅𝑢 = [𝑡]𝑅)))
107, 9bitrid 283 . . . . 5 (𝑅𝑉 → ((𝑢 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅) ↔ (𝑡 ∈ dom 𝑅𝑢 = [𝑡]𝑅)))
1110rmobidv 3357 . . . 4 (𝑅𝑉 → (∃*𝑡 ∈ dom 𝑅(𝑢 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅) ↔ ∃*𝑡 ∈ dom 𝑅(𝑡 ∈ dom 𝑅𝑢 = [𝑡]𝑅)))
12 rmoanid 3352 . . . 4 (∃*𝑡 ∈ dom 𝑅(𝑡 ∈ dom 𝑅𝑢 = [𝑡]𝑅) ↔ ∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅)
1311, 12bitrdi 287 . . 3 (𝑅𝑉 → (∃*𝑡 ∈ dom 𝑅(𝑢 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅) ↔ ∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅))
1413albidv 1922 . 2 (𝑅𝑉 → (∀𝑢∃*𝑡 ∈ dom 𝑅(𝑢 ∈ (dom 𝑅 / 𝑅) ∧ 𝑢 = [𝑡]𝑅) ↔ ∀𝑢∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅))
153, 14bitrid 283 1 (𝑅𝑉 → (∀𝑢 ∈ (dom 𝑅 / 𝑅)∃!𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ↔ ∀𝑢∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  wal 1540   = wceq 1542  wcel 2114  wral 3051  ∃!wreu 3340  ∃*wrmo 3341  dom cdm 5631  [cec 8641   / cqs 8642
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-12 2185  ax-ext 2708  ax-sep 5231  ax-pr 5375  ax-un 7689
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-ne 2933  df-ral 3052  df-rex 3062  df-rmo 3342  df-reu 3343  df-rab 3390  df-v 3431  df-dif 3892  df-un 3894  df-in 3896  df-ss 3906  df-nul 4274  df-if 4467  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4851  df-br 5086  df-opab 5148  df-xp 5637  df-rel 5638  df-cnv 5639  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-ec 8645  df-qs 8649
This theorem is referenced by:  disjqmap  39148
  Copyright terms: Public domain W3C validator