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

Theorem nnadjoinlem1 4520
Description: Lemma for nnadjoin 4521. Establish stratification. (Contributed by SF, 29-Jan-2015.)
Assertion
Ref Expression
nnadjoinlem1 ⊢ {n ∣ ∀l ∈ n (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n)} ∈ V
Distinct variable group:   n,l,y,x,b

Proof of Theorem nnadjoinlem1
Dummy variables t z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 snex 4112 . . . . . . . . 9 ⊢ {l} ∈ V
2 opkeq1 4060 . . . . . . . . . 10 ⊢ (t = {l} → ⟪t, n⟫ = ⟪{l}, n⟫)
32eleq1d 2419 . . . . . . . . 9 ⊢ (t = {l} → (⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) ↔ ⟪{l}, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))))
41, 3ceqsexv 2895 . . . . . . . 8 ⊢ (∃t(t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))) ↔ ⟪{l}, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))))
5 elin 3220 . . . . . . . 8 ⊢ (⟪{l}, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) ↔ (⟪{l}, n⟫ ∈ Sk ∧ ⟪{l}, n⟫ ∈ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))))
6 vex 2863 . . . . . . . . . 10 ⊢ l ∈ V
7 vex 2863 . . . . . . . . . 10 ⊢ n ∈ V
86, 7elssetk 4271 . . . . . . . . 9 ⊢ (⟪{l}, n⟫ ∈ Sk ↔ l ∈ n)
9 eldif 3222 . . . . . . . . . 10 ⊢ (⟪{l}, n⟫ ∈ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) ↔ (⟪{l}, n⟫ ∈ ( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∧ ¬ ⟪{l}, n⟫ ∈ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))
101elcompl 3226 . . . . . . . . . . . . 13 ⊢ ({l} ∈ ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ↔ ¬ {l} ∈ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c))
116elimak 4260 . . . . . . . . . . . . . . 15 ⊢ (l ∈ (((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ↔ ∃t ∈ 1c ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ))
12 el1c 4140 . . . . . . . . . . . . . . . . . . 19 ⊢ (t ∈ 1c ↔ ∃x t = {x})
1312anbi1i 676 . . . . . . . . . . . . . . . . . 18 ⊢ ((t ∈ 1c ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )) ↔ (∃x t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )))
14 19.41v 1901 . . . . . . . . . . . . . . . . . 18 ⊢ (∃x(t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )) ↔ (∃x t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )))
1513, 14bitr4i 243 . . . . . . . . . . . . . . . . 17 ⊢ ((t ∈ 1c ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )) ↔ ∃x(t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )))
1615exbii 1582 . . . . . . . . . . . . . . . 16 ⊢ (∃t(t ∈ 1c ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )) ↔ ∃t∃x(t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )))
17 df-rex 2621 . . . . . . . . . . . . . . . 16 ⊢ (∃t ∈ 1c ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) ↔ ∃t(t ∈ 1c ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )))
18 excom 1741 . . . . . . . . . . . . . . . 16 ⊢ (∃x∃t(t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )) ↔ ∃t∃x(t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )))
1916, 17, 183bitr4i 268 . . . . . . . . . . . . . . 15 ⊢ (∃t ∈ 1c ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) ↔ ∃x∃t(t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )))
20 snex 4112 . . . . . . . . . . . . . . . . . 18 ⊢ {x} ∈ V
21 opkeq1 4060 . . . . . . . . . . . . . . . . . . 19 ⊢ (t = {x} → ⟪t, l⟫ = ⟪{x}, l⟫)
2221eleq1d 2419 . . . . . . . . . . . . . . . . . 18 ⊢ (t = {x} → (⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) ↔ ⟪{x}, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )))
2320, 22ceqsexv 2895 . . . . . . . . . . . . . . . . 17 ⊢ (∃t(t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )) ↔ ⟪{x}, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ))
24 elin 3220 . . . . . . . . . . . . . . . . 17 ⊢ (⟪{x}, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) ↔ (⟪{x}, l⟫ ∈ (℘1{z ∣ y ∈ z} ×k V) ∧ ⟪{x}, l⟫ ∈ Sk ))
2520, 6opkelxpk 4249 . . . . . . . . . . . . . . . . . . . 20 ⊢ (⟪{x}, l⟫ ∈ (℘1{z ∣ y ∈ z} ×k V) ↔ ({x} ∈ ℘1{z ∣ y ∈ z} ∧ l ∈ V))
266, 25mpbiran2 885 . . . . . . . . . . . . . . . . . . 19 ⊢ (⟪{x}, l⟫ ∈ (℘1{z ∣ y ∈ z} ×k V) ↔ {x} ∈ ℘1{z ∣ y ∈ z})
27 snelpw1 4147 . . . . . . . . . . . . . . . . . . 19 ⊢ ({x} ∈ ℘1{z ∣ y ∈ z} ↔ x ∈ {z ∣ y ∈ z})
28 vex 2863 . . . . . . . . . . . . . . . . . . . 20 ⊢ x ∈ V
29 elequ2 1715 . . . . . . . . . . . . . . . . . . . 20 ⊢ (z = x → (y ∈ z ↔ y ∈ x))
3028, 29elab 2986 . . . . . . . . . . . . . . . . . . 19 ⊢ (x ∈ {z ∣ y ∈ z} ↔ y ∈ x)
3126, 27, 303bitri 262 . . . . . . . . . . . . . . . . . 18 ⊢ (⟪{x}, l⟫ ∈ (℘1{z ∣ y ∈ z} ×k V) ↔ y ∈ x)
3228, 6elssetk 4271 . . . . . . . . . . . . . . . . . 18 ⊢ (⟪{x}, l⟫ ∈ Sk ↔ x ∈ l)
3331, 32anbi12i 678 . . . . . . . . . . . . . . . . 17 ⊢ ((⟪{x}, l⟫ ∈ (℘1{z ∣ y ∈ z} ×k V) ∧ ⟪{x}, l⟫ ∈ Sk ) ↔ (y ∈ x ∧ x ∈ l))
3423, 24, 333bitri 262 . . . . . . . . . . . . . . . 16 ⊢ (∃t(t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )) ↔ (y ∈ x ∧ x ∈ l))
3534exbii 1582 . . . . . . . . . . . . . . 15 ⊢ (∃x∃t(t = {x} ∧ ⟪t, l⟫ ∈ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk )) ↔ ∃x(y ∈ x ∧ x ∈ l))
3611, 19, 353bitri 262 . . . . . . . . . . . . . 14 ⊢ (l ∈ (((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ↔ ∃x(y ∈ x ∧ x ∈ l))
37 snelpw1 4147 . . . . . . . . . . . . . 14 ⊢ ({l} ∈ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ↔ l ∈ (((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c))
38 eluni 3895 . . . . . . . . . . . . . 14 ⊢ (y ∈ ∪l ↔ ∃x(y ∈ x ∧ x ∈ l))
3936, 37, 383bitr4i 268 . . . . . . . . . . . . 13 ⊢ ({l} ∈ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ↔ y ∈ ∪l)
4010, 39xchbinx 301 . . . . . . . . . . . 12 ⊢ ({l} ∈ ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ↔ ¬ y ∈ ∪l)
411, 7opkelxpk 4249 . . . . . . . . . . . . 13 ⊢ (⟪{l}, n⟫ ∈ ( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ↔ ({l} ∈ ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ∧ n ∈ V))
427, 41mpbiran2 885 . . . . . . . . . . . 12 ⊢ (⟪{l}, n⟫ ∈ ( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ↔ {l} ∈ ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c))
43 vex 2863 . . . . . . . . . . . . 13 ⊢ y ∈ V
4443elcompl 3226 . . . . . . . . . . . 12 ⊢ (y ∈ ∼ ∪l ↔ ¬ y ∈ ∪l)
4540, 42, 443bitr4i 268 . . . . . . . . . . 11 ⊢ (⟪{l}, n⟫ ∈ ( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ↔ y ∈ ∼ ∪l)
46 eqabb 2459 . . . . . . . . . . . . . . 15 ⊢ (z = {x ∣ ∃b ∈ l x = (b ∪ {y})} ↔ ∀x(x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})))
4746anbi1i 676 . . . . . . . . . . . . . 14 ⊢ ((z = {x ∣ ∃b ∈ l x = (b ∪ {y})} ∧ z ∈ n) ↔ (∀x(x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})) ∧ z ∈ n))
4847exbii 1582 . . . . . . . . . . . . 13 ⊢ (∃z(z = {x ∣ ∃b ∈ l x = (b ∪ {y})} ∧ z ∈ n) ↔ ∃z(∀x(x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})) ∧ z ∈ n))
49 df-clel 2349 . . . . . . . . . . . . 13 ⊢ ({x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n ↔ ∃z(z = {x ∣ ∃b ∈ l x = (b ∪ {y})} ∧ z ∈ n))
50 opkex 4114 . . . . . . . . . . . . . . 15 ⊢ ⟪{l}, n⟫ ∈ V
5150elimak 4260 . . . . . . . . . . . . . 14 ⊢ (⟪{l}, n⟫ ∈ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c) ↔ ∃t ∈ ℘1 ℘11c⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ))
52 elpw121c 4149 . . . . . . . . . . . . . . . . . 18 ⊢ (t ∈ ℘1℘11c ↔ ∃z t = {{{z}}})
5352anbi1i 676 . . . . . . . . . . . . . . . . 17 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )) ↔ (∃z t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )))
54 19.41v 1901 . . . . . . . . . . . . . . . . 17 ⊢ (∃z(t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )) ↔ (∃z t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )))
5553, 54bitr4i 243 . . . . . . . . . . . . . . . 16 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )) ↔ ∃z(t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )))
5655exbii 1582 . . . . . . . . . . . . . . 15 ⊢ (∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )) ↔ ∃t∃z(t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )))
57 df-rex 2621 . . . . . . . . . . . . . . 15 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) ↔ ∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )))
58 excom 1741 . . . . . . . . . . . . . . 15 ⊢ (∃z∃t(t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )) ↔ ∃t∃z(t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )))
5956, 57, 583bitr4i 268 . . . . . . . . . . . . . 14 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) ↔ ∃z∃t(t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )))
60 snex 4112 . . . . . . . . . . . . . . . . 17 ⊢ {{{z}}} ∈ V
61 opkeq1 4060 . . . . . . . . . . . . . . . . . 18 ⊢ (t = {{{z}}} → ⟪t, ⟪{l}, n⟫⟫ = ⟪{{{z}}}, ⟪{l}, n⟫⟫)
6261eleq1d 2419 . . . . . . . . . . . . . . . . 17 ⊢ (t = {{{z}}} → (⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) ↔ ⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )))
6360, 62ceqsexv 2895 . . . . . . . . . . . . . . . 16 ⊢ (∃t(t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )) ↔ ⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ))
64 elin 3220 . . . . . . . . . . . . . . . 16 ⊢ (⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) ↔ (⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∧ ⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ Ins2k Sk ))
65 snex 4112 . . . . . . . . . . . . . . . . . . 19 ⊢ {z} ∈ V
6665, 1, 7otkelins3k 4257 . . . . . . . . . . . . . . . . . 18 ⊢ (⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ↔ ⟪{z}, {l}⟫ ∈ SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c))
67 vex 2863 . . . . . . . . . . . . . . . . . . 19 ⊢ z ∈ V
6867, 6opksnelsik 4266 . . . . . . . . . . . . . . . . . 18 ⊢ (⟪{z}, {l}⟫ ∈ SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ↔ ⟪z, l⟫ ∈ ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c))
69 opkex 4114 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ ⟪z, l⟫ ∈ V
7069elimak 4260 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟪z, l⟫ ∈ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ↔ ∃t ∈ ℘1 ℘11c⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)))
71 elpw121c 4149 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (t ∈ ℘1℘11c ↔ ∃x t = {{{x}}})
7271anbi1i 676 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) ↔ (∃x t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))))
73 19.41v 1901 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (∃x(t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) ↔ (∃x t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))))
7472, 73bitr4i 243 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) ↔ ∃x(t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))))
7574exbii 1582 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) ↔ ∃t∃x(t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))))
76 df-rex 2621 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) ↔ ∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))))
77 excom 1741 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃x∃t(t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) ↔ ∃t∃x(t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))))
7875, 76, 773bitr4i 268 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) ↔ ∃x∃t(t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))))
79 snex 4112 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ {{{x}}} ∈ V
80 opkeq1 4060 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (t = {{{x}}} → ⟪t, ⟪z, l⟫⟫ = ⟪{{{x}}}, ⟪z, l⟫⟫)
8180eleq1d 2419 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (t = {{{x}}} → (⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) ↔ ⟪{{{x}}}, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))))
8279, 81ceqsexv 2895 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃t(t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) ↔ ⟪{{{x}}}, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)))
83 elsymdif 3224 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (⟪{{{x}}}, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) ↔ ¬ (⟪{{{x}}}, ⟪z, l⟫⟫ ∈ Ins3k Sk ↔ ⟪{{{x}}}, ⟪z, l⟫⟫ ∈ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)))
8420, 67, 6otkelins3k 4257 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{{{x}}}, ⟪z, l⟫⟫ ∈ Ins3k Sk ↔ ⟪{x}, z⟫ ∈ Sk )
8528, 67elssetk 4271 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{x}, z⟫ ∈ Sk ↔ x ∈ z)
8684, 85bitri 240 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (⟪{{{x}}}, ⟪z, l⟫⟫ ∈ Ins3k Sk ↔ x ∈ z)
87 opkex 4114 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ⟪{x}, l⟫ ∈ V
8887elimak 4260 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (⟪{x}, l⟫ ∈ (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c) ↔ ∃t ∈ ℘1 ℘11c⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)))
89 elpw121c 4149 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (t ∈ ℘1℘11c ↔ ∃b t = {{{b}}})
9089anbi1i 676 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))) ↔ (∃b t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))))
91 19.41v 1901 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (∃b(t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))) ↔ (∃b t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))))
9290, 91bitr4i 243 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))) ↔ ∃b(t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))))
9392exbii 1582 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))) ↔ ∃t∃b(t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))))
94 df-rex 2621 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) ↔ ∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))))
95 excom 1741 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (∃b∃t(t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))) ↔ ∃t∃b(t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))))
9693, 94, 953bitr4i 268 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) ↔ ∃b∃t(t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))))
97 snex 4112 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ {{{b}}} ∈ V
98 opkeq1 4060 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (t = {{{b}}} → ⟪t, ⟪{x}, l⟫⟫ = ⟪{{{b}}}, ⟪{x}, l⟫⟫)
9998eleq1d 2419 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (t = {{{b}}} → (⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) ↔ ⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))))
10097, 99ceqsexv 2895 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (∃t(t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))) ↔ ⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)))
101 elin 3220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) ↔ (⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ Ins2k Sk ∧ ⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)))
102 snex 4112 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ {b} ∈ V
103102, 20, 6otkelins2k 4256 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ Ins2k Sk ↔ ⟪{b}, l⟫ ∈ Sk )
104 vex 2863 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ b ∈ V
105104, 6elssetk 4271 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (⟪{b}, l⟫ ∈ Sk ↔ b ∈ l)
106103, 105bitri 240 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ Ins2k Sk ↔ b ∈ l)
107102, 20, 6otkelins3k 4257 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ↔ ⟪{b}, {x}⟫ ∈ SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))
108104, 28opksnelsik 4266 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (⟪{b}, {x}⟫ ∈ SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ↔ ⟪b, x⟫ ∈ ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))
109 alex 1572 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (∀z(z ∈ x ↔ z ∈ (b ∪ {y})) ↔ ¬ ∃z ¬ (z ∈ x ↔ z ∈ (b ∪ {y})))
110 dfcleq 2347 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (x = (b ∪ {y}) ↔ ∀z(z ∈ x ↔ z ∈ (b ∪ {y})))
111 opkex 4114 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ⟪b, x⟫ ∈ V
112111elcompl 3226 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (⟪b, x⟫ ∈ ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ↔ ¬ ⟪b, x⟫ ∈ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))
113111elimak 4260 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (⟪b, x⟫ ∈ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ↔ ∃t ∈ ℘1 ℘11c⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))))
11452anbi1i 676 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))) ↔ (∃z t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))))
115 19.41v 1901 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (∃z(t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))) ↔ (∃z t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))))
116114, 115bitr4i 243 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))) ↔ ∃z(t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))))
117116exbii 1582 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))) ↔ ∃t∃z(t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))))
118 df-rex 2621 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) ↔ ∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))))
119 excom 1741 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (∃z∃t(t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))) ↔ ∃t∃z(t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))))
120117, 118, 1193bitr4i 268 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) ↔ ∃z∃t(t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))))
121 opkeq1 4060 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ (t = {{{z}}} → ⟪t, ⟪b, x⟫⟫ = ⟪{{{z}}}, ⟪b, x⟫⟫)
122121eleq1d 2419 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (t = {{{z}}} → (⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) ↔ ⟪{{{z}}}, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))))
12360, 122ceqsexv 2895 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (∃t(t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))) ↔ ⟪{{{z}}}, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))))
124 elsymdif 3224 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (⟪{{{z}}}, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) ↔ ¬ (⟪{{{z}}}, ⟪b, x⟫⟫ ∈ Ins2k Sk ↔ ⟪{{{z}}}, ⟪b, x⟫⟫ ∈ Ins3k ( Sk ∪ ({{y}} ×k V))))
12565, 104, 28otkelins2k 4256 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ⊢ (⟪{{{z}}}, ⟪b, x⟫⟫ ∈ Ins2k Sk ↔ ⟪{z}, x⟫ ∈ Sk )
12667, 28elssetk 4271 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ⊢ (⟪{z}, x⟫ ∈ Sk ↔ z ∈ x)
127125, 126bitri 240 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ (⟪{{{z}}}, ⟪b, x⟫⟫ ∈ Ins2k Sk ↔ z ∈ x)
12865, 104, 28otkelins3k 4257 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ⊢ (⟪{{{z}}}, ⟪b, x⟫⟫ ∈ Ins3k ( Sk ∪ ({{y}} ×k V)) ↔ ⟪{z}, b⟫ ∈ ( Sk ∪ ({{y}} ×k V)))
12967, 104elssetk 4271 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41 ⊢ (⟪{z}, b⟫ ∈ Sk ↔ z ∈ b)
13065elsnc 3757 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 ⊢ ({z} ∈ {{y}} ↔ {z} = {y})
13167sneqb 3877 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 ⊢ ({z} = {y} ↔ z = y)
132130, 131bitri 240 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 ⊢ ({z} ∈ {{y}} ↔ z = y)
13365, 104opkelxpk 4249 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 ⊢ (⟪{z}, b⟫ ∈ ({{y}} ×k V) ↔ ({z} ∈ {{y}} ∧ b ∈ V))
134104, 133mpbiran2 885 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 ⊢ (⟪{z}, b⟫ ∈ ({{y}} ×k V) ↔ {z} ∈ {{y}})
13567elsnc 3757 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 ⊢ (z ∈ {y} ↔ z = y)
136132, 134, 1353bitr4i 268 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41 ⊢ (⟪{z}, b⟫ ∈ ({{y}} ×k V) ↔ z ∈ {y})
137129, 136orbi12i 507 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 ⊢ ((⟪{z}, b⟫ ∈ Sk ∨ ⟪{z}, b⟫ ∈ ({{y}} ×k V)) ↔ (z ∈ b ∨ z ∈ {y}))
138 elun 3221 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 ⊢ (⟪{z}, b⟫ ∈ ( Sk ∪ ({{y}} ×k V)) ↔ (⟪{z}, b⟫ ∈ Sk ∨ ⟪{z}, b⟫ ∈ ({{y}} ×k V)))
139 elun 3221 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 ⊢ (z ∈ (b ∪ {y}) ↔ (z ∈ b ∨ z ∈ {y}))
140137, 138, 1393bitr4i 268 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ⊢ (⟪{z}, b⟫ ∈ ( Sk ∪ ({{y}} ×k V)) ↔ z ∈ (b ∪ {y}))
141128, 140bitri 240 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ (⟪{{{z}}}, ⟪b, x⟫⟫ ∈ Ins3k ( Sk ∪ ({{y}} ×k V)) ↔ z ∈ (b ∪ {y}))
142127, 141bibi12i 306 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ ((⟪{{{z}}}, ⟪b, x⟫⟫ ∈ Ins2k Sk ↔ ⟪{{{z}}}, ⟪b, x⟫⟫ ∈ Ins3k ( Sk ∪ ({{y}} ×k V))) ↔ (z ∈ x ↔ z ∈ (b ∪ {y})))
143124, 142xchbinx 301 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (⟪{{{z}}}, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) ↔ ¬ (z ∈ x ↔ z ∈ (b ∪ {y})))
144123, 143bitri 240 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (∃t(t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))) ↔ ¬ (z ∈ x ↔ z ∈ (b ∪ {y})))
145144exbii 1582 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (∃z∃t(t = {{{z}}} ∧ ⟪t, ⟪b, x⟫⟫ ∈ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V)))) ↔ ∃z ¬ (z ∈ x ↔ z ∈ (b ∪ {y})))
146113, 120, 1453bitri 262 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (⟪b, x⟫ ∈ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ↔ ∃z ¬ (z ∈ x ↔ z ∈ (b ∪ {y})))
147112, 146xchbinx 301 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (⟪b, x⟫ ∈ ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ↔ ¬ ∃z ¬ (z ∈ x ↔ z ∈ (b ∪ {y})))
148109, 110, 1473bitr4ri 269 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (⟪b, x⟫ ∈ ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ↔ x = (b ∪ {y}))
149107, 108, 1483bitri 262 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ↔ x = (b ∪ {y}))
150106, 149anbi12i 678 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ Ins2k Sk ∧ ⟪{{{b}}}, ⟪{x}, l⟫⟫ ∈ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) ↔ (b ∈ l ∧ x = (b ∪ {y})))
151100, 101, 1503bitri 262 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (∃t(t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))) ↔ (b ∈ l ∧ x = (b ∪ {y})))
152151exbii 1582 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (∃b∃t(t = {{{b}}} ∧ ⟪t, ⟪{x}, l⟫⟫ ∈ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c))) ↔ ∃b(b ∈ l ∧ x = (b ∪ {y})))
15388, 96, 1523bitri 262 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{x}, l⟫ ∈ (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c) ↔ ∃b(b ∈ l ∧ x = (b ∪ {y})))
15420, 67, 6otkelins2k 4256 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{{{x}}}, ⟪z, l⟫⟫ ∈ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c) ↔ ⟪{x}, l⟫ ∈ (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))
155 df-rex 2621 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (∃b ∈ l x = (b ∪ {y}) ↔ ∃b(b ∈ l ∧ x = (b ∪ {y})))
156153, 154, 1553bitr4i 268 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (⟪{{{x}}}, ⟪z, l⟫⟫ ∈ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c) ↔ ∃b ∈ l x = (b ∪ {y}))
15786, 156bibi12i 306 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((⟪{{{x}}}, ⟪z, l⟫⟫ ∈ Ins3k Sk ↔ ⟪{{{x}}}, ⟪z, l⟫⟫ ∈ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) ↔ (x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})))
15883, 157xchbinx 301 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (⟪{{{x}}}, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) ↔ ¬ (x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})))
15982, 158bitri 240 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃t(t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) ↔ ¬ (x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})))
160159exbii 1582 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (∃x∃t(t = {{{x}}} ∧ ⟪t, ⟪z, l⟫⟫ ∈ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) ↔ ∃x ¬ (x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})))
16170, 78, 1603bitri 262 . . . . . . . . . . . . . . . . . . . 20 ⊢ (⟪z, l⟫ ∈ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ↔ ∃x ¬ (x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})))
162161notbii 287 . . . . . . . . . . . . . . . . . . 19 ⊢ (¬ ⟪z, l⟫ ∈ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ↔ ¬ ∃x ¬ (x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})))
16369elcompl 3226 . . . . . . . . . . . . . . . . . . 19 ⊢ (⟪z, l⟫ ∈ ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ↔ ¬ ⟪z, l⟫ ∈ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c))
164 alex 1572 . . . . . . . . . . . . . . . . . . 19 ⊢ (∀x(x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})) ↔ ¬ ∃x ¬ (x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})))
165162, 163, 1643bitr4i 268 . . . . . . . . . . . . . . . . . 18 ⊢ (⟪z, l⟫ ∈ ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ↔ ∀x(x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})))
16666, 68, 1653bitri 262 . . . . . . . . . . . . . . . . 17 ⊢ (⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ↔ ∀x(x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})))
16765, 1, 7otkelins2k 4256 . . . . . . . . . . . . . . . . . 18 ⊢ (⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ Ins2k Sk ↔ ⟪{z}, n⟫ ∈ Sk )
16867, 7elssetk 4271 . . . . . . . . . . . . . . . . . 18 ⊢ (⟪{z}, n⟫ ∈ Sk ↔ z ∈ n)
169167, 168bitri 240 . . . . . . . . . . . . . . . . 17 ⊢ (⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ Ins2k Sk ↔ z ∈ n)
170166, 169anbi12i 678 . . . . . . . . . . . . . . . 16 ⊢ ((⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∧ ⟪{{{z}}}, ⟪{l}, n⟫⟫ ∈ Ins2k Sk ) ↔ (∀x(x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})) ∧ z ∈ n))
17163, 64, 1703bitri 262 . . . . . . . . . . . . . . 15 ⊢ (∃t(t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )) ↔ (∀x(x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})) ∧ z ∈ n))
172171exbii 1582 . . . . . . . . . . . . . 14 ⊢ (∃z∃t(t = {{{z}}} ∧ ⟪t, ⟪{l}, n⟫⟫ ∈ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk )) ↔ ∃z(∀x(x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})) ∧ z ∈ n))
17351, 59, 1723bitri 262 . . . . . . . . . . . . 13 ⊢ (⟪{l}, n⟫ ∈ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c) ↔ ∃z(∀x(x ∈ z ↔ ∃b ∈ l x = (b ∪ {y})) ∧ z ∈ n))
17448, 49, 1733bitr4ri 269 . . . . . . . . . . . 12 ⊢ (⟪{l}, n⟫ ∈ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c) ↔ {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n)
175174notbii 287 . . . . . . . . . . 11 ⊢ (¬ ⟪{l}, n⟫ ∈ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c) ↔ ¬ {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n)
17645, 175anbi12i 678 . . . . . . . . . 10 ⊢ ((⟪{l}, n⟫ ∈ ( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∧ ¬ ⟪{l}, n⟫ ∈ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) ↔ (y ∈ ∼ ∪l ∧ ¬ {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n))
177 annim 414 . . . . . . . . . 10 ⊢ ((y ∈ ∼ ∪l ∧ ¬ {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n) ↔ ¬ (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n))
1789, 176, 1773bitri 262 . . . . . . . . 9 ⊢ (⟪{l}, n⟫ ∈ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) ↔ ¬ (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n))
1798, 178anbi12i 678 . . . . . . . 8 ⊢ ((⟪{l}, n⟫ ∈ Sk ∧ ⟪{l}, n⟫ ∈ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) ↔ (l ∈ n ∧ ¬ (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n)))
1804, 5, 1793bitri 262 . . . . . . 7 ⊢ (∃t(t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))) ↔ (l ∈ n ∧ ¬ (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n)))
181180exbii 1582 . . . . . 6 ⊢ (∃l∃t(t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))) ↔ ∃l(l ∈ n ∧ ¬ (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n)))
1827elimak 4260 . . . . . . 7 ⊢ (n ∈ (( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) “k 1c) ↔ ∃t ∈ 1c ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))))
183 el1c 4140 . . . . . . . . . . 11 ⊢ (t ∈ 1c ↔ ∃l t = {l})
184183anbi1i 676 . . . . . . . . . 10 ⊢ ((t ∈ 1c ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))) ↔ (∃l t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))))
185 19.41v 1901 . . . . . . . . . 10 ⊢ (∃l(t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))) ↔ (∃l t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))))
186184, 185bitr4i 243 . . . . . . . . 9 ⊢ ((t ∈ 1c ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))) ↔ ∃l(t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))))
187186exbii 1582 . . . . . . . 8 ⊢ (∃t(t ∈ 1c ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))) ↔ ∃t∃l(t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))))
188 df-rex 2621 . . . . . . . 8 ⊢ (∃t ∈ 1c ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) ↔ ∃t(t ∈ 1c ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))))
189 excom 1741 . . . . . . . 8 ⊢ (∃l∃t(t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))) ↔ ∃t∃l(t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))))
190187, 188, 1893bitr4i 268 . . . . . . 7 ⊢ (∃t ∈ 1c ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) ↔ ∃l∃t(t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))))
191182, 190bitri 240 . . . . . 6 ⊢ (n ∈ (( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) “k 1c) ↔ ∃l∃t(t = {l} ∧ ⟪t, n⟫ ∈ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)))))
192 df-rex 2621 . . . . . 6 ⊢ (∃l ∈ n ¬ (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n) ↔ ∃l(l ∈ n ∧ ¬ (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n)))
193181, 191, 1923bitr4i 268 . . . . 5 ⊢ (n ∈ (( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) “k 1c) ↔ ∃l ∈ n ¬ (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n))
194193notbii 287 . . . 4 ⊢ (¬ n ∈ (( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) “k 1c) ↔ ¬ ∃l ∈ n ¬ (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n))
1957elcompl 3226 . . . 4 ⊢ (n ∈ ∼ (( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) “k 1c) ↔ ¬ n ∈ (( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) “k 1c))
196 dfral2 2627 . . . 4 ⊢ (∀l ∈ n (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n) ↔ ¬ ∃l ∈ n ¬ (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n))
197194, 195, 1963bitr4i 268 . . 3 ⊢ (n ∈ ∼ (( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) “k 1c) ↔ ∀l ∈ n (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n))
198197eqabi 2465 . 2 ⊢ ∼ (( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) “k 1c) = {n ∣ ∀l ∈ n (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n)}
199 ssetkex 4295 . . . . 5 ⊢ Sk ∈ V
200 setswithex 4323 . . . . . . . . . . . . 13 ⊢ {z ∣ y ∈ z} ∈ V
201200pw1ex 4304 . . . . . . . . . . . 12 ⊢ ℘1{z ∣ y ∈ z} ∈ V
202 vvex 4110 . . . . . . . . . . . 12 ⊢ V ∈ V
203201, 202xpkex 4290 . . . . . . . . . . 11 ⊢ (℘1{z ∣ y ∈ z} ×k V) ∈ V
204203, 199inex 4106 . . . . . . . . . 10 ⊢ ((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) ∈ V
205 1cex 4143 . . . . . . . . . 10 ⊢ 1c ∈ V
206204, 205imakex 4301 . . . . . . . . 9 ⊢ (((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ∈ V
207206pw1ex 4304 . . . . . . . 8 ⊢ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ∈ V
208207complex 4105 . . . . . . 7 ⊢ ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ∈ V
209208, 202xpkex 4290 . . . . . 6 ⊢ ( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∈ V
210199ins3kex 4309 . . . . . . . . . . . . 13 ⊢ Ins3k Sk ∈ V
211199ins2kex 4308 . . . . . . . . . . . . . . . 16 ⊢ Ins2k Sk ∈ V
212 snex 4112 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ {{y}} ∈ V
213212, 202xpkex 4290 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ({{y}} ×k V) ∈ V
214199, 213unex 4107 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ ( Sk ∪ ({{y}} ×k V)) ∈ V
215214ins3kex 4309 . . . . . . . . . . . . . . . . . . . . 21 ⊢ Ins3k ( Sk ∪ ({{y}} ×k V)) ∈ V
216211, 215symdifex 4109 . . . . . . . . . . . . . . . . . . . 20 ⊢ ( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) ∈ V
217205pw1ex 4304 . . . . . . . . . . . . . . . . . . . . 21 ⊢ ℘11c ∈ V
218217pw1ex 4304 . . . . . . . . . . . . . . . . . . . 20 ⊢ ℘1℘11c ∈ V
219216, 218imakex 4301 . . . . . . . . . . . . . . . . . . 19 ⊢ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ∈ V
220219complex 4105 . . . . . . . . . . . . . . . . . 18 ⊢ ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ∈ V
221220sikex 4298 . . . . . . . . . . . . . . . . 17 ⊢ SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ∈ V
222221ins3kex 4309 . . . . . . . . . . . . . . . 16 ⊢ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c) ∈ V
223211, 222inex 4106 . . . . . . . . . . . . . . 15 ⊢ ( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) ∈ V
224223, 218imakex 4301 . . . . . . . . . . . . . 14 ⊢ (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c) ∈ V
225224ins2kex 4308 . . . . . . . . . . . . 13 ⊢ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c) ∈ V
226210, 225symdifex 4109 . . . . . . . . . . . 12 ⊢ ( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) ∈ V
227226, 218imakex 4301 . . . . . . . . . . 11 ⊢ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∈ V
228227complex 4105 . . . . . . . . . 10 ⊢ ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∈ V
229228sikex 4298 . . . . . . . . 9 ⊢ SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∈ V
230229ins3kex 4309 . . . . . . . 8 ⊢ Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∈ V
231230, 211inex 4106 . . . . . . 7 ⊢ ( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) ∈ V
232231, 218imakex 4301 . . . . . 6 ⊢ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c) ∈ V
233209, 232difex 4108 . . . . 5 ⊢ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c)) ∈ V
234199, 233inex 4106 . . . 4 ⊢ ( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) ∈ V
235234, 205imakex 4301 . . 3 ⊢ (( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) “k 1c) ∈ V
236235complex 4105 . 2 ⊢ ∼ (( Sk ∩ (( ∼ ℘1(((℘1{z ∣ y ∈ z} ×k V) ∩ Sk ) “k 1c) ×k V) ∖ (( Ins3k SIk ∼ (( Ins3k Sk ⊕ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ( Sk ∪ ({{y}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c)) “k ℘1℘11c) ∩ Ins2k Sk ) “k ℘1℘11c))) “k 1c) ∈ V
237198, 236eqeltrri 2424 1 ⊢ {n ∣ ∀l ∈ n (y ∈ ∼ ∪l → {x ∣ ∃b ∈ l x = (b ∪ {y})} ∈ n)} ∈ V
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 176   ∨ wo 357   ∧ wa 358  ∀wal 1540  ∃wex 1541   = wceq 1642   ∈ wcel 1710  {cab 2339  ∀wral 2615  ∃wrex 2616  Vcvv 2860   ∼ ccompl 3206   ∖ cdif 3207   ∪ cun 3208   ∩ cin 3209   ⊕ csymdif 3210  {csn 3738  ∪cuni 3892  ⟪copk 4058  1cc1c 4135  ℘1cpw1 4136   ×k cxpk 4175   Ins2k cins2k 4177   Ins3k cins3k 4178   “k cimak 4180   SIk csik 4182   Sk cssetk 4184
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-14 1714  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-opk 4059  df-1c 4137  df-pw1 4138  df-xpk 4186  df-cnvk 4187  df-ins2k 4188  df-ins3k 4189  df-imak 4190  df-p6 4192  df-sik 4193  df-ssetk 4194
This theorem is used by:  nnadjoin  4521
  Copyright terms: Public domain W3C validator