NFE Home New Foundations Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  NFE Home  >  Th. List  >  spfinex GIF version

Theorem spfinex 4538
Description: Spfin is a set. (Contributed by SF, 20-Jan-2015.)
Assertion
Ref Expression
spfinex ⊢ Spfin ∈ V

Proof of Theorem spfinex
Dummy variables x a z t are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-spfin 4448 . . 3 ⊢ Spfin = ∩{a ∣ ( Ncfin V ∈ a ∧ ∀x ∈ a ∀z( Sfin (z, x) → z ∈ a))}
2 vex 2863 . . . . . . . . . . . 12 ⊢ a ∈ V
32elimak 4260 . . . . . . . . . . 11 ⊢ (a ∈ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c) ↔ ∃t ∈ 1c ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)))
4 el1c 4140 . . . . . . . . . . . . . . 15 ⊢ (t ∈ 1c ↔ ∃x t = {x})
54anbi1i 676 . . . . . . . . . . . . . 14 ⊢ ((t ∈ 1c ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))) ↔ (∃x t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))))
6 19.41v 1901 . . . . . . . . . . . . . 14 ⊢ (∃x(t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))) ↔ (∃x t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))))
75, 6bitr4i 243 . . . . . . . . . . . . 13 ⊢ ((t ∈ 1c ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))) ↔ ∃x(t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))))
87exbii 1582 . . . . . . . . . . . 12 ⊢ (∃t(t ∈ 1c ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))) ↔ ∃t∃x(t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))))
9 df-rex 2621 . . . . . . . . . . . 12 ⊢ (∃t ∈ 1c ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) ↔ ∃t(t ∈ 1c ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))))
10 excom 1741 . . . . . . . . . . . 12 ⊢ (∃x∃t(t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))) ↔ ∃t∃x(t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))))
118, 9, 103bitr4i 268 . . . . . . . . . . 11 ⊢ (∃t ∈ 1c ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) ↔ ∃x∃t(t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))))
12 snex 4112 . . . . . . . . . . . . . 14 ⊢ {x} ∈ V
13 opkeq1 4060 . . . . . . . . . . . . . . 15 ⊢ (t = {x} → ⟪t, a⟫ = ⟪{x}, a⟫)
1413eleq1d 2419 . . . . . . . . . . . . . 14 ⊢ (t = {x} → (⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) ↔ ⟪{x}, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))))
1512, 14ceqsexv 2895 . . . . . . . . . . . . 13 ⊢ (∃t(t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))) ↔ ⟪{x}, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)))
16 elin 3220 . . . . . . . . . . . . 13 ⊢ (⟪{x}, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) ↔ (⟪{x}, a⟫ ∈ Sk ∧ ⟪{x}, a⟫ ∈ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)))
17 vex 2863 . . . . . . . . . . . . . . 15 ⊢ x ∈ V
1817, 2elssetk 4271 . . . . . . . . . . . . . 14 ⊢ (⟪{x}, a⟫ ∈ Sk ↔ x ∈ a)
19 opkex 4114 . . . . . . . . . . . . . . . . 17 ⊢ ⟪{x}, a⟫ ∈ V
2019elimak 4260 . . . . . . . . . . . . . . . 16 ⊢ (⟪{x}, a⟫ ∈ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c) ↔ ∃t ∈ ℘1 ℘11c⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ))
21 df-rex 2621 . . . . . . . . . . . . . . . 16 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) ↔ ∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )))
22 elpw121c 4149 . . . . . . . . . . . . . . . . . . . 20 ⊢ (t ∈ ℘1℘11c ↔ ∃z t = {{{z}}})
2322anbi1i 676 . . . . . . . . . . . . . . . . . . 19 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )) ↔ (∃z t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )))
24 19.41v 1901 . . . . . . . . . . . . . . . . . . 19 ⊢ (∃z(t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )) ↔ (∃z t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )))
2523, 24bitr4i 243 . . . . . . . . . . . . . . . . . 18 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )) ↔ ∃z(t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )))
2625exbii 1582 . . . . . . . . . . . . . . . . 17 ⊢ (∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )) ↔ ∃t∃z(t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )))
27 excom 1741 . . . . . . . . . . . . . . . . 17 ⊢ (∃z∃t(t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )) ↔ ∃t∃z(t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )))
2826, 27bitr4i 243 . . . . . . . . . . . . . . . 16 ⊢ (∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )) ↔ ∃z∃t(t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )))
2920, 21, 283bitri 262 . . . . . . . . . . . . . . 15 ⊢ (⟪{x}, a⟫ ∈ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c) ↔ ∃z∃t(t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )))
30 snex 4112 . . . . . . . . . . . . . . . . . 18 ⊢ {{{z}}} ∈ V
31 opkeq1 4060 . . . . . . . . . . . . . . . . . . 19 ⊢ (t = {{{z}}} → ⟪t, ⟪{x}, a⟫⟫ = ⟪{{{z}}}, ⟪{x}, a⟫⟫)
3231eleq1d 2419 . . . . . . . . . . . . . . . . . 18 ⊢ (t = {{{z}}} → (⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) ↔ ⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )))
3330, 32ceqsexv 2895 . . . . . . . . . . . . . . . . 17 ⊢ (∃t(t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )) ↔ ⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ))
34 eldif 3222 . . . . . . . . . . . . . . . . 17 ⊢ (⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) ↔ (⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∧ ¬ ⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ Ins2k Sk ))
35 snex 4112 . . . . . . . . . . . . . . . . . . . 20 ⊢ {z} ∈ V
3635, 12, 2otkelins3k 4257 . . . . . . . . . . . . . . . . . . 19 ⊢ (⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ↔ ⟪{z}, {x}⟫ ∈ SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)))
37 vex 2863 . . . . . . . . . . . . . . . . . . . 20 ⊢ z ∈ V
3837, 17opksnelsik 4266 . . . . . . . . . . . . . . . . . . 19 ⊢ (⟪{z}, {x}⟫ ∈ SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ↔ ⟪z, x⟫ ∈ (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)))
3937, 17srelk 4525 . . . . . . . . . . . . . . . . . . 19 ⊢ (⟪z, x⟫ ∈ (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ↔ Sfin (z, x))
4036, 38, 393bitri 262 . . . . . . . . . . . . . . . . . 18 ⊢ (⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ↔ Sfin (z, x))
4135, 12, 2otkelins2k 4256 . . . . . . . . . . . . . . . . . . . 20 ⊢ (⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ Ins2k Sk ↔ ⟪{z}, a⟫ ∈ Sk )
4237, 2elssetk 4271 . . . . . . . . . . . . . . . . . . . 20 ⊢ (⟪{z}, a⟫ ∈ Sk ↔ z ∈ a)
4341, 42bitri 240 . . . . . . . . . . . . . . . . . . 19 ⊢ (⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ Ins2k Sk ↔ z ∈ a)
4443notbii 287 . . . . . . . . . . . . . . . . . 18 ⊢ (¬ ⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ Ins2k Sk ↔ ¬ z ∈ a)
4540, 44anbi12i 678 . . . . . . . . . . . . . . . . 17 ⊢ ((⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∧ ¬ ⟪{{{z}}}, ⟪{x}, a⟫⟫ ∈ Ins2k Sk ) ↔ ( Sfin (z, x) ∧ ¬ z ∈ a))
4633, 34, 453bitri 262 . . . . . . . . . . . . . . . 16 ⊢ (∃t(t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )) ↔ ( Sfin (z, x) ∧ ¬ z ∈ a))
4746exbii 1582 . . . . . . . . . . . . . . 15 ⊢ (∃z∃t(t = {{{z}}} ∧ ⟪t, ⟪{x}, a⟫⟫ ∈ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk )) ↔ ∃z( Sfin (z, x) ∧ ¬ z ∈ a))
48 exanali 1585 . . . . . . . . . . . . . . 15 ⊢ (∃z( Sfin (z, x) ∧ ¬ z ∈ a) ↔ ¬ ∀z( Sfin (z, x) → z ∈ a))
4929, 47, 483bitri 262 . . . . . . . . . . . . . 14 ⊢ (⟪{x}, a⟫ ∈ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c) ↔ ¬ ∀z( Sfin (z, x) → z ∈ a))
5018, 49anbi12i 678 . . . . . . . . . . . . 13 ⊢ ((⟪{x}, a⟫ ∈ Sk ∧ ⟪{x}, a⟫ ∈ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) ↔ (x ∈ a ∧ ¬ ∀z( Sfin (z, x) → z ∈ a)))
5115, 16, 503bitri 262 . . . . . . . . . . . 12 ⊢ (∃t(t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))) ↔ (x ∈ a ∧ ¬ ∀z( Sfin (z, x) → z ∈ a)))
5251exbii 1582 . . . . . . . . . . 11 ⊢ (∃x∃t(t = {x} ∧ ⟪t, a⟫ ∈ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c))) ↔ ∃x(x ∈ a ∧ ¬ ∀z( Sfin (z, x) → z ∈ a)))
533, 11, 523bitri 262 . . . . . . . . . 10 ⊢ (a ∈ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c) ↔ ∃x(x ∈ a ∧ ¬ ∀z( Sfin (z, x) → z ∈ a)))
54 df-rex 2621 . . . . . . . . . 10 ⊢ (∃x ∈ a ¬ ∀z( Sfin (z, x) → z ∈ a) ↔ ∃x(x ∈ a ∧ ¬ ∀z( Sfin (z, x) → z ∈ a)))
5553, 54bitr4i 243 . . . . . . . . 9 ⊢ (a ∈ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c) ↔ ∃x ∈ a ¬ ∀z( Sfin (z, x) → z ∈ a))
5655notbii 287 . . . . . . . 8 ⊢ (¬ a ∈ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c) ↔ ¬ ∃x ∈ a ¬ ∀z( Sfin (z, x) → z ∈ a))
572elcompl 3226 . . . . . . . 8 ⊢ (a ∈ ∼ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c) ↔ ¬ a ∈ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c))
58 dfral2 2627 . . . . . . . 8 ⊢ (∀x ∈ a ∀z( Sfin (z, x) → z ∈ a) ↔ ¬ ∃x ∈ a ¬ ∀z( Sfin (z, x) → z ∈ a))
5956, 57, 583bitr4i 268 . . . . . . 7 ⊢ (a ∈ ∼ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c) ↔ ∀x ∈ a ∀z( Sfin (z, x) → z ∈ a))
6059eqabi 2465 . . . . . 6 ⊢ ∼ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c) = {a ∣ ∀x ∈ a ∀z( Sfin (z, x) → z ∈ a)}
6160ineq2i 3455 . . . . 5 ⊢ ({a ∣ Ncfin V ∈ a} ∩ ∼ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c)) = ({a ∣ Ncfin V ∈ a} ∩ {a ∣ ∀x ∈ a ∀z( Sfin (z, x) → z ∈ a)})
62 inab 3523 . . . . 5 ⊢ ({a ∣ Ncfin V ∈ a} ∩ {a ∣ ∀x ∈ a ∀z( Sfin (z, x) → z ∈ a)}) = {a ∣ ( Ncfin V ∈ a ∧ ∀x ∈ a ∀z( Sfin (z, x) → z ∈ a))}
6361, 62eqtri 2373 . . . 4 ⊢ ({a ∣ Ncfin V ∈ a} ∩ ∼ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c)) = {a ∣ ( Ncfin V ∈ a ∧ ∀x ∈ a ∀z( Sfin (z, x) → z ∈ a))}
6463inteqi 3931 . . 3 ⊢ ∩({a ∣ Ncfin V ∈ a} ∩ ∼ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c)) = ∩{a ∣ ( Ncfin V ∈ a ∧ ∀x ∈ a ∀z( Sfin (z, x) → z ∈ a))}
651, 64eqtr4i 2376 . 2 ⊢ Spfin = ∩({a ∣ Ncfin V ∈ a} ∩ ∼ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c))
66 setswithex 4323 . . . 4 ⊢ {a ∣ Ncfin V ∈ a} ∈ V
67 ssetkex 4295 . . . . . . 7 ⊢ Sk ∈ V
68 srelkex 4526 . . . . . . . . . . 11 ⊢ (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∈ V
6968sikex 4298 . . . . . . . . . 10 ⊢ SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∈ V
7069ins3kex 4309 . . . . . . . . 9 ⊢ Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∈ V
7167ins2kex 4308 . . . . . . . . 9 ⊢ Ins2k Sk ∈ V
7270, 71difex 4108 . . . . . . . 8 ⊢ ( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) ∈ V
73 1cex 4143 . . . . . . . . . 10 ⊢ 1c ∈ V
7473pw1ex 4304 . . . . . . . . 9 ⊢ ℘11c ∈ V
7574pw1ex 4304 . . . . . . . 8 ⊢ ℘1℘11c ∈ V
7672, 75imakex 4301 . . . . . . 7 ⊢ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c) ∈ V
7767, 76inex 4106 . . . . . 6 ⊢ ( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) ∈ V
7877, 73imakex 4301 . . . . 5 ⊢ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c) ∈ V
7978complex 4105 . . . 4 ⊢ ∼ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c) ∈ V
8066, 79inex 4106 . . 3 ⊢ ({a ∣ Ncfin V ∈ a} ∩ ∼ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c)) ∈ V
8180intex 4321 . 2 ⊢ ∩({a ∣ Ncfin V ∈ a} ∩ ∼ (( Sk ∩ (( Ins3k SIk (( Nn ×k Nn ) ∩ (( Ins3k (( Ins3k SIk ((℘1c ×k V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c) ∩ Ins2k (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) “k ℘1℘1℘11c)) ∖ Ins2k Sk ) “k ℘1℘11c)) “k 1c)) ∈ V
8265, 81eqeltri 2423 1 ⊢ Spfin ∈ V
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 358  ∀wal 1540  ∃wex 1541   = wceq 1642   ∈ wcel 1710  {cab 2339  ∀wral 2615  ∃wrex 2616  Vcvv 2860   ∼ ccompl 3206   ∖ cdif 3207   ∩ cin 3209   ⊕ csymdif 3210  ℘cpw 3723  {csn 3738  ∩cint 3927  ⟪copk 4058  1cc1c 4135  ℘1cpw1 4136   ×k cxpk 4175   Ins2k cins2k 4177   Ins3k cins3k 4178   “k cimak 4180   SIk csik 4182   Sk cssetk 4184   Nn cnnc 4374   Ncfin cncfin 4435   Sfin wsfin 4439   Spfin cspfin 4440
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1546  ax-5 1557  ax-17 1616  ax-9 1654  ax-8 1675  ax-6 1729  ax-7 1734  ax-11 1746  ax-12 1925  ax-ext 2334  ax-nin 4079  ax-xp 4080  ax-cnv 4081  ax-1c 4082  ax-sset 4083  ax-si 4084  ax-ins2 4085  ax-ins3 4086  ax-typlower 4087  ax-sn 4088
This proof depends on definitions:  df-bi 177  df-or 359  df-an 360  df-3an 936  df-nan 1288  df-tru 1319  df-ex 1542  df-nf 1545  df-sb 1649  df-clab 2340  df-cleq 2346  df-clel 2349  df-nfc 2479  df-ne 2519  df-ral 2620  df-rex 2621  df-v 2862  df-sbc 3048  df-nin 3212  df-compl 3213  df-in 3214  df-un 3215  df-dif 3216  df-symdif 3217  df-ss 3260  df-nul 3552  df-if 3664  df-pw 3725  df-sn 3742  df-pr 3743  df-uni 3893  df-int 3928  df-opk 4059  df-1c 4137  df-pw1 4138  df-uni1 4139  df-xpk 4186  df-cnvk 4187  df-ins2k 4188  df-ins3k 4189  df-imak 4190  df-cok 4191  df-p6 4192  df-sik 4193  df-ssetk 4194  df-imagek 4195  df-addc 4379  df-nnc 4380  df-sfin 4447  df-spfin 4448
This theorem is used by:  spfininduct  4541  vfinspss  4552  vfinspclt  4553  vfinncsp  4555  vinf  4556
  Copyright terms: Public domain W3C validator