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

Theorem preqsnd 4826
Description: Equivalence for a pair equal to a singleton, deduction form. (Contributed by Thierry Arnoux, 27-Dec-2016.) (Revised by AV, 13-Jun-2022.) (Revised by AV, 16-Aug-2024.)
Hypotheses
Ref Expression
preqsnd.1 (𝜑𝐴𝑉)
preqsnd.2 (𝜑𝐵𝑊)
Assertion
Ref Expression
preqsnd (𝜑 → ({𝐴, 𝐵} = {𝐶} ↔ (𝐴 = 𝐶𝐵 = 𝐶)))

Proof of Theorem preqsnd
StepHypRef Expression
1 preqsnd.1 . . . 4 (𝜑𝐴𝑉)
21adantl 487 . . 3 ((𝐶 ∈ V ∧ 𝜑) → 𝐴𝑉)
3 preqsnd.2 . . . 4 (𝜑𝐵𝑊)
43adantl 487 . . 3 ((𝐶 ∈ V ∧ 𝜑) → 𝐵𝑊)
5 simpl 488 . . 3 ((𝐶 ∈ V ∧ 𝜑) → 𝐶 ∈ V)
6 dfsn2 4604 . . . . 5 {𝐶} = {𝐶, 𝐶}
76eqeq2i 2778 . . . 4 ({𝐴, 𝐵} = {𝐶} ↔ {𝐴, 𝐵} = {𝐶, 𝐶})
8 preq12bg 4820 . . . . 5 (((𝐴𝑉𝐵𝑊) ∧ (𝐶 ∈ V ∧ 𝐶 ∈ V)) → ({𝐴, 𝐵} = {𝐶, 𝐶} ↔ ((𝐴 = 𝐶𝐵 = 𝐶) ∨ (𝐴 = 𝐶𝐵 = 𝐶))))
9 oridm 918 . . . . 5 (((𝐴 = 𝐶𝐵 = 𝐶) ∨ (𝐴 = 𝐶𝐵 = 𝐶)) ↔ (𝐴 = 𝐶𝐵 = 𝐶))
108, 9bitrdi 290 . . . 4 (((𝐴𝑉𝐵𝑊) ∧ (𝐶 ∈ V ∧ 𝐶 ∈ V)) → ({𝐴, 𝐵} = {𝐶, 𝐶} ↔ (𝐴 = 𝐶𝐵 = 𝐶)))
117, 10bitrid 286 . . 3 (((𝐴𝑉𝐵𝑊) ∧ (𝐶 ∈ V ∧ 𝐶 ∈ V)) → ({𝐴, 𝐵} = {𝐶} ↔ (𝐴 = 𝐶𝐵 = 𝐶)))
122, 4, 5, 5, 11syl22anc 852 . 2 ((𝐶 ∈ V ∧ 𝜑) → ({𝐴, 𝐵} = {𝐶} ↔ (𝐴 = 𝐶𝐵 = 𝐶)))
13 snprc 4685 . . . . . 6 𝐶 ∈ V ↔ {𝐶} = ∅)
1413birani 509 . . . . 5 ((¬ 𝐶 ∈ V ∧ 𝜑) → {𝐶} = ∅)
1514eqeq2d 2776 . . . 4 ((¬ 𝐶 ∈ V ∧ 𝜑) → ({𝐴, 𝐵} = {𝐶} ↔ {𝐴, 𝐵} = ∅))
16 prnzg 4746 . . . . . . 7 (𝐴𝑉 → {𝐴, 𝐵} ≠ ∅)
17 eqneqall 2971 . . . . . . 7 ({𝐴, 𝐵} = ∅ → ({𝐴, 𝐵} ≠ ∅ → (𝐴 = 𝐶𝐵 = 𝐶)))
1816, 17syl5com 32 . . . . . 6 (𝐴𝑉 → ({𝐴, 𝐵} = ∅ → (𝐴 = 𝐶𝐵 = 𝐶)))
191, 18syl 18 . . . . 5 (𝜑 → ({𝐴, 𝐵} = ∅ → (𝐴 = 𝐶𝐵 = 𝐶)))
2019adantl 487 . . . 4 ((¬ 𝐶 ∈ V ∧ 𝜑) → ({𝐴, 𝐵} = ∅ → (𝐴 = 𝐶𝐵 = 𝐶)))
2115, 20sylbid 243 . . 3 ((¬ 𝐶 ∈ V ∧ 𝜑) → ({𝐴, 𝐵} = {𝐶} → (𝐴 = 𝐶𝐵 = 𝐶)))
22 eleq1 2853 . . . . . . . . . 10 (𝐶 = 𝐴 → (𝐶 ∈ V ↔ 𝐴 ∈ V))
2322eqcoms 2773 . . . . . . . . 9 (𝐴 = 𝐶 → (𝐶 ∈ V ↔ 𝐴 ∈ V))
2423notbid 321 . . . . . . . 8 (𝐴 = 𝐶 → (¬ 𝐶 ∈ V ↔ ¬ 𝐴 ∈ V))
25 pm2.24 125 . . . . . . . . 9 (𝐴 ∈ V → (¬ 𝐴 ∈ V → (𝐵 = 𝐶 → {𝐴, 𝐵} = {𝐶})))
26 elex 3478 . . . . . . . . 9 (𝐴𝑉𝐴 ∈ V)
2725, 26syl11 34 . . . . . . . 8 𝐴 ∈ V → (𝐴𝑉 → (𝐵 = 𝐶 → {𝐴, 𝐵} = {𝐶})))
2824, 27biimtrdi 256 . . . . . . 7 (𝐴 = 𝐶 → (¬ 𝐶 ∈ V → (𝐴𝑉 → (𝐵 = 𝐶 → {𝐴, 𝐵} = {𝐶}))))
2928com13 89 . . . . . 6 (𝐴𝑉 → (¬ 𝐶 ∈ V → (𝐴 = 𝐶 → (𝐵 = 𝐶 → {𝐴, 𝐵} = {𝐶}))))
301, 29syl 18 . . . . 5 (𝜑 → (¬ 𝐶 ∈ V → (𝐴 = 𝐶 → (𝐵 = 𝐶 → {𝐴, 𝐵} = {𝐶}))))
3130impcom 413 . . . 4 ((¬ 𝐶 ∈ V ∧ 𝜑) → (𝐴 = 𝐶 → (𝐵 = 𝐶 → {𝐴, 𝐵} = {𝐶})))
3231impd 416 . . 3 ((¬ 𝐶 ∈ V ∧ 𝜑) → ((𝐴 = 𝐶𝐵 = 𝐶) → {𝐴, 𝐵} = {𝐶}))
3321, 32impbid 215 . 2 ((¬ 𝐶 ∈ V ∧ 𝜑) → ({𝐴, 𝐵} = {𝐶} ↔ (𝐴 = 𝐶𝐵 = 𝐶)))
3412, 33pm2.61ian 824 1 (𝜑 → ({𝐴, 𝐵} = {𝐶} ↔ (𝐴 = 𝐶𝐵 = 𝐶)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wb 209  wa 401  wo 861   = wceq 1570  wcel 2146  wne 2960  Vcvv 3457  c0 4286  {csn 4591  {cpr 4593
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-ext 2737
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-sb 2100  df-clab 2744  df-cleq 2757  df-clel 2840  df-ne 2961  df-v 3459  df-dif 3909  df-un 3911  df-nul 4287  df-sn 4592  df-pr 4594
This theorem is used by:  prnesn  4827  preqsn  4829  opeqsng  5488  1loopgrnb0  29881  disjdifprg  32949
  Copyright terms: Public domain W3C validator