Theorem ralcom2 1768

Description: Commutation of restricted quantifiers. Note that x and y needn't be distinct (this makes the proof longer but illustrates the use of dvelim 1347).

Assertion

Ref	Expression
ralcom2	|- (A.x e. A A.y e. A ph -> A.y e. A A.x e. A ph)

Distinct variable groups:   y,A   x,A

Proof of Theorem ralcom2

Step	Hyp	Ref	Expression
1		id 59	. . . 4 |- (A.x(x e. A -> A.x(x e. A -> ph)) -> A.x(x e. A -> A.x(x e. A -> ph)))
2		eleq1 1526	. . . . . . . . . 10 |- (x = y -> (x e. A <-> y e. A))
3	2	a4s 981	. . . . . . . . 9 |- (A.x x = y -> (x e. A <-> y e. A))
4	3	imbi1d 611	. . . . . . . 8 |- (A.x x = y -> ((x e. A -> ph) <-> (y e. A -> ph)))
5	4	dral1 1150	. . . . . . 7 |- (A.x x = y -> (A.x(x e. A -> ph) <-> A.y(y e. A -> ph)))
6	5	imbi2d 610	. . . . . 6 |- (A.x x = y -> ((x e. A -> A.x(x e. A -> ph)) <-> (x e. A -> A.y(y e. A -> ph))))
7	6	dral2 1151	. . . . 5 |- (A.x x = y -> (A.x(x e. A -> A.x(x e. A -> ph)) <-> A.x(x e. A -> A.y(y e. A -> ph))))
8	3	imbi1d 611	. . . . . 6 |- (A.x x = y -> ((x e. A -> A.x(x e. A -> ph)) <-> (y e. A -> A.x(x e. A -> ph))))
9	8	dral1 1150	. . . . 5 |- (A.x x = y -> (A.x(x e. A -> A.x(x e. A -> ph)) <-> A.y(y e. A -> A.x(x e. A -> ph))))
10	7, 9	imbi12d 624	. . . 4 |- (A.x x = y -> ((A.x(x e. A -> A.x(x e. A -> ph)) -> A.x(x e. A -> A.x(x e. A -> ph))) <-> (A.x(x e. A -> A.y(y e. A -> ph)) -> A.y(y e. A -> A.x(x e. A -> ph)))))
11	1, 10	mpbii 193	. . 3 |- (A.x x = y -> (A.x(x e. A -> A.y(y e. A -> ph)) -> A.y(y e. A -> A.x(x e. A -> ph))))
12		hbnae 1143	. . . . . . 7 |- (-. A.x x = y -> A.x -. A.x x = y)
13	12	hbal 1002	. . . . . 6 |- (A.y -. A.x x = y -> A.xA.y -. A.x x = y)
14		hbnae 1143	. . . . . . . 8 |- (-. A.x x = y -> A.y -. A.x x = y)
15		ax-17 968	. . . . . . . . . 10 |- (z e. A -> A.y z e. A)
16		eleq1 1526	. . . . . . . . . 10 |- (z = x -> (z e. A <-> x e. A))
17	15, 16	dvelim 1347	. . . . . . . . 9 |- (-. A.y y = x -> (x e. A -> A.y x e. A))
18	17	nalequcoms 1140	. . . . . . . 8 |- (-. A.x x = y -> (x e. A -> A.y x e. A))
19		hba1 1000	. . . . . . . . 9 |- (A.y(y e. A -> ph) -> A.yA.y(y e. A -> ph))
20	19	a1i 8	. . . . . . . 8 |- (-. A.x x = y -> (A.y(y e. A -> ph) -> A.yA.y(y e. A -> ph)))
21	14, 18, 20	hbimd 1106	. . . . . . 7 |- (-. A.x x = y -> ((x e. A -> A.y(y e. A -> ph)) -> A.y(x e. A -> A.y(y e. A -> ph))))
22	21	a4s 981	. . . . . 6 |- (A.y -. A.x x = y -> ((x e. A -> A.y(y e. A -> ph)) -> A.y(x e. A -> A.y(y e. A -> ph))))
23	13, 22	hbald 1109	. . . . 5 |- (A.y -. A.x x = y -> (A.x(x e. A -> A.y(y e. A -> ph)) -> A.yA.x(x e. A -> A.y(y e. A -> ph))))
24		ax-17 968	. . . . . . . 8 |- (z e. A -> A.x z e. A)
25		eleq1 1526	. . . . . . . 8 |- (z = y -> (z e. A <-> y e. A))
26	24, 25	dvelim 1347	. . . . . . 7 |- (-. A.x x = y -> (y e. A -> A.x y e. A))
27		ax-4 970	. . . . . . . . . 10 |- (A.y(y e. A -> ph) -> (y e. A -> ph))
28	27	imim2i 17	. . . . . . . . 9 |- ((x e. A -> A.y(y e. A -> ph)) -> (x e. A -> (y e. A -> ph)))
29	28	com23 32	. . . . . . . 8 |- ((x e. A -> A.y(y e. A -> ph)) -> (y e. A -> (x e. A -> ph)))
30	29	19.20ii 992	. . . . . . 7 |- (A.x(x e. A -> A.y(y e. A -> ph)) -> (A.x y e. A -> A.x(x e. A -> ph)))
31	26, 30	syl9 57	. . . . . 6 |- (-. A.x x = y -> (A.x(x e. A -> A.y(y e. A -> ph)) -> (y e. A -> A.x(x e. A -> ph))))
32	31	19.20ii 992	. . . . 5 |- (A.y -. A.x x = y -> (A.yA.x(x e. A -> A.y(y e. A -> ph)) -> A.y(y e. A -> A.x(x e. A -> ph))))
33	23, 32	syld 27	. . . 4 |- (A.y -. A.x x = y -> (A.x(x e. A -> A.y(y e. A -> ph)) -> A.y(y e. A -> A.x(x e. A -> ph))))
34	33	hbnaes 1144	. . 3 |- (-. A.x x = y -> (A.x(x e. A -> A.y(y e. A -> ph)) -> A.y(y e. A -> A.x(x e. A -> ph))))
35	11, 34	pm2.61i 126	. 2 |- (A.x(x e. A -> A.y(y e. A -> ph)) -> A.y(y e. A -> A.x(x e. A -> ph)))
36		df-ral 1641	. . 3 |- (A.x e. A A.y e. A ph <-> A.x(x e. A -> A.y e. A ph))
37		df-ral 1641	. . . . 5 |- (A.y e. A ph <-> A.y(y e. A -> ph))
38	37	imbi2i 185	. . . 4 |- ((x e. A -> A.y e. A ph) <-> (x e. A -> A.y(y e. A -> ph)))
39	38	albii 996	. . 3 |- (A.x(x e. A -> A.y e. A ph) <-> A.x(x e. A -> A.y(y e. A -> ph)))
40	36, 39	bitr 173	. 2 |- (A.x e. A A.y e. A ph <-> A.x(x e. A -> A.y(y e. A -> ph)))
41		df-ral 1641	. . 3 |- (A.y e. A A.x e. A ph <-> A.y(y e. A -> A.x e. A ph))
42		df-ral 1641	. . . . 5 |- (A.x e. A ph <-> A.x(x e. A -> ph))
43	42	imbi2i 185	. . . 4 |- ((y e. A -> A.x e. A ph) <-> (y e. A -> A.x(x e. A -> ph)))
44	43	albii 996	. . 3 |- (A.y(y e. A -> A.x e. A ph) <-> A.y(y e. A -> A.x(x e. A -> ph)))
45	41, 44	bitr 173	. 2 |- (A.y e. A A.x e. A ph <-> A.y(y e. A -> A.x(x e. A -> ph)))
46	35, 40, 45	3imtr4 219	1 |- (A.x e. A A.y e. A ph -> A.y e. A A.x e. A ph)

Syntax hints:  -. wn 2   -> wi 3   <-> wb 146  A.wal 951   = wceq 953   e. wcel 955  A.wral 1637

This theorem is referenced by:  tz7.48lem 3940

This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 959  ax-gen 960  ax-8 961  ax-10 963  ax-12 965  ax-17 968  ax-4 970  ax-5o 972  ax-6o 975  ax-9o 1119  ax-10o 1136  ax-11o 1213  ax-ext 1452

This theorem depends on definitions:  df-bi 147  df-an 225  df-ex 978  df-sb 1168  df-cleq 1462  df-clel 1465  df-ral 1641

Copyright terms: Public domain