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 32410
Description: Remove dependency on ax-13 2250 from abbi 2740. (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 2620 . 2 ({𝑥𝜑} = {𝑥𝜓} ↔ ∀𝑦(𝑦 ∈ {𝑥𝜑} ↔ 𝑦 ∈ {𝑥𝜓}))
2 bj-nfsab1 32407 . . . 4 𝑥 𝑦 ∈ {𝑥𝜑}
3 bj-nfsab1 32407 . . . 4 𝑥 𝑦 ∈ {𝑥𝜓}
42, 3nfbi 1835 . . 3 𝑥(𝑦 ∈ {𝑥𝜑} ↔ 𝑦 ∈ {𝑥𝜓})
5 nfv 1845 . . 3 𝑦(𝜑𝜓)
6 df-clab 2613 . . . . 5 (𝑦 ∈ {𝑥𝜑} ↔ [𝑦 / 𝑥]𝜑)
7 sbequ12r 2114 . . . . 5 (𝑦 = 𝑥 → ([𝑦 / 𝑥]𝜑𝜑))
86, 7syl5bb 272 . . . 4 (𝑦 = 𝑥 → (𝑦 ∈ {𝑥𝜑} ↔ 𝜑))
9 df-clab 2613 . . . . 5 (𝑦 ∈ {𝑥𝜓} ↔ [𝑦 / 𝑥]𝜓)
10 sbequ12r 2114 . . . . 5 (𝑦 = 𝑥 → ([𝑦 / 𝑥]𝜓𝜓))
119, 10syl5bb 272 . . . 4 (𝑦 = 𝑥 → (𝑦 ∈ {𝑥𝜓} ↔ 𝜓))
128, 11bibi12d 335 . . 3 (𝑦 = 𝑥 → ((𝑦 ∈ {𝑥𝜑} ↔ 𝑦 ∈ {𝑥𝜓}) ↔ (𝜑𝜓)))
134, 5, 12cbvalv1 2179 . 2 (∀𝑦(𝑦 ∈ {𝑥𝜑} ↔ 𝑦 ∈ {𝑥𝜓}) ↔ ∀𝑥(𝜑𝜓))
141, 13bitr2i 265 1 (∀𝑥(𝜑𝜓) ↔ {𝑥𝜑} = {𝑥𝜓})
Colors of variables: wff setvar class
Syntax hints:  wb 196  wal 1478   = wceq 1480  [wsb 1882  wcel 1992  {cab 2612
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1841  ax-6 1890  ax-7 1937  ax-9 2001  ax-10 2021  ax-11 2036  ax-12 2049  ax-ext 2606
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1883  df-clab 2613  df-cleq 2619
This theorem is referenced by:  bj-abbii  32412  bj-abbid  32413
  Copyright terms: Public domain W3C validator