HomeHome Metamath Proof Explorer < Previous   Next >
Related theorems
Unicode version

Theorem ax11el 1406
Description: Basis step for constructing a substitution instance of ax-11o 1260 without using ax-11o 1260. Atomic formula for membership predicate.
Assertion
Ref Expression
ax11el |- (-. A.x x = y -> (x = y -> (z e. w -> A.x(x = y -> z e. w))))

Proof of Theorem ax11el
StepHypRef Expression
1 19.26 1108 . . 3 |- (A.x(x = z /\ x = w) <-> (A.x x = z /\ A.x x = w))
2 elequ1 1178 . . . . . . . . 9 |- (x = y -> (x e. x <-> y e. x))
3 elequ2 1179 . . . . . . . . 9 |- (x = y -> (y e. x <-> y e. y))
42, 3bitrd 539 . . . . . . . 8 |- (x = y -> (x e. x <-> y e. y))
54adantl 397 . . . . . . 7 |- ((-. A.x x = y /\ x = y) -> (x e. x <-> y e. y))
6 ax-17 1012 . . . . . . . . . 10 |- (v e. v -> A.x v e. v)
7 ax-17 1012 . . . . . . . . . 10 |- (y e. y -> A.v y e. y)
8 elequ1 1178 . . . . . . . . . . 11 |- (v = y -> (v e. v <-> y e. v))
9 elequ2 1179 . . . . . . . . . . 11 |- (v = y -> (y e. v <-> y e. y))
108, 9bitrd 539 . . . . . . . . . 10 |- (v = y -> (v e. v <-> y e. y))
116, 7, 10dvelimfALT 1195 . . . . . . . . 9 |- (-. A.x x = y -> (y e. y -> A.x y e. y))
124biimprcd 163 . . . . . . . . . 10 |- (y e. y -> (x = y -> x e. x))
131219.20i 1033 . . . . . . . . 9 |- (A.x y e. y -> A.x(x = y -> x e. x))
1411, 13syl6 22 . . . . . . . 8 |- (-. A.x x = y -> (y e. y -> A.x(x = y -> x e. x)))
1514adantr 398 . . . . . . 7 |- ((-. A.x x = y /\ x = y) -> (y e. y -> A.x(x = y -> x e. x)))
165, 15sylbid 210 . . . . . 6 |- ((-. A.x x = y /\ x = y) -> (x e. x -> A.x(x = y -> x e. x)))
1716adantl 397 . . . . 5 |- ((A.x(x = z /\ x = w) /\ (-. A.x x = y /\ x = y)) -> (x e. x -> A.x(x = y -> x e. x)))
18 elequ1 1178 . . . . . . . . 9 |- (x = z -> (x e. x <-> z e. x))
19 elequ2 1179 . . . . . . . . 9 |- (x = w -> (z e. x <-> z e. w))
2018, 19sylan9bb 551 . . . . . . . 8 |- ((x = z /\ x = w) -> (x e. x <-> z e. w))
2120a4s 1025 . . . . . . 7 |- (A.x(x = z /\ x = w) -> (x e. x <-> z e. w))
22 hba1 1044 . . . . . . . 8 |- (A.x(x = z /\ x = w) -> A.xA.x(x = z /\ x = w))
2321imbi2d 623 . . . . . . . 8 |- (A.x(x = z /\ x = w) -> ((x = y -> x e. x) <-> (x = y -> z e. w)))
2422, 23albid 1145 . . . . . . 7 |- (A.x(x = z /\ x = w) -> (A.x(x = y -> x e. x) <-> A.x(x = y -> z e. w)))
2521, 24imbi12d 637 . . . . . 6 |- (A.x(x = z /\ x = w) -> ((x e. x -> A.x(x = y -> x e. x)) <-> (z e. w -> A.x(x = y -> z e. w))))
2625adantr 398 . . . . 5 |- ((A.x(x = z /\ x = w) /\ (-. A.x x = y /\ x = y)) -> ((x e. x -> A.x(x = y -> x e. x)) <-> (z e. w -> A.x(x = y -> z e. w))))
2717, 26mpbid 202 . . . 4 |- ((A.x(x = z /\ x = w) /\ (-. A.x x = y /\ x = y)) -> (z e. w -> A.x(x = y -> z e. w)))
2827exp32 386 . . 3 |- (A.x(x = z /\ x = w) -> (-. A.x x = y -> (x = y -> (z e. w -> A.x(x = y -> z e. w)))))
291, 28sylbir 208 . 2 |- ((A.x x = z /\ A.x x = w) -> (-. A.x x = y -> (x = y -> (z e. w -> A.x(x = y -> z e. w)))))
30 elequ1 1178 . . . . . . 7 |- (x = y -> (x e. w <-> y e. w))
3130ad2antll 416 . . . . . 6 |- ((-. A.x x = w /\ (-. A.x x = y /\ x = y)) -> (x e. w <-> y e. w))
32 ax-15 1402 . . . . . . . . 9 |- (-. A.x x = y -> (-. A.x x = w -> (y e. w -> A.x y e. w)))
3332impcom 358 . . . . . . . 8 |- ((-. A.x x = w /\ -. A.x x = y) -> (y e. w -> A.x y e. w))
3433adantrr 404 . . . . . . 7 |- ((-. A.x x = w /\ (-. A.x x = y /\ x = y)) -> (y e. w -> A.x y e. w))
3530biimprcd 163 . . . . . . . 8 |- (y e. w -> (x = y -> x e. w))
363519.20i 1033 . . . . . . 7 |- (A.x y e. w -> A.x(x = y -> x e. w))
3734, 36syl6 22 . . . . . 6 |- ((-. A.x x = w /\ (-. A.x x = y /\ x = y)) -> (y e. w -> A.x(x = y -> x e. w)))
3831, 37sylbid 210 . . . . 5 |- ((-. A.x x = w /\ (-. A.x x = y /\ x = y)) -> (x e. w -> A.x(x = y -> x e. w)))
3938adantll 401 . . . 4 |- (((A.x x = z /\ -. A.x x = w) /\ (-. A.x x = y /\ x = y)) -> (x e. w -> A.x(x = y -> x e. w)))
40 elequ1 1178 . . . . . . 7 |- (x = z -> (x e. w <-> z e. w))
4140a4s 1025 . . . . . 6 |- (A.x x = z -> (x e. w <-> z e. w))
4241imbi2d 623 . . . . . . 7 |- (A.x x = z -> ((x = y -> x e. w) <-> (x = y -> z e. w)))
4342dral2 1197 . . . . . 6 |- (A.x x = z -> (A.x(x = y -> x e. w) <-> A.x(x = y -> z e. w)))
4441, 43imbi12d 637 . . . . 5 |- (A.x x = z -> ((x e. w -> A.x(x = y -> x e. w)) <-> (z e. w -> A.x(x = y -> z e. w))))
4544ad2antrr 413 . . . 4 |- (((A.x x = z /\ -. A.x x = w) /\ (-. A.x x = y /\ x = y)) -> ((x e. w -> A.x(x = y -> x e. w)) <-> (z e. w -> A.x(x = y -> z e. w))))
4639, 45mpbid 202 . . 3 |- (((A.x x = z /\ -. A.x x = w) /\ (-. A.x x = y /\ x = y)) -> (z e. w -> A.x(x = y -> z e. w)))
4746exp32 386 . 2 |- ((A.x x = z /\ -. A.x x = w) -> (-. A.x x = y -> (x = y -> (z e. w -> A.x(x = y -> z e. w)))))
48 elequ2 1179 . . . . . . 7 |- (x = y -> (z e. x <-> z e. y))
4948ad2antll 416 . . . . . 6 |- ((-. A.x x = z /\ (-. A.x x = y /\ x = y)) -> (z e. x <-> z e. y))
50 ax-15 1402 . . . . . . . . 9 |- (-. A.x x = z -> (-. A.x x = y -> (z e. y -> A.x z e. y)))
5150imp 357 . . . . . . . 8 |- ((-. A.x x = z /\ -. A.x x = y) -> (z e. y -> A.x z e. y))
5251adantrr 404 . . . . . . 7 |- ((-. A.x x = z /\ (-. A.x x = y /\ x = y)) -> (z e. y -> A.x z e. y))
5348biimprcd 163 . . . . . . . 8 |- (z e. y -> (x = y -> z e. x))
545319.20i 1033 . . . . . . 7 |- (A.x z e. y -> A.x(x = y -> z e. x))
5552, 54syl6 22 . . . . . 6 |- ((-. A.x x = z /\ (-. A.x x = y /\ x = y)) -> (z e. y -> A.x(x = y -> z e. x)))
5649, 55sylbid 210 . . . . 5 |- ((-. A.x x = z /\ (-. A.x x = y /\ x = y)) -> (z e. x -> A.x(x = y -> z e. x)))
5756adantlr 402 . . . 4 |- (((-. A.x x = z /\ A.x x = w) /\ (-. A.x x = y /\ x = y)) -> (z e. x -> A.x(x = y -> z e. x)))
5819a4s 1025 . . . . . 6 |- (A.x x = w -> (z e. x <-> z e. w))
5958imbi2d 623 . . . . . . 7 |- (A.x x = w -> ((x = y -> z e. x) <-> (x = y -> z e. w)))
6059dral2 1197 . . . . . 6 |- (A.x x = w -> (A.x(x = y -> z e. x) <-> A.x(x = y -> z e. w)))
6158, 60imbi12d 637 . . . . 5 |- (A.x x = w -> ((z e. x -> A.x(x = y -> z e. x)) <-> (z e. w -> A.x(x = y -> z e. w))))
6261ad2antlr 414 . . . 4 |- (((-. A.x x = z /\ A.x x = w) /\ (-. A.x x = y /\ x = y)) -> ((z e. x -> A.x(x = y -> z e. x)) <-> (z e. w -> A.x(x = y -> z e. w))))
6357, 62mpbid 202 . . 3 |- ((