Theorem raldmqsmo 38867

Description: On the quotient carrier, "at most one" and "exactly one" coincide for coset witnesses. (Contributed by Peter Mazsa, 6-Feb-2026.)

Assertion

Ref	Expression
raldmqsmo	⊢ (∀𝑢 ∈ (dom 𝑅 / 𝑅)∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ↔ ∀𝑢 ∈ (dom 𝑅 / 𝑅)∃!𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅)

Distinct variable group:   𝑡,𝑅,𝑢

Proof of Theorem raldmqsmo

Step	Hyp	Ref	Expression
1		df-qs 8686	. . . . . 6 ⊢ (dom 𝑅 / 𝑅) = {𝑢 ∣ ∃𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅}
2	1	eqabri 2906	. . . . 5 ⊢ (𝑢 ∈ (dom 𝑅 / 𝑅) ↔ ∃𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅)
3	2	biimpi 218	. . . 4 ⊢ (𝑢 ∈ (dom 𝑅 / 𝑅) → ∃𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅)
4	3	biantrurd 540	. . 3 ⊢ (𝑢 ∈ (dom 𝑅 / 𝑅) → (∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ↔ (∃𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ∧ ∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅)))
5		reu5 3371	. . 3 ⊢ (∃!𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ↔ (∃𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ∧ ∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅))
6	4, 5	bitr4di 291	. 2 ⊢ (𝑢 ∈ (dom 𝑅 / 𝑅) → (∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ↔ ∃!𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅))
7	6	ralbiia 3108	1 ⊢ (∀𝑢 ∈ (dom 𝑅 / 𝑅)∃*𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅 ↔ ∀𝑢 ∈ (dom 𝑅 / 𝑅)∃!𝑡 ∈ dom 𝑅 𝑢 = [𝑡]𝑅)

Syntax hints:   ↔ wb 208   ∧ wa 399   = wceq 1562   ∈ wcel 2144  ∀wral 3078  ∃wrex 3088  ∃!wreu 3367  ∃*wrmo 3368  dom cdm 5649  [cec 8678   / cqs 8679

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1817  ax-4 1831  ax-5 1932  ax-6 1989  ax-7 2030  ax-8 2146  ax-9 2154  ax-12 2214  ax-ext 2736

This theorem depends on definitions:  df-bi 209  df-an 400  df-tru 1565  df-ex 1802  df-sb 2093  df-eu 2598  df-clab 2743  df-cleq 2756  df-clel 2839  df-ral 3079  df-rex 3089  df-rmo 3369  df-reu 3370  df-qs 8686

This theorem is referenced by:  raldmqseu  38869