Theorem sbabel 1587

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 1350	. . 3 |- ([y / x]E.v(v = {z | ph} /\ v e. A) <-> E.v[y / x](v = {z | ph} /\ v e. A))
2		sban 1239	. . . . 5 |- ([y / x](v = {z | ph} /\ v e. A) <-> ([y / x]v = {z | ph} /\ [y / x]v e. A))
3		sbal 1349	. . . . . . . 8 |- ([y / x]A.z(z e. v <-> ph) <-> A.z[y / x](z e. v <-> ph))
4		ax-17 973	. . . . . . . . . . 11 |- (z e. v -> A.x z e. v)
5	4	sbf 1188	. . . . . . . . . 10 |- ([y / x]z e. v <-> z e. v)
6	5	sbrbis 1243	. . . . . . . . 9 |- ([y / x](z e. v <-> ph) <-> (z e. v <-> [y / x]ph))
7	6	albii 1001	. . . . . . . 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 1571	. . . . . . . 8 |- (v = {z | ph} <-> A.z(z e. v <-> ph))
10	9	sbbii 1176	. . . . . . 7 |- ([y / x]v = {z | ph} <-> [y / x]A.z(z e. v <-> ph))
11		abeq2 1571	. . . . . . 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 973	. . . . . . . 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 1569	. . . . . . 7 |- (v e. A -> A.x v e. A)
16	15	sbf 1188	. . . . . 6 |- ([y / x]v e. A <-> v e. A)
17	12, 16	anbi12i 484	. . . . 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 1053	. . 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 1475	. . 3 |- ({z | ph} e. A <-> E.v(v = {z | ph} /\ v e. A))
22	21	sbbii 1176	. 2 |- ([y / x]{z | ph} e. A <-> [y / x]E.v(v = {z | ph} /\ v e. A))
23		df-clel 1475	. 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 956   = wceq 958   e. wcel 960  E.wex 982  [wsbc 1172  {cab 1466

This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 964  ax-gen 965  ax-8 966  ax-9 967  ax-10 968  ax-12 970  ax-17 973  ax-4 975  ax-5o 977  ax-6o 980  ax-9o 1125  ax-10o 1142  ax-16 1212  ax-11o 1220  ax-ext 1462

This theorem depends on definitions:  df-bi 147  df-or 224  df-an 225  df-ex 983  df-sb 1174  df-clab 1467  df-cleq 1472  df-clel 1475

Copyright terms: Public domain