Users' Mathboxes Mathbox for BTernaryTau < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  fineqvrep Structured version   Visualization version   GIF version

Theorem fineqvrep 35643
Description: If all sets are finite, then the Axiom of Replacement becomes redundant. (Contributed by BTernaryTau, 12-Sep-2024.)
Assertion
Ref Expression
fineqvrep (Fin = V → (∀𝑤𝑦𝑧(∀𝑦𝜑𝑧 = 𝑦) → ∃𝑦𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ∀𝑦𝜑))))
Distinct variable group:   𝑥,𝑤,𝑦,𝑧
Allowed substitution hints:   𝜑(𝑥, 𝑦, 𝑧, 𝑤)

Proof of Theorem fineqvrep
Dummy variables 𝑢 𝑣 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 funopab 6569 . . . 4 (Fun {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} ↔ ∀𝑤∃*𝑧𝑦𝜑)
2 nfa1 2188 . . . . . 6 𝑦𝑦𝜑
32mof 2588 . . . . 5 (∃*𝑧𝑦𝜑 ↔ ∃𝑦𝑧(∀𝑦𝜑𝑧 = 𝑦))
43albii 1852 . . . 4 (∀𝑤∃*𝑧𝑦𝜑 ↔ ∀𝑤𝑦𝑧(∀𝑦𝜑𝑧 = 𝑦))
51, 4bitr2i 279 . . 3 (∀𝑤𝑦𝑧(∀𝑦𝜑𝑧 = 𝑦) ↔ Fun {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})
6 vex 3454 . . . . . . 7 𝑥 ∈ V
7 eleq2w2 2756 . . . . . . 7 (Fin = V → (𝑥 ∈ Fin ↔ 𝑥 ∈ V))
86, 7mpbiri 261 . . . . . 6 (Fin = V → 𝑥 ∈ Fin)
9 imafi 9288 . . . . . 6 ((Fun {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} ∧ 𝑥 ∈ Fin) → ({⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} “ 𝑥) ∈ Fin)
108, 9sylan2 605 . . . . 5 ((Fun {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} ∧ Fin = V) → ({⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} “ 𝑥) ∈ Fin)
1110elexd 3473 . . . 4 ((Fun {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} ∧ Fin = V) → ({⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} “ 𝑥) ∈ V)
12 nfv 1947 . . . . . . . . . 10 𝑦 𝑤𝑥
132nfopab 5174 . . . . . . . . . . 11 𝑦{⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}
1413nfel2 2940 . . . . . . . . . 10 𝑦𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}
1512, 14nfan 1932 . . . . . . . . 9 𝑦(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})
1615nfex 2354 . . . . . . . 8 𝑦𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})
1716nfab 2928 . . . . . . 7 𝑦{𝑧 ∣ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})}
1817issetf 3467 . . . . . 6 ({𝑧 ∣ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})} ∈ V ↔ ∃𝑦 𝑦 = {𝑧 ∣ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})})
19 eqabb 2899 . . . . . . 7 (𝑦 = {𝑧 ∣ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})} ↔ ∀𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})))
2019exbii 1881 . . . . . 6 (∃𝑦 𝑦 = {𝑧 ∣ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})} ↔ ∃𝑦𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})))
21 opabidw 5502 . . . . . . . . . . 11 (⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} ↔ ∀𝑦𝜑)
2221anbi2i 635 . . . . . . . . . 10 ((𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}) ↔ (𝑤𝑥 ∧ ∀𝑦𝜑))
2322exbii 1881 . . . . . . . . 9 (∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}) ↔ ∃𝑤(𝑤𝑥 ∧ ∀𝑦𝜑))
2423bibi2i 340 . . . . . . . 8 ((𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})) ↔ (𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ∀𝑦𝜑)))
2524albii 1852 . . . . . . 7 (∀𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})) ↔ ∀𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ∀𝑦𝜑)))
2625exbii 1881 . . . . . 6 (∃𝑦𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})) ↔ ∃𝑦𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ∀𝑦𝜑)))
2718, 20, 263bitrri 301 . . . . 5 (∃𝑦𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ∀𝑦𝜑)) ↔ {𝑧 ∣ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})} ∈ V)
28 dfima3 6059 . . . . . . 7 ({⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} “ 𝑥) = {𝑣 ∣ ∃𝑢(𝑢𝑥 ∧ ⟨𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})}
29 nfv 1947 . . . . . . . . . 10 𝑧 𝑢𝑥
30 nfopab2 5176 . . . . . . . . . . 11 𝑧{⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}
3130nfel2 2940 . . . . . . . . . 10 𝑧𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}
3229, 31nfan 1932 . . . . . . . . 9 𝑧(𝑢𝑥 ∧ ⟨𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})
3332nfex 2354 . . . . . . . 8 𝑧𝑢(𝑢𝑥 ∧ ⟨𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})
34 nfv 1947 . . . . . . . 8 𝑣𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})
35 nfv 1947 . . . . . . . . . . 11 𝑤 𝑢𝑥
36 nfopab1 5175 . . . . . . . . . . . 12 𝑤{⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}
3736nfel2 2940 . . . . . . . . . . 11 𝑤𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}
3835, 37nfan 1932 . . . . . . . . . 10 𝑤(𝑢𝑥 ∧ ⟨𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})
39 nfv 1947 . . . . . . . . . 10 𝑢(𝑤𝑥 ∧ ⟨𝑤, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})
40 elequ1 2152 . . . . . . . . . . 11 (𝑢 = 𝑤 → (𝑢𝑥𝑤𝑥))
41 opeq1 4833 . . . . . . . . . . . 12 (𝑢 = 𝑤 → ⟨𝑢, 𝑣⟩ = ⟨𝑤, 𝑣⟩)
4241eleq1d 2845 . . . . . . . . . . 11 (𝑢 = 𝑤 → (⟨𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} ↔ ⟨𝑤, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}))
4340, 42anbi12d 644 . . . . . . . . . 10 (𝑢 = 𝑤 → ((𝑢𝑥 ∧ ⟨𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}) ↔ (𝑤𝑥 ∧ ⟨𝑤, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})))
4438, 39, 43cbvexv1 2371 . . . . . . . . 9 (∃𝑢(𝑢𝑥 ∧ ⟨𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}) ↔ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}))
45 opeq2 4834 . . . . . . . . . . . 12 (𝑣 = 𝑧 → ⟨𝑤, 𝑣⟩ = ⟨𝑤, 𝑧⟩)
4645eleq1d 2845 . . . . . . . . . . 11 (𝑣 = 𝑧 → (⟨𝑤, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} ↔ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}))
4746anbi2d 642 . . . . . . . . . 10 (𝑣 = 𝑧 → ((𝑤𝑥 ∧ ⟨𝑤, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}) ↔ (𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})))
4847exbidv 1954 . . . . . . . . 9 (𝑣 = 𝑧 → (∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}) ↔ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})))
4944, 48bitrid 286 . . . . . . . 8 (𝑣 = 𝑧 → (∃𝑢(𝑢𝑥 ∧ ⟨𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑}) ↔ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})))
5033, 34, 49cbvabw 2831 . . . . . . 7 {𝑣 ∣ ∃𝑢(𝑢𝑥 ∧ ⟨𝑢, 𝑣⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})} = {𝑧 ∣ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})}
5128, 50eqtri 2783 . . . . . 6 ({⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} “ 𝑥) = {𝑧 ∣ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})}
5251eleq1i 2851 . . . . 5 (({⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} “ 𝑥) ∈ V ↔ {𝑧 ∣ ∃𝑤(𝑤𝑥 ∧ ⟨𝑤, 𝑧⟩ ∈ {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑})} ∈ V)
5327, 52bitr4i 281 . . . 4 (∃𝑦𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ∀𝑦𝜑)) ↔ ({⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} “ 𝑥) ∈ V)
5411, 53sylibr 237 . . 3 ((Fun {⟨𝑤, 𝑧⟩ ∣ ∀𝑦𝜑} ∧ Fin = V) → ∃𝑦𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ∀𝑦𝜑)))
555, 54sylanb 593 . 2 ((∀𝑤𝑦𝑧(∀𝑦𝜑𝑧 = 𝑦) ∧ Fin = V) → ∃𝑦𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ∀𝑦𝜑)))
5655expcom 419 1 (Fin = V → (∀𝑤𝑦𝑧(∀𝑦𝜑𝑧 = 𝑦) → ∃𝑦𝑧(𝑧𝑦 ↔ ∃𝑤(𝑤𝑥 ∧ ∀𝑦𝜑))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  wal 1568   = wceq 1570  wex 1812  wcel 2145  ∃*wmo 2562  {cab 2738  Vcvv 3450  cop 4590  {copab 5167  cima 5658  Fun wfun 6527  Fincfn 8955
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-sep 5251  ax-nul 5263  ax-pr 5398  ax-un 7737
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-br 5104  df-opab 5168  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-om 7864  df-1o 8458  df-en 8956  df-dom 8957  df-fin 8959
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator