Metamath Proof Explorer


Theorem csbiota

Description: Class substitution within a description binder. (Contributed by Scott Fenton, 6-Oct-2017) (Revised by NM, 23-Aug-2018)

Ref Expression
Assertion csbiota ⊢ ⦋ A / x⦌ ι y | φ = ι y | [˙A / x]˙ φ

Proof

Step Hyp Ref Expression
1 csbeq1 ⊢ z = A → ⦋ z / x⦌ ι y | φ = ⦋ A / x⦌ ι y | φ
2 dfsbcq2 ⊢ z = A → z x φ ↔ [˙A / x]˙ φ
3 2 iotabidv ⊢ z = A → ι y | z x φ = ι y | [˙A / x]˙ φ
4 1 3 eqeq12d ⊢ z = A → ⦋ z / x⦌ ι y | φ = ι y | z x φ ↔ ⦋ A / x⦌ ι y | φ = ι y | [˙A / x]˙ φ
5 vex ⊢ z ∈ V
6 nfs1v ⊢ Ⅎ x z x φ
7 6 nfiotaw ⊢ Ⅎ _ x ι y | z x φ
8 sbequ12 ⊢ x = z → φ ↔ z x φ
9 8 iotabidv ⊢ x = z → ι y | φ = ι y | z x φ
10 5 7 9 csbief ⊢ ⦋ z / x⦌ ι y | φ = ι y | z x φ
11 4 10 vtoclg ⊢ A ∈ V → ⦋ A / x⦌ ι y | φ = ι y | [˙A / x]˙ φ
12 csbprc ⊢ ¬ A ∈ V → ⦋ A / x⦌ ι y | φ = ∅
13 sbcex ⊢ [˙A / x]˙ φ → A ∈ V
14 13 con3i ⊢ ¬ A ∈ V → ¬ [˙A / x]˙ φ
15 14 nexdv ⊢ ¬ A ∈ V → ¬ ∃ y [˙A / x]˙ φ
16 euex ⊢ ∃! y [˙A / x]˙ φ → ∃ y [˙A / x]˙ φ
17 16 con3i ⊢ ¬ ∃ y [˙A / x]˙ φ → ¬ ∃! y [˙A / x]˙ φ
18 iotanul ⊢ ¬ ∃! y [˙A / x]˙ φ → ι y | [˙A / x]˙ φ = ∅
19 15 17 18 3syl ⊢ ¬ A ∈ V → ι y | [˙A / x]˙ φ = ∅
20 12 19 eqtr4d ⊢ ¬ A ∈ V → ⦋ A / x⦌ ι y | φ = ι y | [˙A / x]˙ φ
21 11 20 pm2.61i ⊢ ⦋ A / x⦌ ι y | φ = ι y | [˙A / x]˙ φ