Theorem csbcow 3060

Description: Composition law for chained substitutions into a class. Version of csbco 3059 with a disjoint variable condition, which requires fewer axioms. (Contributed by NM, 10-Nov-2005.) (Revised by Gino Giotto, 25-Aug-2024.)

Assertion

Ref	Expression
csbcow	⊢ ⦋𝐴 / 𝑦⦌⦋𝑦 / 𝑥⦌𝐵 = ⦋𝐴 / 𝑥⦌𝐵

Distinct variable groups:   𝑥,𝑦   𝑦,𝐵

Allowed substitution hints:   𝐴(𝑥,𝑦)   𝐵(𝑥)

Proof of Theorem csbcow

Dummy variables 𝑧 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-csb 3050	. . . . . 6 ⊢ ⦋𝑦 / 𝑥⦌𝐵 = {𝑧 ∣ [𝑦 / 𝑥]𝑧 ∈ 𝐵}
2	1	abeq2i 2281	. . . . 5 ⊢ (𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐵 ↔ [𝑦 / 𝑥]𝑧 ∈ 𝐵)
3	2	sbcbii 3014	. . . 4 ⊢ ([𝐴 / 𝑦]𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐵 ↔ [𝐴 / 𝑦][𝑦 / 𝑥]𝑧 ∈ 𝐵)
4		nfv 1521	. . . . . . . . . 10 ⊢ Ⅎ𝑦∀𝑥(𝑥 = 𝑤 → 𝑧 ∈ 𝐵)
5		equequ2 1706	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑤 → (𝑥 = 𝑦 ↔ 𝑥 = 𝑤))
6	5	imbi1d 230	. . . . . . . . . . 11 ⊢ (𝑦 = 𝑤 → ((𝑥 = 𝑦 → 𝑧 ∈ 𝐵) ↔ (𝑥 = 𝑤 → 𝑧 ∈ 𝐵)))
7	6	albidv 1817	. . . . . . . . . 10 ⊢ (𝑦 = 𝑤 → (∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵) ↔ ∀𝑥(𝑥 = 𝑤 → 𝑧 ∈ 𝐵)))
8	4, 7	sbiev 1785	. . . . . . . . 9 ⊢ ([𝑤 / 𝑦]∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵) ↔ ∀𝑥(𝑥 = 𝑤 → 𝑧 ∈ 𝐵))
9		sb6 1879	. . . . . . . . 9 ⊢ ([𝑤 / 𝑥]𝑧 ∈ 𝐵 ↔ ∀𝑥(𝑥 = 𝑤 → 𝑧 ∈ 𝐵))
10	8, 9	bitr4i 186	. . . . . . . 8 ⊢ ([𝑤 / 𝑦]∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵) ↔ [𝑤 / 𝑥]𝑧 ∈ 𝐵)
11		df-clab 2157	. . . . . . . 8 ⊢ (𝑤 ∈ {𝑦 ∣ ∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵)} ↔ [𝑤 / 𝑦]∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵))
12		df-clab 2157	. . . . . . . 8 ⊢ (𝑤 ∈ {𝑥 ∣ 𝑧 ∈ 𝐵} ↔ [𝑤 / 𝑥]𝑧 ∈ 𝐵)
13	10, 11, 12	3bitr4i 211	. . . . . . 7 ⊢ (𝑤 ∈ {𝑦 ∣ ∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵)} ↔ 𝑤 ∈ {𝑥 ∣ 𝑧 ∈ 𝐵})
14	13	eqriv 2167	. . . . . 6 ⊢ {𝑦 ∣ ∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵)} = {𝑥 ∣ 𝑧 ∈ 𝐵}
15	14	eleq2i 2237	. . . . 5 ⊢ (𝐴 ∈ {𝑦 ∣ ∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵)} ↔ 𝐴 ∈ {𝑥 ∣ 𝑧 ∈ 𝐵})
16		df-sbc 2956	. . . . . 6 ⊢ ([𝐴 / 𝑦][𝑦 / 𝑥]𝑧 ∈ 𝐵 ↔ 𝐴 ∈ {𝑦 ∣ [𝑦 / 𝑥]𝑧 ∈ 𝐵})
17		df-sbc 2956	. . . . . . . . 9 ⊢ ([𝑦 / 𝑥]𝑧 ∈ 𝐵 ↔ 𝑦 ∈ {𝑥 ∣ 𝑧 ∈ 𝐵})
18		df-clab 2157	. . . . . . . . . 10 ⊢ (𝑦 ∈ {𝑥 ∣ 𝑧 ∈ 𝐵} ↔ [𝑦 / 𝑥]𝑧 ∈ 𝐵)
19		sb6 1879	. . . . . . . . . 10 ⊢ ([𝑦 / 𝑥]𝑧 ∈ 𝐵 ↔ ∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵))
20	18, 19	bitri 183	. . . . . . . . 9 ⊢ (𝑦 ∈ {𝑥 ∣ 𝑧 ∈ 𝐵} ↔ ∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵))
21	17, 20	bitri 183	. . . . . . . 8 ⊢ ([𝑦 / 𝑥]𝑧 ∈ 𝐵 ↔ ∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵))
22	21	abbii 2286	. . . . . . 7 ⊢ {𝑦 ∣ [𝑦 / 𝑥]𝑧 ∈ 𝐵} = {𝑦 ∣ ∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵)}
23	22	eleq2i 2237	. . . . . 6 ⊢ (𝐴 ∈ {𝑦 ∣ [𝑦 / 𝑥]𝑧 ∈ 𝐵} ↔ 𝐴 ∈ {𝑦 ∣ ∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵)})
24	16, 23	bitri 183	. . . . 5 ⊢ ([𝐴 / 𝑦][𝑦 / 𝑥]𝑧 ∈ 𝐵 ↔ 𝐴 ∈ {𝑦 ∣ ∀𝑥(𝑥 = 𝑦 → 𝑧 ∈ 𝐵)})
25		df-sbc 2956	. . . . 5 ⊢ ([𝐴 / 𝑥]𝑧 ∈ 𝐵 ↔ 𝐴 ∈ {𝑥 ∣ 𝑧 ∈ 𝐵})
26	15, 24, 25	3bitr4i 211	. . . 4 ⊢ ([𝐴 / 𝑦][𝑦 / 𝑥]𝑧 ∈ 𝐵 ↔ [𝐴 / 𝑥]𝑧 ∈ 𝐵)
27	3, 26	bitri 183	. . 3 ⊢ ([𝐴 / 𝑦]𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐵 ↔ [𝐴 / 𝑥]𝑧 ∈ 𝐵)
28	27	abbii 2286	. 2 ⊢ {𝑧 ∣ [𝐴 / 𝑦]𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐵} = {𝑧 ∣ [𝐴 / 𝑥]𝑧 ∈ 𝐵}
29		df-csb 3050	. 2 ⊢ ⦋𝐴 / 𝑦⦌⦋𝑦 / 𝑥⦌𝐵 = {𝑧 ∣ [𝐴 / 𝑦]𝑧 ∈ ⦋𝑦 / 𝑥⦌𝐵}
30		df-csb 3050	. 2 ⊢ ⦋𝐴 / 𝑥⦌𝐵 = {𝑧 ∣ [𝐴 / 𝑥]𝑧 ∈ 𝐵}
31	28, 29, 30	3eqtr4i 2201	1 ⊢ ⦋𝐴 / 𝑦⦌⦋𝑦 / 𝑥⦌𝐵 = ⦋𝐴 / 𝑥⦌𝐵

Syntax hints:   → wi 4  ∀wal 1346   = wceq 1348  [wsb 1755   ∈ wcel 2141  {cab 2156  [wsbc 2955  ⦋csb 3049

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-5 1440  ax-7 1441  ax-gen 1442  ax-ie1 1486  ax-ie2 1487  ax-8 1497  ax-11 1499  ax-4 1503  ax-17 1519  ax-i9 1523  ax-ial 1527  ax-i5r 1528  ax-ext 2152

This theorem depends on definitions:  df-bi 116  df-tru 1351  df-nf 1454  df-sb 1756  df-clab 2157  df-cleq 2163  df-clel 2166  df-sbc 2956  df-csb 3050

This theorem is referenced by:  zproddc  11542  fprodseq  11546