| Step | Hyp | Ref
| Expression |
| 1 | | df-prop 38554 |
. . 3
⊢ PROP =
setrecs((𝑦 ∈ V ↦
{𝑥 ∣ (∃𝑧 ∈ 𝑦 (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))})) |
| 2 | | 0ex 5261 |
. . . 4
⊢ ∅
∈ V |
| 3 | 2 | a1i 11 |
. . 3
⊢ (𝑛 ∈ ℕ → ∅
∈ V) |
| 4 | | 0ss 4350 |
. . . 4
⊢ ∅
⊆ PROP |
| 5 | 4 | a1i 11 |
. . 3
⊢ (𝑛 ∈ ℕ → ∅
⊆ PROP) |
| 6 | 1, 3, 5 | setrec1 9929 |
. 2
⊢ (𝑛 ∈ ℕ → ((𝑦 ∈ V ↦ {𝑥 ∣ (∃𝑧 ∈ 𝑦 (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))})‘∅) ⊆
PROP) |
| 7 | | rspe 3252 |
. . . . . . 7
⊢ ((𝑛 ∈ ℕ ∧ 𝑥 = (propvar ‘𝑛)) → ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛)) |
| 8 | 7 | olcd 888 |
. . . . . 6
⊢ ((𝑛 ∈ ℕ ∧ 𝑥 = (propvar ‘𝑛)) → (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))) |
| 9 | 8 | ex 418 |
. . . . 5
⊢ (𝑛 ∈ ℕ → (𝑥 = (propvar ‘𝑛) → (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛)))) |
| 10 | 9 | alrimiv 1960 |
. . . 4
⊢ (𝑛 ∈ ℕ →
∀𝑥(𝑥 = (propvar ‘𝑛) → (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛)))) |
| 11 | | fvex 6887 |
. . . . 5
⊢ (propvar
‘𝑛) ∈
V |
| 12 | | elab6g 3623 |
. . . . 5
⊢ ((propvar
‘𝑛) ∈ V →
((propvar ‘𝑛) ∈
{𝑥 ∣ (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))} ↔ ∀𝑥(𝑥 = (propvar ‘𝑛) → (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))))) |
| 13 | 11, 12 | ax-mp 5 |
. . . 4
⊢ ((propvar
‘𝑛) ∈ {𝑥 ∣ (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))} ↔ ∀𝑥(𝑥 = (propvar ‘𝑛) → (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛)))) |
| 14 | 10, 13 | sylibr 237 |
. . 3
⊢ (𝑛 ∈ ℕ → (propvar
‘𝑛) ∈ {𝑥 ∣ (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))}) |
| 15 | | rexeq 3315 |
. . . . . . . . 9
⊢ (𝑦 = ∅ → (∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧) ↔ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧))) |
| 16 | 15 | orbi2d 929 |
. . . . . . . 8
⊢ (𝑦 = ∅ → ((𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ↔ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)))) |
| 17 | 16 | rexeqbi1dv 3330 |
. . . . . . 7
⊢ (𝑦 = ∅ → (∃𝑧 ∈ 𝑦 (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ↔ ∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)))) |
| 18 | 17 | orbi1d 930 |
. . . . . 6
⊢ (𝑦 = ∅ → ((∃𝑧 ∈ 𝑦 (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛)) ↔ (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛)))) |
| 19 | 18 | abbidv 2826 |
. . . . 5
⊢ (𝑦 = ∅ → {𝑥 ∣ (∃𝑧 ∈ 𝑦 (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))} = {𝑥 ∣ (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))}) |
| 20 | | eqid 2760 |
. . . . 5
⊢ (𝑦 ∈ V ↦ {𝑥 ∣ (∃𝑧 ∈ 𝑦 (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))}) = (𝑦 ∈ V ↦ {𝑥 ∣ (∃𝑧 ∈ 𝑦 (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))}) |
| 21 | 2 | dfproplem 38555 |
. . . . 5
⊢ {𝑥 ∣ (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))} ∈ V |
| 22 | 19, 20, 21 | fvmpt 6982 |
. . . 4
⊢ (∅
∈ V → ((𝑦 ∈
V ↦ {𝑥 ∣
(∃𝑧 ∈ 𝑦 (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))})‘∅) = {𝑥 ∣ (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))}) |
| 23 | 2, 22 | ax-mp 5 |
. . 3
⊢ ((𝑦 ∈ V ↦ {𝑥 ∣ (∃𝑧 ∈ 𝑦 (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))})‘∅) = {𝑥 ∣ (∃𝑧 ∈ ∅ (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ ∅ 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))} |
| 24 | 14, 23 | eleqtrrdi 2871 |
. 2
⊢ (𝑛 ∈ ℕ → (propvar
‘𝑛) ∈ ((𝑦 ∈ V ↦ {𝑥 ∣ (∃𝑧 ∈ 𝑦 (𝑥 = (prop¬‘𝑧) ∨ ∃𝑤 ∈ 𝑦 𝑥 = (𝑤prop→𝑧)) ∨ ∃𝑛 ∈ ℕ 𝑥 = (propvar ‘𝑛))})‘∅)) |
| 25 | 6, 24 | sseldd 3932 |
1
⊢ (𝑛 ∈ ℕ → (propvar
‘𝑛) ∈
PROP) |