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

Theorem setconslem6 4737
Description: Lemma for the set construction functions. Invert the expression from setconslem4 4735. (Contributed by SF, 7-Jan-2015.)
Assertion
Ref Expression
setconslem6 ⊢ (((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) “k ℘1℘1A) = {z ∣ ∃x∃y(z = ⟪x, y⟫ ∧ ⟨x, y⟩ ∈ A)}
Distinct variable group:   x,A,y,z

Proof of Theorem setconslem6
Dummy variables w t are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 vex 2863 . . . 4 ⊢ z ∈ V
21elimak 4260 . . 3 ⊢ (z ∈ (((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) “k ℘1℘1A) ↔ ∃t ∈ ℘1 ℘1A⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)))
3 df-rex 2621 . . . 4 ⊢ (∃t ∈ ℘1 ℘1A⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ↔ ∃t(t ∈ ℘1℘1A ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))))
4 elpw12 4146 . . . . . . . 8 ⊢ (t ∈ ℘1℘1A ↔ ∃w ∈ A t = {{w}})
54anbi1i 676 . . . . . . 7 ⊢ ((t ∈ ℘1℘1A ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))) ↔ (∃w ∈ A t = {{w}} ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))))
6 r19.41v 2765 . . . . . . 7 ⊢ (∃w ∈ A (t = {{w}} ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))) ↔ (∃w ∈ A t = {{w}} ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))))
75, 6bitr4i 243 . . . . . 6 ⊢ ((t ∈ ℘1℘1A ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))) ↔ ∃w ∈ A (t = {{w}} ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))))
87exbii 1582 . . . . 5 ⊢ (∃t(t ∈ ℘1℘1A ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))) ↔ ∃t∃w ∈ A (t = {{w}} ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))))
9 rexcom4 2879 . . . . 5 ⊢ (∃w ∈ A ∃t(t = {{w}} ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))) ↔ ∃t∃w ∈ A (t = {{w}} ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))))
10 snex 4112 . . . . . . 7 ⊢ {{w}} ∈ V
11 opkeq1 4060 . . . . . . . 8 ⊢ (t = {{w}} → ⟪t, z⟫ = ⟪{{w}}, z⟫)
1211eleq1d 2419 . . . . . . 7 ⊢ (t = {{w}} → (⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ↔ ⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))))
1310, 12ceqsexv 2895 . . . . . 6 ⊢ (∃t(t = {{w}} ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))) ↔ ⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)))
1413rexbii 2640 . . . . 5 ⊢ (∃w ∈ A ∃t(t = {{w}} ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))) ↔ ∃w ∈ A ⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)))
158, 9, 143bitr2i 264 . . . 4 ⊢ (∃t(t ∈ ℘1℘1A ∧ ⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))) ↔ ∃w ∈ A ⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)))
163, 15bitri 240 . . 3 ⊢ (∃t ∈ ℘1 ℘1A⟪t, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ↔ ∃w ∈ A ⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)))
17 df-rex 2621 . . . 4 ⊢ (∃w ∈ A ⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ↔ ∃w(w ∈ A ∧ ⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))))
18 exancom 1586 . . . 4 ⊢ (∃w(w ∈ A ∧ ⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c))) ↔ ∃w(⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A))
1910, 1opkelxpk 4249 . . . . . . . . . . . 12 ⊢ (⟪{{w}}, z⟫ ∈ (V ×k (V ×k V)) ↔ ({{w}} ∈ V ∧ z ∈ (V ×k V)))
2010, 19mpbiran 884 . . . . . . . . . . 11 ⊢ (⟪{{w}}, z⟫ ∈ (V ×k (V ×k V)) ↔ z ∈ (V ×k V))
21 elvvk 4208 . . . . . . . . . . 11 ⊢ (z ∈ (V ×k V) ↔ ∃x∃y z = ⟪x, y⟫)
2220, 21bitri 240 . . . . . . . . . 10 ⊢ (⟪{{w}}, z⟫ ∈ (V ×k (V ×k V)) ↔ ∃x∃y z = ⟪x, y⟫)
2322anbi1i 676 . . . . . . . . 9 ⊢ ((⟪{{w}}, z⟫ ∈ (V ×k (V ×k V)) ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ↔ (∃x∃y z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)))
24 elin 3220 . . . . . . . . 9 ⊢ (⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ↔ (⟪{{w}}, z⟫ ∈ (V ×k (V ×k V)) ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)))
25 19.41vv 1902 . . . . . . . . 9 ⊢ (∃x∃y(z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ↔ (∃x∃y z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)))
2623, 24, 253bitr4i 268 . . . . . . . 8 ⊢ (⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ↔ ∃x∃y(z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)))
2726anbi1i 676 . . . . . . 7 ⊢ ((⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ (∃x∃y(z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A))
2827exbii 1582 . . . . . 6 ⊢ (∃w(⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ ∃w(∃x∃y(z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A))
29 19.41vv 1902 . . . . . . 7 ⊢ (∃x∃y((z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ (∃x∃y(z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A))
3029exbii 1582 . . . . . 6 ⊢ (∃w∃x∃y((z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ ∃w(∃x∃y(z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A))
31 exrot3 1744 . . . . . 6 ⊢ (∃w∃x∃y((z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ ∃x∃y∃w((z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A))
3228, 30, 313bitr2i 264 . . . . 5 ⊢ (∃w(⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ ∃x∃y∃w((z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A))
33 anass 630 . . . . . . . 8 ⊢ (((z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ (z = ⟪x, y⟫ ∧ (⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ∧ w ∈ A)))
3433exbii 1582 . . . . . . 7 ⊢ (∃w((z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ ∃w(z = ⟪x, y⟫ ∧ (⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ∧ w ∈ A)))
35 19.42v 1905 . . . . . . 7 ⊢ (∃w(z = ⟪x, y⟫ ∧ (⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ∧ w ∈ A)) ↔ (z = ⟪x, y⟫ ∧ ∃w(⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ∧ w ∈ A)))
36 opkeq2 4061 . . . . . . . . . . . . 13 ⊢ (z = ⟪x, y⟫ → ⟪{{w}}, z⟫ = ⟪{{w}}, ⟪x, y⟫⟫)
3736eleq1d 2419 . . . . . . . . . . . 12 ⊢ (z = ⟪x, y⟫ → (⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ↔ ⟪{{w}}, ⟪x, y⟫⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)))
38 vex 2863 . . . . . . . . . . . . 13 ⊢ w ∈ V
39 vex 2863 . . . . . . . . . . . . 13 ⊢ x ∈ V
40 vex 2863 . . . . . . . . . . . . 13 ⊢ y ∈ V
4138, 39, 40setconslem3 4734 . . . . . . . . . . . 12 ⊢ (⟪{{w}}, ⟪x, y⟫⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ↔ w = ⟨x, y⟩)
4237, 41syl6bb 252 . . . . . . . . . . 11 ⊢ (z = ⟪x, y⟫ → (⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ↔ w = ⟨x, y⟩))
4342anbi1d 685 . . . . . . . . . 10 ⊢ (z = ⟪x, y⟫ → ((⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ∧ w ∈ A) ↔ (w = ⟨x, y⟩ ∧ w ∈ A)))
4443exbidv 1626 . . . . . . . . 9 ⊢ (z = ⟪x, y⟫ → (∃w(⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ∧ w ∈ A) ↔ ∃w(w = ⟨x, y⟩ ∧ w ∈ A)))
4539, 40opex 4589 . . . . . . . . . 10 ⊢ ⟨x, y⟩ ∈ V
46 eleq1 2413 . . . . . . . . . 10 ⊢ (w = ⟨x, y⟩ → (w ∈ A ↔ ⟨x, y⟩ ∈ A))
4745, 46ceqsexv 2895 . . . . . . . . 9 ⊢ (∃w(w = ⟨x, y⟩ ∧ w ∈ A) ↔ ⟨x, y⟩ ∈ A)
4844, 47syl6bb 252 . . . . . . . 8 ⊢ (z = ⟪x, y⟫ → (∃w(⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ∧ w ∈ A) ↔ ⟨x, y⟩ ∈ A))
4948pm5.32i 618 . . . . . . 7 ⊢ ((z = ⟪x, y⟫ ∧ ∃w(⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c) ∧ w ∈ A)) ↔ (z = ⟪x, y⟫ ∧ ⟨x, y⟩ ∈ A))
5034, 35, 493bitri 262 . . . . . 6 ⊢ (∃w((z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ (z = ⟪x, y⟫ ∧ ⟨x, y⟩ ∈ A))
51502exbii 1583 . . . . 5 ⊢ (∃x∃y∃w((z = ⟪x, y⟫ ∧ ⟪{{w}}, z⟫ ∈ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ ∃x∃y(z = ⟪x, y⟫ ∧ ⟨x, y⟩ ∈ A))
5232, 51bitri 240 . . . 4 ⊢ (∃w(⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ∧ w ∈ A) ↔ ∃x∃y(z = ⟪x, y⟫ ∧ ⟨x, y⟩ ∈ A))
5317, 18, 523bitri 262 . . 3 ⊢ (∃w ∈ A ⟪{{w}}, z⟫ ∈ ((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) ↔ ∃x∃y(z = ⟪x, y⟫ ∧ ⟨x, y⟩ ∈ A))
542, 16, 533bitri 262 . 2 ⊢ (z ∈ (((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) “k ℘1℘1A) ↔ ∃x∃y(z = ⟪x, y⟫ ∧ ⟨x, y⟩ ∈ A))
5554eqabi 2465 1 ⊢ (((V ×k (V ×k V)) ∩ ∼ (( Ins3k SIk SIk Sk ⊕ Ins2k ( Ins3k ( Sk ∘k SIk ◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V)))) ∪ Ins2k (( Ins2k Sk ∩ Ins3k SIk ∼ (( Ins2k Sk ⊕ Ins3k ((◡kImagek((Imagek(( Ins3k ∼ (( Ins3k Sk ∩ Ins2k Sk ) “k ℘1℘11c) ∖ (( Ins2k Ins2k Sk ⊕ ( Ins2k Ins3k Sk ∪ Ins3k SIk SIk Sk )) “k ℘1℘1℘1℘11c)) “k ℘1℘11c) ∩ ( Nn ×k V)) ∪ ( Ik ∩ ( ∼ Nn ×k V))) ∘k Sk ) ∪ ({{0c}} ×k V))) “k ℘1℘11c)) “k ℘1℘11c))) “k ℘1℘1℘1℘11c)) “k ℘1℘1A) = {z ∣ ∃x∃y(z = ⟪x, y⟫ ∧ ⟨x, y⟩ ∈ A)}
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   ∧ wa 358  ∃wex 1541   = wceq 1642   ∈ wcel 1710  {cab 2339  ∃wrex 2616  Vcvv 2860   ∼ ccompl 3206   ∖ cdif 3207   ∪ cun 3208   ∩ cin 3209   ⊕ csymdif 3210  {csn 3738  ⟪copk 4058  1cc1c 4135  ℘1cpw1 4136   ×k cxpk 4175  ◡kccnvk 4176   Ins2k cins2k 4177   Ins3k cins3k 4178   “k cimak 4180   ∘k ccomk 4181   SIk csik 4182  Imagekcimagek 4183   Sk cssetk 4184   Ik cidk 4185   Nn cnnc 4374  0cc0c 4375  ⟨cop 4562
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-idk 4196  df-addc 4379  df-nnc 4380  df-phi 4566  df-op 4567
This theorem is used by:  dfima2  4746  dfco1  4749  dfsi2  4752
  Copyright terms: Public domain W3C validator