Theorem bj-sbeq 37045

Description: Distribute proper substitution through an equality relation. (See sbceqg 4362). (Contributed by BJ, 6-Oct-2018.)

Assertion

Ref	Expression
bj-sbeq	⊢ ([𝑦 / 𝑥]𝐴 = 𝐵 ↔ ⦋𝑦 / 𝑥⦌𝐴 = ⦋𝑦 / 𝑥⦌𝐵)

Proof of Theorem bj-sbeq

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		dfcleq 2727	. . . . 5 ⊢ (𝐴 = 𝐵 ↔ ∀𝑧(𝑧 ∈ 𝐴 ↔ 𝑧 ∈ 𝐵))
2	1	sbbii 2081	. . . 4 ⊢ ([𝑦 / 𝑥]𝐴 = 𝐵 ↔ [𝑦 / 𝑥]∀𝑧(𝑧 ∈ 𝐴 ↔ 𝑧 ∈ 𝐵))
3		sbsbc 3742	. . . 4 ⊢ ([𝑦 / 𝑥]∀𝑧(𝑧 ∈ 𝐴 ↔ 𝑧 ∈ 𝐵) ↔ [𝑦 / 𝑥]∀𝑧(𝑧 ∈ 𝐴 ↔ 𝑧 ∈ 𝐵))
4		sbcal 3798	. . . 4 ⊢ ([𝑦 / 𝑥]∀𝑧(𝑧 ∈ 𝐴 ↔ 𝑧 ∈ 𝐵) ↔ ∀𝑧[𝑦 / 𝑥](𝑧 ∈ 𝐴 ↔ 𝑧 ∈ 𝐵))
5	2, 3, 4	3bitri 297	. . 3 ⊢ ([𝑦 / 𝑥]𝐴 = 𝐵 ↔ ∀𝑧[𝑦 / 𝑥](𝑧 ∈ 𝐴 ↔ 𝑧 ∈ 𝐵))
6		sbcbig 3790	. . . . 5 ⊢ (𝑦 ∈ V → ([𝑦 / 𝑥](𝑧 ∈ 𝐴 ↔ 𝑧 ∈ 𝐵) ↔ ([𝑦 / 𝑥]𝑧 ∈ 𝐴 ↔ [𝑦 / 𝑥]𝑧 ∈ 𝐵)))
7	6	elv 3443	. . . 4 ⊢ ([𝑦 / 𝑥](𝑧 ∈ 𝐴 ↔ 𝑧 ∈ 𝐵) ↔ ([𝑦 / 𝑥]𝑧 ∈ 𝐴 ↔ [𝑦 / 𝑥]𝑧 ∈ 𝐵))
8	7	albii 1820	. . 3 ⊢ (∀𝑧[𝑦 / 𝑥](𝑧 ∈ 𝐴 ↔ 𝑧 ∈ 𝐵) ↔ ∀𝑧([𝑦 / 𝑥]𝑧 ∈ 𝐴 ↔ [𝑦 / 𝑥]𝑧 ∈ 𝐵))
9		sbcel2 4368	. . . . 5 ⊢ ([𝑦 / 𝑥]𝑧 ∈ 𝐴 ↔ 𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐴)
10		sbcel2 4368	. . . . 5 ⊢ ([𝑦 / 𝑥]𝑧 ∈ 𝐵 ↔ 𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐵)
11	9, 10	bibi12i 339	. . . 4 ⊢ (([𝑦 / 𝑥]𝑧 ∈ 𝐴 ↔ [𝑦 / 𝑥]𝑧 ∈ 𝐵) ↔ (𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐴 ↔ 𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐵))
12	11	albii 1820	. . 3 ⊢ (∀𝑧([𝑦 / 𝑥]𝑧 ∈ 𝐴 ↔ [𝑦 / 𝑥]𝑧 ∈ 𝐵) ↔ ∀𝑧(𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐴 ↔ 𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐵))
13	5, 8, 12	3bitri 297	. 2 ⊢ ([𝑦 / 𝑥]𝐴 = 𝐵 ↔ ∀𝑧(𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐴 ↔ 𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐵))
14		dfcleq 2727	. 2 ⊢ (⦋𝑦 / 𝑥⦌𝐴 = ⦋𝑦 / 𝑥⦌𝐵 ↔ ∀𝑧(𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐴 ↔ 𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐵))
15	13, 14	bitr4i 278	1 ⊢ ([𝑦 / 𝑥]𝐴 = 𝐵 ↔ ⦋𝑦 / 𝑥⦌𝐴 = ⦋𝑦 / 𝑥⦌𝐵)

Syntax hints:   ↔ wb 206  ∀wal 1539   = wceq 1541  [wsb 2067   ∈ wcel 2113  Vcvv 3438  [wsbc 3738  ⦋csb 3847

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2706

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-clab 2713  df-cleq 2726  df-clel 2809  df-nfc 2883  df-v 3440  df-sbc 3739  df-csb 3848  df-dif 3902  df-nul 4284

This theorem is referenced by: (None)