Theorem ssetkex 4294

Description: The Kuratowski subset relationship is a set. (Contributed by SF, 13-Jan-2015.)

Assertion

Ref	Expression
ssetkex	|- Sk e. _V

Proof of Theorem ssetkex

Dummy variables x y z w are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ax-sset 4082	. 2 |- E.xA.yA.z(<<y, z>> e. x <-> A.w(w e. y -> w e. z))
2		inss1 3475	. . . . . . 7 |- ((_V X.k _V) i^i x) C_ (_V X.k _V)
3		ssetkssvvk 4278	. . . . . . 7 |- Sk C_ (_V X.k _V)
4		eqrelk 4212	. . . . . . 7 |- ((((_V X.k _V) i^i x) C_ (_V X.k _V) /\ Sk C_ (_V X.k _V)) -> (((_V X.k _V) i^i x) = Sk <-> A.yA.z(<<y, z>> e. ((_V X.k _V) i^i x) <-> <<y, z>> e. Sk )))
5	2, 3, 4	mp2an 653	. . . . . 6 |- (((_V X.k _V) i^i x) = Sk <-> A.yA.z(<<y, z>> e. ((_V X.k _V) i^i x) <-> <<y, z>> e. Sk ))
6		vex 2862	. . . . . . . . . 10 |- y e. _V
7		vex 2862	. . . . . . . . . 10 |- z e. _V
8	6, 7	opkelxpk 4248	. . . . . . . . . 10 |- (<<y, z>> e. (_V X.k _V) <-> (y e. _V /\ z e. _V))
9	6, 7, 8	mpbir2an 886	. . . . . . . . 9 |- <<y, z>> e. (_V X.k _V)
10		elin 3219	. . . . . . . . 9 |- (<<y, z>> e. ((_V X.k _V) i^i x) <-> (<<y, z>> e. (_V X.k _V) /\ <<y, z>> e. x))
11	9, 10	mpbiran 884	. . . . . . . 8 |- (<<y, z>> e. ((_V X.k _V) i^i x) <-> <<y, z>> e. x)
12		opkelssetkg 4268	. . . . . . . . . 10 |- ((y e. _V /\ z e. _V) -> (<<y, z>> e. Sk <-> y C_ z))
13	6, 7, 12	mp2an 653	. . . . . . . . 9 |- (<<y, z>> e. Sk <-> y C_ z)
14		dfss2 3262	. . . . . . . . 9 |- (y C_ z <-> A.w(w e. y -> w e. z))
15	13, 14	bitri 240	. . . . . . . 8 |- (<<y, z>> e. Sk <-> A.w(w e. y -> w e. z))
16	11, 15	bibi12i 306	. . . . . . 7 |- ((<<y, z>> e. ((_V X.k _V) i^i x) <-> <<y, z>> e. Sk ) <-> (<<y, z>> e. x <-> A.w(w e. y -> w e. z)))
17	16	2albii 1567	. . . . . 6 |- (A.yA.z(<<y, z>> e. ((_V X.k _V) i^i x) <-> <<y, z>> e. Sk ) <-> A.yA.z(<<y, z>> e. x <-> A.w(w e. y -> w e. z)))
18	5, 17	bitri 240	. . . . 5 |- (((_V X.k _V) i^i x) = Sk <-> A.yA.z(<<y, z>> e. x <-> A.w(w e. y -> w e. z)))
19	18	biimpri 197	. . . 4 |- (A.yA.z(<<y, z>> e. x <-> A.w(w e. y -> w e. z)) -> ((_V X.k _V) i^i x) = Sk )
20		vvex 4109	. . . . . 6 |- _V e. _V
21		xpkvexg 4285	. . . . . 6 |- (_V e. _V -> (_V X.k _V) e. _V)
22	20, 21	ax-mp 8	. . . . 5 |- (_V X.k _V) e. _V
23		vex 2862	. . . . 5 |- x e. _V
24	22, 23	inex 4105	. . . 4 |- ((_V X.k _V) i^i x) e. _V
25	19, 24	syl6eqelr 2442	. . 3 |- (A.yA.z(<<y, z>> e. x <-> A.w(w e. y -> w e. z)) -> Sk e. _V)
26	25	exlimiv 1634	. 2 |- (E.xA.yA.z(<<y, z>> e. x <-> A.w(w e. y -> w e. z)) -> Sk e. _V)
27	1, 26	ax-mp 8	1 |- Sk e. _V

Syntax hints:   -> wi 4   <-> wb 176  A.wal 1540  E.wex 1541   = wceq 1642   e. wcel 1710  _Vcvv 2859   i^i cin 3208   C_ wss 3257  <<copk 4057   X._k cxpk 4174   S_k cssetk 4183

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 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 4078  ax-xp 4079  ax-sset 4082  ax-sn 4087

This theorem 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 2478  df-ne 2518  df-ral 2619  df-rex 2620  df-v 2861  df-nin 3211  df-compl 3212  df-in 3213  df-un 3214  df-dif 3215  df-ss 3259  df-nul 3551  df-sn 3741  df-pr 3742  df-opk 4058  df-xpk 4185  df-ssetk 4193

This theorem is referenced by:  imagekexg  4311  idkex  4314  uniexg  4316  intexg  4319  setswithex  4322  pwexg  4328  addcexlem  4382  nncex  4396  nnsucelrlem1  4424  nndisjeq  4429  ltfinex  4464  ssfin  4470  ncfinraiselem2  4480  ncfinlowerlem1  4482  tfinrelkex  4487  evenfinex  4503  oddfinex  4504  evenodddisjlem1  4515  nnadjoinlem1  4519  nnpweqlem1  4522  srelkex  4525  tfinnnlem1  4533  spfinex  4537  opexg  4587  proj2exg  4592  setconslem5  4735  1stex  4739  swapex  4742  ssetex  4744