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

Theorem nnpweqlem1 4523
Description: Lemma for nnpweq 4524. Establish stratification for induction. (Contributed by SF, 26-Jan-2015.)
Assertion
Ref Expression
nnpweqlem1 ⊢ {m ∣ ∀a ∈ m ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)} ∈ V
Distinct variable group:   m,a,b,n

Proof of Theorem nnpweqlem1
Dummy variables t x are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 vex 2863 . . . . 5 ⊢ m ∈ V
21eluni1 4174 . . . 4 ⊢ (m ∈ ⋃1 ∼ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ↔ {m} ∈ ∼ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c))
3 snex 4112 . . . . . . . . . 10 ⊢ {{a}} ∈ V
4 opkeq1 4060 . . . . . . . . . . 11 ⊢ (t = {{a}} → ⟪t, {m}⟫ = ⟪{{a}}, {m}⟫)
54eleq1d 2419 . . . . . . . . . 10 ⊢ (t = {{a}} → (⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) ↔ ⟪{{a}}, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))))
63, 5ceqsexv 2895 . . . . . . . . 9 ⊢ (∃t(t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))) ↔ ⟪{{a}}, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)))
7 elin 3220 . . . . . . . . 9 ⊢ (⟪{{a}}, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) ↔ (⟪{{a}}, {m}⟫ ∈ SIk Sk ∧ ⟪{{a}}, {m}⟫ ∈ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)))
8 snex 4112 . . . . . . . . . . . 12 ⊢ {a} ∈ V
98, 1opksnelsik 4266 . . . . . . . . . . 11 ⊢ (⟪{{a}}, {m}⟫ ∈ SIk Sk ↔ ⟪{a}, m⟫ ∈ Sk )
10 vex 2863 . . . . . . . . . . . 12 ⊢ a ∈ V
1110, 1elssetk 4271 . . . . . . . . . . 11 ⊢ (⟪{a}, m⟫ ∈ Sk ↔ a ∈ m)
129, 11bitri 240 . . . . . . . . . 10 ⊢ (⟪{{a}}, {m}⟫ ∈ SIk Sk ↔ a ∈ m)
13 opkex 4114 . . . . . . . . . . . . 13 ⊢ ⟪{{a}}, {m}⟫ ∈ V
1413elimak 4260 . . . . . . . . . . . 12 ⊢ (⟪{{a}}, {m}⟫ ∈ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c) ↔ ∃t ∈ ℘1 ℘1℘11c⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )))
15 elpw131c 4150 . . . . . . . . . . . . . . . 16 ⊢ (t ∈ ℘1℘1℘11c ↔ ∃b t = {{{{b}}}})
1615anbi1i 676 . . . . . . . . . . . . . . 15 ⊢ ((t ∈ ℘1℘1℘11c ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))) ↔ (∃b t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))))
17 19.41v 1901 . . . . . . . . . . . . . . 15 ⊢ (∃b(t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))) ↔ (∃b t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))))
1816, 17bitr4i 243 . . . . . . . . . . . . . 14 ⊢ ((t ∈ ℘1℘1℘11c ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))) ↔ ∃b(t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))))
1918exbii 1582 . . . . . . . . . . . . 13 ⊢ (∃t(t ∈ ℘1℘1℘11c ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))) ↔ ∃t∃b(t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))))
20 df-rex 2621 . . . . . . . . . . . . 13 ⊢ (∃t ∈ ℘1 ℘1℘11c⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) ↔ ∃t(t ∈ ℘1℘1℘11c ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))))
21 excom 1741 . . . . . . . . . . . . 13 ⊢ (∃b∃t(t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))) ↔ ∃t∃b(t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))))
2219, 20, 213bitr4i 268 . . . . . . . . . . . 12 ⊢ (∃t ∈ ℘1 ℘1℘11c⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) ↔ ∃b∃t(t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))))
23 snex 4112 . . . . . . . . . . . . . . 15 ⊢ {{{{b}}}} ∈ V
24 opkeq1 4060 . . . . . . . . . . . . . . . 16 ⊢ (t = {{{{b}}}} → ⟪t, ⟪{{a}}, {m}⟫⟫ = ⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫)
2524eleq1d 2419 . . . . . . . . . . . . . . 15 ⊢ (t = {{{{b}}}} → (⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) ↔ ⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))))
2623, 25ceqsexv 2895 . . . . . . . . . . . . . 14 ⊢ (∃t(t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))) ↔ ⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )))
27 eldif 3222 . . . . . . . . . . . . . 14 ⊢ (⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) ↔ (⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ Ins2k SIk Sk ∧ ¬ ⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )))
28 snex 4112 . . . . . . . . . . . . . . . . 17 ⊢ {{b}} ∈ V
29 snex 4112 . . . . . . . . . . . . . . . . 17 ⊢ {m} ∈ V
3028, 3, 29otkelins2k 4256 . . . . . . . . . . . . . . . 16 ⊢ (⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ Ins2k SIk Sk ↔ ⟪{{b}}, {m}⟫ ∈ SIk Sk )
31 snex 4112 . . . . . . . . . . . . . . . . 17 ⊢ {b} ∈ V
3231, 1opksnelsik 4266 . . . . . . . . . . . . . . . 16 ⊢ (⟪{{b}}, {m}⟫ ∈ SIk Sk ↔ ⟪{b}, m⟫ ∈ Sk )
33 vex 2863 . . . . . . . . . . . . . . . . 17 ⊢ b ∈ V
3433, 1elssetk 4271 . . . . . . . . . . . . . . . 16 ⊢ (⟪{b}, m⟫ ∈ Sk ↔ b ∈ m)
3530, 32, 343bitri 262 . . . . . . . . . . . . . . 15 ⊢ (⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ Ins2k SIk Sk ↔ b ∈ m)
3628, 3, 29otkelins3k 4257 . . . . . . . . . . . . . . . . 17 ⊢ (⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ) ↔ ⟪{{b}}, {{a}}⟫ ∈ (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))
37 opkex 4114 . . . . . . . . . . . . . . . . . . 19 ⊢ ⟪{{b}}, {{a}}⟫ ∈ V
3837elimak 4260 . . . . . . . . . . . . . . . . . 18 ⊢ (⟪{{b}}, {{a}}⟫ ∈ (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ) ↔ ∃t ∈ ℘1 ℘1 Nn ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)))
39 elpw12 4146 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (t ∈ ℘1℘1 Nn ↔ ∃n ∈ Nn t = {{n}})
4039anbi1i 676 . . . . . . . . . . . . . . . . . . . . 21 ⊢ ((t ∈ ℘1℘1 Nn ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))) ↔ (∃n ∈ Nn t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))))
41 r19.41v 2765 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (∃n ∈ Nn (t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))) ↔ (∃n ∈ Nn t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))))
4240, 41bitr4i 243 . . . . . . . . . . . . . . . . . . . 20 ⊢ ((t ∈ ℘1℘1 Nn ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))) ↔ ∃n ∈ Nn (t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))))
4342exbii 1582 . . . . . . . . . . . . . . . . . . 19 ⊢ (∃t(t ∈ ℘1℘1 Nn ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))) ↔ ∃t∃n ∈ Nn (t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))))
44 df-rex 2621 . . . . . . . . . . . . . . . . . . 19 ⊢ (∃t ∈ ℘1 ℘1 Nn ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) ↔ ∃t(t ∈ ℘1℘1 Nn ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))))
45 rexcom4 2879 . . . . . . . . . . . . . . . . . . 19 ⊢ (∃n ∈ Nn ∃t(t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))) ↔ ∃t∃n ∈ Nn (t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))))
4643, 44, 453bitr4i 268 . . . . . . . . . . . . . . . . . 18 ⊢ (∃t ∈ ℘1 ℘1 Nn ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) ↔ ∃n ∈ Nn ∃t(t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))))
4738, 46bitri 240 . . . . . . . . . . . . . . . . 17 ⊢ (⟪{{b}}, {{a}}⟫ ∈ (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ) ↔ ∃n ∈ Nn ∃t(t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))))
48 snex 4112 . . . . . . . . . . . . . . . . . . . 20 ⊢ {{n}} ∈ V
49 opkeq1 4060 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (t = {{n}} → ⟪t, ⟪{{b}}, {{a}}⟫⟫ = ⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫)
5049eleq1d 2419 . . . . . . . . . . . . . . . . . . . 20 ⊢ (t = {{n}} → (⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) ↔ ⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))))
5148, 50ceqsexv 2895 . . . . . . . . . . . . . . . . . . 19 ⊢ (∃t(t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))) ↔ ⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)))
52 elin 3220 . . . . . . . . . . . . . . . . . . 19 ⊢ (⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) ↔ (⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∧ ⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)))
53 opkex 4114 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ⟪n, {{a}}⟫ ∈ V
5453elimak 4260 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⟪n, {{a}}⟫ ∈ (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ↔ ∃t ∈ ℘1 ℘11c⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ))
55 elpw121c 4149 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (t ∈ ℘1℘11c ↔ ∃x t = {{{x}}})
5655anbi1i 676 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ (∃x t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
57 19.41v 1901 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (∃x(t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ (∃x t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
5856, 57bitr4i 243 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ ∃x(t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
5958exbii 1582 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ ∃t∃x(t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
60 df-rex 2621 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) ↔ ∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
61 excom 1741 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃x∃t(t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ ∃t∃x(t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
6259, 60, 613bitr4i 268 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) ↔ ∃x∃t(t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
63 snex 4112 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ {{{x}}} ∈ V
64 opkeq1 4060 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (t = {{{x}}} → ⟪t, ⟪n, {{a}}⟫⟫ = ⟪{{{x}}}, ⟪n, {{a}}⟫⟫)
6564eleq1d 2419 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (t = {{{x}}} → (⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) ↔ ⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
6663, 65ceqsexv 2895 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (∃t(t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ ⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ))
67 elin 3220 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) ↔ (⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∧ ⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ Ins3k Sk ))
68 snex 4112 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ {x} ∈ V
69 vex 2863 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ n ∈ V
7068, 69, 3otkelins2k 4256 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ ⟪{x}, {{a}}⟫ ∈ SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c))
71 vex 2863 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ x ∈ V
7271, 8opksnelsik 4266 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{x}, {{a}}⟫ ∈ SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ ⟪x, {a}⟫ ∈ ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c))
7371, 8opkelcnvk 4251 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (⟪x, {a}⟫ ∈ ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ ⟪{a}, x⟫ ∈ ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c))
7410, 71eqpwrelk 4479 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (⟪{a}, x⟫ ∈ ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ x = ℘a)
7573, 74bitri 240 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪x, {a}⟫ ∈ ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ x = ℘a)
7670, 72, 753bitri 262 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ x = ℘a)
7768, 69, 3otkelins3k 4257 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ Ins3k Sk ↔ ⟪{x}, n⟫ ∈ Sk )
7871, 69elssetk 4271 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{x}, n⟫ ∈ Sk ↔ x ∈ n)
7977, 78bitri 240 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ Ins3k Sk ↔ x ∈ n)
8076, 79anbi12i 678 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∧ ⟪{{{x}}}, ⟪n, {{a}}⟫⟫ ∈ Ins3k Sk ) ↔ (x = ℘a ∧ x ∈ n))
8166, 67, 803bitri 262 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃t(t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ (x = ℘a ∧ x ∈ n))
8281exbii 1582 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃x∃t(t = {{{x}}} ∧ ⟪t, ⟪n, {{a}}⟫⟫ ∈ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ ∃x(x = ℘a ∧ x ∈ n))
8354, 62, 823bitri 262 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟪n, {{a}}⟫ ∈ (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ↔ ∃x(x = ℘a ∧ x ∈ n))
8469, 28, 3otkelins2k 4256 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ↔ ⟪n, {{a}}⟫ ∈ (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))
85 df-clel 2349 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (℘a ∈ n ↔ ∃x(x = ℘a ∧ x ∈ n))
8683, 84, 853bitr4i 268 . . . . . . . . . . . . . . . . . . . 20 ⊢ (⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ↔ ℘a ∈ n)
87 opkex 4114 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ⟪n, {{b}}⟫ ∈ V
8887elimak 4260 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⟪n, {{b}}⟫ ∈ (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ↔ ∃t ∈ ℘1 ℘11c⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ))
8955anbi1i 676 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ (∃x t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
90 19.41v 1901 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (∃x(t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ (∃x t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
9189, 90bitr4i 243 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((t ∈ ℘1℘11c ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ ∃x(t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
9291exbii 1582 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ ∃t∃x(t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
93 df-rex 2621 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) ↔ ∃t(t ∈ ℘1℘11c ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
94 excom 1741 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃x∃t(t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ ∃t∃x(t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
9592, 93, 943bitr4i 268 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃t ∈ ℘1 ℘11c⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) ↔ ∃x∃t(t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
96 opkeq1 4060 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (t = {{{x}}} → ⟪t, ⟪n, {{b}}⟫⟫ = ⟪{{{x}}}, ⟪n, {{b}}⟫⟫)
9796eleq1d 2419 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (t = {{{x}}} → (⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) ↔ ⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )))
9863, 97ceqsexv 2895 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (∃t(t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ ⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ))
99 elin 3220 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) ↔ (⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∧ ⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ Ins3k Sk ))
10068, 69, 28otkelins2k 4256 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ ⟪{x}, {{b}}⟫ ∈ ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c))
10168, 28opkelcnvk 4251 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{x}, {{b}}⟫ ∈ ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ ⟪{{b}}, {x}⟫ ∈ SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c))
10231, 71opksnelsik 4266 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (⟪{{b}}, {x}⟫ ∈ SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ ⟪{b}, x⟫ ∈ ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c))
10333, 71eqpwrelk 4479 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (⟪{b}, x⟫ ∈ ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ x = ℘b)
104102, 103bitri 240 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{{b}}, {x}⟫ ∈ SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ x = ℘b)
105100, 101, 1043bitri 262 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ↔ x = ℘b)
10668, 69, 28otkelins3k 4257 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ Ins3k Sk ↔ ⟪{x}, n⟫ ∈ Sk )
107106, 78bitri 240 . . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ Ins3k Sk ↔ x ∈ n)
108105, 107anbi12i 678 . . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∧ ⟪{{{x}}}, ⟪n, {{b}}⟫⟫ ∈ Ins3k Sk ) ↔ (x = ℘b ∧ x ∈ n))
10998, 99, 1083bitri 262 . . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃t(t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ (x = ℘b ∧ x ∈ n))
110109exbii 1582 . . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃x∃t(t = {{{x}}} ∧ ⟪t, ⟪n, {{b}}⟫⟫ ∈ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk )) ↔ ∃x(x = ℘b ∧ x ∈ n))
11188, 95, 1103bitri 262 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟪n, {{b}}⟫ ∈ (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ↔ ∃x(x = ℘b ∧ x ∈ n))
11269, 28, 3otkelins3k 4257 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ↔ ⟪n, {{b}}⟫ ∈ (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))
113 df-clel 2349 . . . . . . . . . . . . . . . . . . . . 21 ⊢ (℘b ∈ n ↔ ∃x(x = ℘b ∧ x ∈ n))
114111, 112, 1133bitr4i 268 . . . . . . . . . . . . . . . . . . . 20 ⊢ (⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ↔ ℘b ∈ n)
11586, 114anbi12i 678 . . . . . . . . . . . . . . . . . . 19 ⊢ ((⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∧ ⟪{{n}}, ⟪{{b}}, {{a}}⟫⟫ ∈ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) ↔ (℘a ∈ n ∧ ℘b ∈ n))
11651, 52, 1153bitri 262 . . . . . . . . . . . . . . . . . 18 ⊢ (∃t(t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))) ↔ (℘a ∈ n ∧ ℘b ∈ n))
117116rexbii 2640 . . . . . . . . . . . . . . . . 17 ⊢ (∃n ∈ Nn ∃t(t = {{n}} ∧ ⟪t, ⟪{{b}}, {{a}}⟫⟫ ∈ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c))) ↔ ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n))
11836, 47, 1173bitri 262 . . . . . . . . . . . . . . . 16 ⊢ (⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ) ↔ ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n))
119118notbii 287 . . . . . . . . . . . . . . 15 ⊢ (¬ ⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ) ↔ ¬ ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n))
12035, 119anbi12i 678 . . . . . . . . . . . . . 14 ⊢ ((⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ Ins2k SIk Sk ∧ ¬ ⟪{{{{b}}}}, ⟪{{a}}, {m}⟫⟫ ∈ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) ↔ (b ∈ m ∧ ¬ ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)))
12126, 27, 1203bitri 262 . . . . . . . . . . . . 13 ⊢ (∃t(t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))) ↔ (b ∈ m ∧ ¬ ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)))
122121exbii 1582 . . . . . . . . . . . 12 ⊢ (∃b∃t(t = {{{{b}}}} ∧ ⟪t, ⟪{{a}}, {m}⟫⟫ ∈ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ))) ↔ ∃b(b ∈ m ∧ ¬ ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)))
12314, 22, 1223bitri 262 . . . . . . . . . . 11 ⊢ (⟪{{a}}, {m}⟫ ∈ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c) ↔ ∃b(b ∈ m ∧ ¬ ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)))
124 df-rex 2621 . . . . . . . . . . 11 ⊢ (∃b ∈ m ¬ ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n) ↔ ∃b(b ∈ m ∧ ¬ ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)))
125 rexnal 2626 . . . . . . . . . . 11 ⊢ (∃b ∈ m ¬ ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n) ↔ ¬ ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n))
126123, 124, 1253bitr2i 264 . . . . . . . . . 10 ⊢ (⟪{{a}}, {m}⟫ ∈ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c) ↔ ¬ ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n))
12712, 126anbi12i 678 . . . . . . . . 9 ⊢ ((⟪{{a}}, {m}⟫ ∈ SIk Sk ∧ ⟪{{a}}, {m}⟫ ∈ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) ↔ (a ∈ m ∧ ¬ ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)))
1286, 7, 1273bitri 262 . . . . . . . 8 ⊢ (∃t(t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))) ↔ (a ∈ m ∧ ¬ ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)))
129128exbii 1582 . . . . . . 7 ⊢ (∃a∃t(t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))) ↔ ∃a(a ∈ m ∧ ¬ ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)))
13029elimak 4260 . . . . . . . 8 ⊢ ({m} ∈ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ↔ ∃t ∈ ℘1 1c⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)))
131 elpw11c 4148 . . . . . . . . . . . 12 ⊢ (t ∈ ℘11c ↔ ∃a t = {{a}})
132131anbi1i 676 . . . . . . . . . . 11 ⊢ ((t ∈ ℘11c ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))) ↔ (∃a t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))))
133 19.41v 1901 . . . . . . . . . . 11 ⊢ (∃a(t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))) ↔ (∃a t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))))
134132, 133bitr4i 243 . . . . . . . . . 10 ⊢ ((t ∈ ℘11c ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))) ↔ ∃a(t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))))
135134exbii 1582 . . . . . . . . 9 ⊢ (∃t(t ∈ ℘11c ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))) ↔ ∃t∃a(t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))))
136 df-rex 2621 . . . . . . . . 9 ⊢ (∃t ∈ ℘1 1c⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) ↔ ∃t(t ∈ ℘11c ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))))
137 excom 1741 . . . . . . . . 9 ⊢ (∃a∃t(t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))) ↔ ∃t∃a(t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))))
138135, 136, 1373bitr4i 268 . . . . . . . 8 ⊢ (∃t ∈ ℘1 1c⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) ↔ ∃a∃t(t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))))
139130, 138bitri 240 . . . . . . 7 ⊢ ({m} ∈ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ↔ ∃a∃t(t = {{a}} ∧ ⟪t, {m}⟫ ∈ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c))))
140 df-rex 2621 . . . . . . 7 ⊢ (∃a ∈ m ¬ ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n) ↔ ∃a(a ∈ m ∧ ¬ ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)))
141129, 139, 1403bitr4i 268 . . . . . 6 ⊢ ({m} ∈ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ↔ ∃a ∈ m ¬ ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n))
142141notbii 287 . . . . 5 ⊢ (¬ {m} ∈ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ↔ ¬ ∃a ∈ m ¬ ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n))
14329elcompl 3226 . . . . 5 ⊢ ({m} ∈ ∼ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ↔ ¬ {m} ∈ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c))
144 dfral2 2627 . . . . 5 ⊢ (∀a ∈ m ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n) ↔ ¬ ∃a ∈ m ¬ ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n))
145142, 143, 1443bitr4i 268 . . . 4 ⊢ ({m} ∈ ∼ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ↔ ∀a ∈ m ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n))
1462, 145bitri 240 . . 3 ⊢ (m ∈ ⋃1 ∼ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ↔ ∀a ∈ m ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n))
147146eqabi 2465 . 2 ⊢ ⋃1 ∼ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) = {m ∣ ∀a ∈ m ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)}
148 ssetkex 4295 . . . . . . 7 ⊢ Sk ∈ V
149148sikex 4298 . . . . . 6 ⊢ SIk Sk ∈ V
150149ins2kex 4308 . . . . . . . 8 ⊢ Ins2k SIk Sk ∈ V
151148ins2kex 4308 . . . . . . . . . . . . . . . . . . . 20 ⊢ Ins2k Sk ∈ V
152149ins3kex 4309 . . . . . . . . . . . . . . . . . . . 20 ⊢ Ins3k SIk Sk ∈ V
153151, 152symdifex 4109 . . . . . . . . . . . . . . . . . . 19 ⊢ ( Ins2k Sk ⊕ Ins3k SIk Sk ) ∈ V
154 1cex 4143 . . . . . . . . . . . . . . . . . . . . 21 ⊢ 1c ∈ V
155154pw1ex 4304 . . . . . . . . . . . . . . . . . . . 20 ⊢ ℘11c ∈ V
156155pw1ex 4304 . . . . . . . . . . . . . . . . . . 19 ⊢ ℘1℘11c ∈ V
157153, 156imakex 4301 . . . . . . . . . . . . . . . . . 18 ⊢ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∈ V
158157complex 4105 . . . . . . . . . . . . . . . . 17 ⊢ ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∈ V
159158cnvkex 4288 . . . . . . . . . . . . . . . 16 ⊢ ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∈ V
160159sikex 4298 . . . . . . . . . . . . . . 15 ⊢ SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∈ V
161160ins2kex 4308 . . . . . . . . . . . . . 14 ⊢ Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∈ V
162148ins3kex 4309 . . . . . . . . . . . . . 14 ⊢ Ins3k Sk ∈ V
163161, 162inex 4106 . . . . . . . . . . . . 13 ⊢ ( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) ∈ V
164163, 156imakex 4301 . . . . . . . . . . . 12 ⊢ (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∈ V
165164ins2kex 4308 . . . . . . . . . . 11 ⊢ Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∈ V
166158sikex 4298 . . . . . . . . . . . . . . . 16 ⊢ SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∈ V
167166cnvkex 4288 . . . . . . . . . . . . . . 15 ⊢ ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∈ V
168167ins2kex 4308 . . . . . . . . . . . . . 14 ⊢ Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∈ V
169168, 162inex 4106 . . . . . . . . . . . . 13 ⊢ ( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) ∈ V
170169, 156imakex 4301 . . . . . . . . . . . 12 ⊢ (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∈ V
171170ins3kex 4309 . . . . . . . . . . 11 ⊢ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∈ V
172165, 171inex 4106 . . . . . . . . . 10 ⊢ ( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) ∈ V
173 nncex 4397 . . . . . . . . . . . 12 ⊢ Nn ∈ V
174173pw1ex 4304 . . . . . . . . . . 11 ⊢ ℘1 Nn ∈ V
175174pw1ex 4304 . . . . . . . . . 10 ⊢ ℘1℘1 Nn ∈ V
176172, 175imakex 4301 . . . . . . . . 9 ⊢ (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ) ∈ V
177176ins3kex 4309 . . . . . . . 8 ⊢ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn ) ∈ V
178150, 177difex 4108 . . . . . . 7 ⊢ ( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) ∈ V
179156pw1ex 4304 . . . . . . 7 ⊢ ℘1℘1℘11c ∈ V
180178, 179imakex 4301 . . . . . 6 ⊢ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c) ∈ V
181149, 180inex 4106 . . . . 5 ⊢ ( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) ∈ V
182181, 155imakex 4301 . . . 4 ⊢ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ∈ V
183182complex 4105 . . 3 ⊢ ∼ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ∈ V
184183uni1ex 4294 . 2 ⊢ ⋃1 ∼ (( SIk Sk ∩ (( Ins2k SIk Sk ∖ Ins3k (( Ins2k (( Ins2k SIk ◡k ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c) ∩ Ins3k (( Ins2k ◡k SIk ∼ (( Ins2k Sk ⊕ Ins3k SIk Sk ) “k ℘1℘11c) ∩ Ins3k Sk ) “k ℘1℘11c)) “k ℘1℘1 Nn )) “k ℘1℘1℘11c)) “k ℘11c) ∈ V
185147, 184eqeltrri 2424 1 ⊢ {m ∣ ∀a ∈ m ∀b ∈ m ∃n ∈ Nn (℘a ∈ n ∧ ℘b ∈ n)} ∈ V
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   ∧ wa 358  ∃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  ⟪copk 4058  ⋃1cuni1 4134  1cc1c 4135  ℘1cpw1 4136  ◡kccnvk 4176   Ins2k cins2k 4177   Ins3k cins3k 4178   “k cimak 4180   SIk csik 4182   Sk cssetk 4184   Nn cnnc 4374
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
This theorem is used by:  nnpweq  4524
  Copyright terms: Public domain W3C validator