Theorem sbabel 1560

Description: Theorem to move a substitution in and out of a class abstraction.

Hypothesis

Ref	Expression
sbabel.1	|- (w e. A -> A.x w e. A)

Assertion

Ref	Expression
sbabel	|- ([y / x]{z | ph} e. A <-> {z | [y / x]ph} e. A)

Distinct variable groups:   w,A   x,w   x,z   y,z

Proof of Theorem sbabel

Step	Hyp	Ref	Expression
1		sbex 1330	. . 3 |- ([y / x]E.v(v = {z | ph} /\ v e. A) <-> E.v[y / x](v = {z | ph} /\ v e. A))
2		sban 1221	. . . . 5 |- ([y / x](v = {z | ph} /\ v e. A) <-> ([y / x]v = {z | ph} /\ [y / x]v e. A))
3		sbal 1329	. . . . . . . 8 |- ([y / x]A.z(z e. v <-> ph) <-> A.z[y / x](z e. v <-> ph))
4		ax-17 1190	. . . . . . . . . . 11 |- (z e. v -> A.x z e. v)
5	4	sbf 1169	. . . . . . . . . 10 |- ([y / x]z e. v <-> z e. v)
6	5	sbrbis 1225	. . . . . . . . 9 |- ([y / x](z e. v <-> ph) <-> (z e. v <-> [y / x]ph))
7	6	albii 975	. . . . . . . 8 |- (A.z[y / x](z e. v <-> ph) <-> A.z(z e. v <-> [y / x]ph))
8	3, 7	bitr 173	. . . . . . 7 |- ([y / x]A.z(z e. v <-> ph) <-> A.z(z e. v <-> [y / x]ph))
9		abeq2 1544	. . . . . . . 8 |- (v = {z | ph} <-> A.z(z e. v <-> ph))
10	9	sbbii 1157	. . . . . . 7 |- ([y / x]v = {z | ph} <-> [y / x]A.z(z e. v <-> ph))
11		abeq2 1544	. . . . . . 7 |- (v = {z | [y / x]ph} <-> A.z(z e. v <-> [y / x]ph))
12	8, 10, 11	3bitr4 183	. . . . . 6 |- ([y / x]v = {z | ph} <-> v = {z | [y / x]ph})
13		ax-17 1190	. . . . . . . 8 |- (w e. v -> A.x w e. v)
14		sbabel.1	. . . . . . . 8 |- (w e. A -> A.x w e. A)
15	13, 14	hbel 1542	. . . . . . 7 |- (v e. A -> A.x v e. A)
16	15	sbf 1169	. . . . . 6 |- ([y / x]v e. A <-> v e. A)
17	12, 16	anbi12i 481	. . . . 5 |- (([y / x]v = {z | ph} /\ [y / x]v e. A) <-> (v = {z | [y / x]ph} /\ v e. A))
18	2, 17	bitr 173	. . . 4 |- ([y / x](v = {z | ph} /\ v e. A) <-> (v = {z | [y / x]ph} /\ v e. A))
19	18	exbii 1027	. . 3 |- (E.v[y / x](v = {z | ph} /\ v e. A) <-> E.v(v = {z | [y / x]ph} /\ v e. A))
20	1, 19	bitr 173	. 2 |- ([y / x]E.v(v = {z | ph} /\ v e. A) <-> E.v(v = {z | [y / x]ph} /\ v e. A))
21		df-clel 1449	. . 3 |- ({z | ph} e. A <-> E.v(v = {z | ph} /\ v e. A))
22	21	sbbii 1157	. 2 |- ([y / x]{z | ph} e. A <-> [y / x]E.v(v = {z | ph} /\ v e. A))
23		df-clel 1449	. 2 |- ({z | [y / x]ph} e. A <-> E.v(v = {z | [y / x]ph} /\ v e. A))
24	20, 22, 23	3bitr4 183	1 |- ([y / x]{z | ph} e. A <-> {z | [y / x]ph} e. A)

Syntax hints:   -> wi 3   <-> wb 146   /\ wa 223  A.wal 950  E.wex 956   = wceq 1099   e. wcel 1105  [wsbc 1153  {cab 1440

This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-4 951  ax-5 952  ax-6 953  ax-7 954  ax-gen 955  ax-8 1101  ax-9 1102  ax-10 1103  ax-12 1104  ax-17 1190  ax-16 1194  ax-11o 1202  ax-ext 1436

This theorem depends on definitions:  df-bi 147  df-or 224  df-an 225  df-ex 957  df-sb 1155  df-clab 1441  df-cleq 1446  df-clel 1449

Copyright terms: Public domain