| Step | Hyp | Ref
| Expression |
| 1 | | csbeq1 3882 |
. . . 4
⊢ (𝑧 = 𝐴 → ⦋𝑧 / 𝑥⦌(℩𝑦 ∈ 𝐵 𝜑) = ⦋𝐴 / 𝑥⦌(℩𝑦 ∈ 𝐵 𝜑)) |
| 2 | | dfsbcq2 3773 |
. . . . 5
⊢ (𝑧 = 𝐴 → ([𝑧 / 𝑥]𝜑 ↔ [𝐴 / 𝑥]𝜑)) |
| 3 | 2 | riotabidv 7369 |
. . . 4
⊢ (𝑧 = 𝐴 → (℩𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑) = (℩𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑)) |
| 4 | 1, 3 | eqeq12d 2752 |
. . 3
⊢ (𝑧 = 𝐴 → (⦋𝑧 / 𝑥⦌(℩𝑦 ∈ 𝐵 𝜑) = (℩𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑) ↔ ⦋𝐴 / 𝑥⦌(℩𝑦 ∈ 𝐵 𝜑) = (℩𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑))) |
| 5 | | vex 3468 |
. . . 4
⊢ 𝑧 ∈ V |
| 6 | | nfs1v 2157 |
. . . . 5
⊢
Ⅎ𝑥[𝑧 / 𝑥]𝜑 |
| 7 | | nfcv 2899 |
. . . . 5
⊢
Ⅎ𝑥𝐵 |
| 8 | 6, 7 | nfriota 7379 |
. . . 4
⊢
Ⅎ𝑥(℩𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑) |
| 9 | | sbequ12 2252 |
. . . . 5
⊢ (𝑥 = 𝑧 → (𝜑 ↔ [𝑧 / 𝑥]𝜑)) |
| 10 | 9 | riotabidv 7369 |
. . . 4
⊢ (𝑥 = 𝑧 → (℩𝑦 ∈ 𝐵 𝜑) = (℩𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑)) |
| 11 | 5, 8, 10 | csbief 3913 |
. . 3
⊢
⦋𝑧 /
𝑥⦌(℩𝑦 ∈ 𝐵 𝜑) = (℩𝑦 ∈ 𝐵 [𝑧 / 𝑥]𝜑) |
| 12 | 4, 11 | vtoclg 3538 |
. 2
⊢ (𝐴 ∈ V →
⦋𝐴 / 𝑥⦌(℩𝑦 ∈ 𝐵 𝜑) = (℩𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑)) |
| 13 | | csbprc 4389 |
. . 3
⊢ (¬
𝐴 ∈ V →
⦋𝐴 / 𝑥⦌(℩𝑦 ∈ 𝐵 𝜑) = ∅) |
| 14 | | df-riota 7367 |
. . . 4
⊢
(℩𝑦
∈ 𝐵 [𝐴 / 𝑥]𝜑) = (℩𝑦(𝑦 ∈ 𝐵 ∧ [𝐴 / 𝑥]𝜑)) |
| 15 | | euex 2577 |
. . . . . 6
⊢
(∃!𝑦(𝑦 ∈ 𝐵 ∧ [𝐴 / 𝑥]𝜑) → ∃𝑦(𝑦 ∈ 𝐵 ∧ [𝐴 / 𝑥]𝜑)) |
| 16 | | sbcex 3780 |
. . . . . . . 8
⊢
([𝐴 / 𝑥]𝜑 → 𝐴 ∈ V) |
| 17 | 16 | adantl 481 |
. . . . . . 7
⊢ ((𝑦 ∈ 𝐵 ∧ [𝐴 / 𝑥]𝜑) → 𝐴 ∈ V) |
| 18 | 17 | exlimiv 1930 |
. . . . . 6
⊢
(∃𝑦(𝑦 ∈ 𝐵 ∧ [𝐴 / 𝑥]𝜑) → 𝐴 ∈ V) |
| 19 | 15, 18 | syl 17 |
. . . . 5
⊢
(∃!𝑦(𝑦 ∈ 𝐵 ∧ [𝐴 / 𝑥]𝜑) → 𝐴 ∈ V) |
| 20 | | iotanul 6514 |
. . . . 5
⊢ (¬
∃!𝑦(𝑦 ∈ 𝐵 ∧ [𝐴 / 𝑥]𝜑) → (℩𝑦(𝑦 ∈ 𝐵 ∧ [𝐴 / 𝑥]𝜑)) = ∅) |
| 21 | 19, 20 | nsyl5 159 |
. . . 4
⊢ (¬
𝐴 ∈ V →
(℩𝑦(𝑦 ∈ 𝐵 ∧ [𝐴 / 𝑥]𝜑)) = ∅) |
| 22 | 14, 21 | eqtr2id 2784 |
. . 3
⊢ (¬
𝐴 ∈ V → ∅ =
(℩𝑦 ∈
𝐵 [𝐴 / 𝑥]𝜑)) |
| 23 | 13, 22 | eqtrd 2771 |
. 2
⊢ (¬
𝐴 ∈ V →
⦋𝐴 / 𝑥⦌(℩𝑦 ∈ 𝐵 𝜑) = (℩𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑)) |
| 24 | 12, 23 | pm2.61i 182 |
1
⊢
⦋𝐴 /
𝑥⦌(℩𝑦 ∈ 𝐵 𝜑) = (℩𝑦 ∈ 𝐵 [𝐴 / 𝑥]𝜑) |