Users' Mathboxes Mathbox for BJ < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  bj-abbi Structured version   Visualization version   GIF version

Theorem bj-abbi 33105
Description: Remove dependency on ax-13 2407 from abbi 2885. (Contributed by BJ, 23-Jun-2019.) (Proof modification is discouraged.)
Assertion
Ref Expression
bj-abbi (∀𝑥(𝜑𝜓) ↔ {𝑥𝜑} = {𝑥𝜓})

Proof of Theorem bj-abbi
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 dfcleq 2764 . 2 ({𝑥𝜑} = {𝑥𝜓} ↔ ∀𝑦(𝑦 ∈ {𝑥𝜑} ↔ 𝑦 ∈ {𝑥𝜓}))
2 bj-nfsab1 33102 . . . 4 𝑥 𝑦 ∈ {𝑥𝜑}
3 bj-nfsab1 33102 . . . 4 𝑥 𝑦 ∈ {𝑥𝜓}
42, 3nfbi 1984 . . 3 𝑥(𝑦 ∈ {𝑥𝜑} ↔ 𝑦 ∈ {𝑥𝜓})
5 nfv 1994 . . 3 𝑦(𝜑𝜓)
6 df-clab 2757 . . . . 5 (𝑦 ∈ {𝑥𝜑} ↔ [𝑦 / 𝑥]𝜑)
7 sbequ12r 2267 . . . . 5 (𝑦 = 𝑥 → ([𝑦 / 𝑥]𝜑𝜑))
86, 7syl5bb 272 . . . 4 (𝑦 = 𝑥 → (𝑦 ∈ {𝑥𝜑} ↔ 𝜑))
9 df-clab 2757 . . . . 5 (𝑦 ∈ {𝑥𝜓} ↔ [𝑦 / 𝑥]𝜓)
10 sbequ12r 2267 . . . . 5 (𝑦 = 𝑥 → ([𝑦 / 𝑥]𝜓𝜓))
119, 10syl5bb 272 . . . 4 (𝑦 = 𝑥 → (𝑦 ∈ {𝑥𝜓} ↔ 𝜓))
128, 11bibi12d 334 . . 3 (𝑦 = 𝑥 → ((𝑦 ∈ {𝑥𝜑} ↔ 𝑦 ∈ {𝑥𝜓}) ↔ (𝜑𝜓)))
134, 5, 12cbvalv1 2335 . 2 (∀𝑦(𝑦 ∈ {𝑥𝜑} ↔ 𝑦 ∈ {𝑥𝜓}) ↔ ∀𝑥(𝜑𝜓))
141, 13bitr2i 265 1 (∀𝑥(𝜑𝜓) ↔ {𝑥𝜑} = {𝑥𝜓})
Colors of variables: wff setvar class
Syntax hints:  wb 196  wal 1628   = wceq 1630  [wsb 2048  wcel 2144  {cab 2756
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1869  ax-4 1884  ax-5 1990  ax-6 2056  ax-7 2092  ax-9 2153  ax-10 2173  ax-11 2189  ax-12 2202  ax-ext 2750
This theorem depends on definitions:  df-bi 197  df-an 383  df-or 827  df-tru 1633  df-ex 1852  df-nf 1857  df-sb 2049  df-clab 2757  df-cleq 2763
This theorem is referenced by:  bj-abbii  33107  bj-abbid  33108
  Copyright terms: Public domain W3C validator