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

Theorem axinfnd 3752
Description: A version of the Axiom of Infinity with no distinct variable conditions.
Assertion
Ref Expression
axinfnd x(yz → (yx ∧ ∀y(yx → ∃z(yzzx))))

Proof of Theorem axinfnd
StepHypRef Expression
1 axinfndlem1 3751 . . . . . . 7 (∀x wz → ∃x(wx ∧ ∀w(wx → ∃z(wzzx))))
21ax-gen 677 . . . . . 6 w(∀x wz → ∃x(wx ∧ ∀w(wx → ∃z(wzzx))))
3 eq6 826 . . . . . . . 8 (¬ ∀y y = x → ∀y ¬ ∀y y = x)
4 eq6 826 . . . . . . . 8 (¬ ∀y y = z → ∀y ¬ ∀y y = z)
53, 4hban 704 . . . . . . 7 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → ∀y(¬ ∀y y = x ∧ ¬ ∀y y = z))
6 eq6 826 . . . . . . . . . 10 (¬ ∀y y = z → ∀x ¬ ∀y y = z)
7 ddeel2 1004 . . . . . . . . . 10 (¬ ∀y y = z → (wz → ∀y wz))
86, 7hbald 790 . . . . . . . . 9 (¬ ∀y y = z → (∀x wz → ∀yx wz))
98adantl 305 . . . . . . . 8 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (∀x wz → ∀yx wz))
10 eq6 826 . . . . . . . . . 10 (¬ ∀y y = x → ∀x ¬ ∀y y = x)
1110, 6hban 704 . . . . . . . . 9 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → ∀x(¬ ∀y y = x ∧ ¬ ∀y y = z))
12 ddeel2 1004 . . . . . . . . . . 11 (¬ ∀y y = x → (wx → ∀y wx))
1312adantr 306 . . . . . . . . . 10 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (wx → ∀y wx))
14 ax-17 925 . . . . . . . . . . 11 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → ∀w(¬ ∀y y = x ∧ ¬ ∀y y = z))
15 eq6 826 . . . . . . . . . . . . . 14 (¬ ∀y y = x → ∀z ¬ ∀y y = x)
16 eq6 826 . . . . . . . . . . . . . 14 (¬ ∀y y = z → ∀z ¬ ∀y y = z)
1715, 16hban 704 . . . . . . . . . . . . 13 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → ∀z(¬ ∀y y = x ∧ ¬ ∀y y = z))
187adantl 305 . . . . . . . . . . . . . 14 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (wz → ∀y wz))
19 ax15 1006 . . . . . . . . . . . . . . . 16 (¬ ∀y y = z → (¬ ∀y y = x → (zx → ∀y zx)))
2019com12 13 . . . . . . . . . . . . . . 15 (¬ ∀y y = x → (¬ ∀y y = z → (zx → ∀y zx)))
2120imp 277 . . . . . . . . . . . . . 14 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (zx → ∀y zx))
2218, 21hband 788 . . . . . . . . . . . . 13 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → ((wzzx) → ∀y(wzzx)))
2317, 22hbexd 791 . . . . . . . . . . . 12 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (∃z(wzzx) → ∀yz(wzzx)))
245, 13, 23hbimd 787 . . . . . . . . . . 11 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → ((wx → ∃z(wzzx)) → ∀y(wx → ∃z(wzzx))))
2514, 24hbald 790 . . . . . . . . . 10 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (∀w(wx → ∃z(wzzx)) → ∀yw(wx → ∃z(wzzx))))
2613, 25hband 788 . . . . . . . . 9 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → ((wx ∧ ∀w(wx → ∃z(wzzx))) → ∀y(wx ∧ ∀w(wx → ∃z(wzzx)))))
2711, 26hbexd 791 . . . . . . . 8 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (∃x(wx ∧ ∀w(wx → ∃z(wzzx))) → ∀yx(wx ∧ ∀w(wx → ∃z(wzzx)))))
285, 9, 27hbimd 787 . . . . . . 7 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → ((∀x wz → ∃x(wx ∧ ∀w(wx → ∃z(wzzx)))) → ∀y(∀x wz → ∃x(wx ∧ ∀w(wx → ∃z(wzzx))))))
29 nd5 3736 . . . . . . . . . . 11 (¬ ∀y y = x → (w = y → ∀x w = y))
3029adantr 306 . . . . . . . . . 10 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (w = y → ∀x w = y))
3130imdistani 340 . . . . . . . . 9 (((¬ ∀y y = x ∧ ¬ ∀y y = z) ∧ w = y) → ((¬ ∀y y = x ∧ ¬ ∀y y = z) ∧ ∀x w = y))
32 hba1 698 . . . . . . . . . . . 12 (∀x w = y → ∀xx w = y)
33 a13b 819 . . . . . . . . . . . . 13 (w = y → (wzyz))
3433a4s 682 . . . . . . . . . . . 12 (∀x w = y → (wzyz))
3532, 34biald 782 . . . . . . . . . . 11 (∀x w = y → (∀x wz ↔ ∀x yz))
3635adantl 305 . . . . . . . . . 10 (((¬ ∀y y = x ∧ ¬ ∀y y = z) ∧ ∀x w = y) → (∀x wz ↔ ∀x yz))
3711, 32hban 704 . . . . . . . . . . 11 (((¬ ∀y y = x ∧ ¬ ∀y y = z) ∧ ∀x w = y) → ∀x((¬ ∀y y = x ∧ ¬ ∀y y = z) ∧ ∀x w = y))
38 a13b 819 . . . . . . . . . . . . 13 (w = y → (wxyx))
3938a4s 682 . . . . . . . . . . . 12 (∀x w = y → (wxyx))
4038adantl 305 . . . . . . . . . . . . . . . 16 ((¬ ∀y y = zw = y) → (wxyx))
41 nd5 3736 . . . . . . . . . . . . . . . . . 18 (¬ ∀y y = z → (w = y → ∀z w = y))
4241imdistani 340 . . . . . . . . . . . . . . . . 17 ((¬ ∀y y = zw = y) → (¬ ∀y y = z ∧ ∀z w = y))
43 hba1 698 . . . . . . . . . . . . . . . . . . 19 (∀z w = y → ∀zz w = y)
4433anbi1d 469 . . . . . . . . . . . . . . . . . . . 20 (w = y → ((wzzx) ↔ (yzzx)))
4544a4s 682 . . . . . . . . . . . . . . . . . . 19 (∀z w = y → ((wzzx) ↔ (yzzx)))
4643, 45biexd 783 . . . . . . . . . . . . . . . . . 18 (∀z w = y → (∃z(wzzx) ↔ ∃z(yzzx)))
4746adantl 305 . . . . . . . . . . . . . . . . 17 ((¬ ∀y y = z ∧ ∀z w = y) → (∃z(wzzx) ↔ ∃z(yzzx)))
4842, 47syl 12 . . . . . . . . . . . . . . . 16 ((¬ ∀y y = zw = y) → (∃z(wzzx) ↔ ∃z(yzzx)))
4940, 48imbi12d 474 . . . . . . . . . . . . . . 15 ((¬ ∀y y = zw = y) → ((wx → ∃z(wzzx)) ↔ (yx → ∃z(yzzx))))
5049adantll 309 . . . . . . . . . . . . . 14 (((¬ ∀y y = x ∧ ¬ ∀y y = z) ∧ w = y) → ((wx → ∃z(wzzx)) ↔ (yx → ∃z(yzzx))))
5150exp 291 . . . . . . . . . . . . 13 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (w = y → ((wx → ∃z(wzzx)) ↔ (yx → ∃z(yzzx)))))
525, 24, 51cbvald 977 . . . . . . . . . . . 12 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (∀w(wx → ∃z(wzzx)) ↔ ∀y(yx → ∃z(yzzx))))
5339, 52bi2anan9r 479 . . . . . . . . . . 11 (((¬ ∀y y = x ∧ ¬ ∀y y = z) ∧ ∀x w = y) → ((wx ∧ ∀w(wx → ∃z(wzzx))) ↔ (yx ∧ ∀y(yx → ∃z(yzzx)))))
5437, 53biexd 783 . . . . . . . . . 10 (((¬ ∀y y = x ∧ ¬ ∀y y = z) ∧ ∀x w = y) → (∃x(wx ∧ ∀w(wx → ∃z(wzzx))) ↔ ∃x(yx ∧ ∀y(yx → ∃z(yzzx)))))
5536, 54imbi12d 474 . . . . . . . . 9 (((¬ ∀y y = x ∧ ¬ ∀y y = z) ∧ ∀x w = y) → ((∀x wz → ∃x(wx ∧ ∀w(wx → ∃z(wzzx)))) ↔ (∀x yz → ∃x(yx ∧ ∀y(yx → ∃z(yzzx))))))
5631, 55syl 12 . . . . . . . 8 (((¬ ∀y y = x ∧ ¬ ∀y y = z) ∧ w = y) → ((∀x wz → ∃x(wx ∧ ∀w(wx → ∃z(wzzx)))) ↔ (∀x yz → ∃x(yx ∧ ∀y(yx → ∃z(yzzx))))))
5756exp 291 . . . . . . 7 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (w = y → ((∀x wz → ∃x(wx ∧ ∀w(wx → ∃z(wzzx)))) ↔ (∀x yz → ∃x(yx ∧ ∀y(yx → ∃z(yzzx)))))))
585, 28, 57cbvald 977 . . . . . 6 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (∀w(∀x wz → ∃x(wx ∧ ∀w(wx → ∃z(wzzx)))) ↔ ∀y(∀x yz → ∃x(yx ∧ ∀y(yx → ∃z(yzzx))))))
592, 58mpbii 168 . . . . 5 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → ∀y(∀x yz → ∃x(yx ∧ ∀y(yx → ∃z(yzzx)))))
605919.21bi 742 . . . 4 ((¬ ∀y y = x ∧ ¬ ∀y y = z) → (∀x yz → ∃x(yx ∧ ∀y(yx → ∃z(yzzx)))))
6160exp 291 . . 3 (¬ ∀y y = x → (¬ ∀y y = z → (∀x yz → ∃x(yx ∧ ∀y(yx → ∃z(yzzx))))))
62 nd1 3732 . . . . 5 (∀x x = y → ¬ ∀x yz)
6362eq4s 822 . . . 4 (∀y y = x → ¬ ∀x yz)
6463pm2.21d 74 . . 3 (∀y y = x → (∀x yz → ∃x(yx ∧ ∀y(yx → ∃z(yzzx)))))
65 nd3 3734 . . . 4 (∀y y = z → ¬ ∀x yz)
6665pm2.21d 74 . . 3 (∀y y = z → (∀x yz → ∃x(yx ∧ ∀y(yx → ∃z(yzzx)))))
6761, 64, 66pm2.61ii 113 . 2 (∀x yz → ∃x(yx ∧ ∀y(yx → ∃z(yzzx))))
686719.35ri 756 1 x(yz → (yx ∧ ∀y(yx → ∃z(yzzx))))
Colors of variables: wff set class
Syntax hints:  ¬ wn 1   → wi 2   ↔ wb 127   ∧ wa 196  ∀wal 672  ∃wex 678   = weq 797   ∈ wel 803
This theorem is referenced by:  zfcndinf 3764
This theorem was proved from axioms:  ax-1 3  ax-2 4  ax-3 5  ax-mp 6  ax-4 673  ax-5 674  ax-6 675  ax-7 676  ax-gen 677  ax-8 798  ax-9 799  ax-10 800  ax-11 801  ax-12 802  ax-13 804  ax-14 805  ax-16 922  ax-17 925  ax-ext 1074  ax-rep 1075  ax-pow 1077  ax-reg 1078  ax-inf 1079
This theorem depends on definitions:  df-bi 128  df-or 197  df-an 198  df-ex 679  df-sb 853  df-clab 1093  df-cleq 1097  df-clel 1099  df-ral 1205  df-rex 1206  df-v 1349  df-dif 1489  df-un 1490  df-in 1491  df-ss 1492  df-nul 1708  df-pw 1799  df-sn 1811  df-pr 1812
metamath.org