MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  vtoclgft Structured version   Visualization version   GIF version

Theorem vtoclgft 3512
Description: Closed theorem form of vtoclgf 3526. (Contributed by NM, 17-Feb-2013.) (Revised by Mario Carneiro, 12-Oct-2016.) (Proof shortened by JJ, 11-Aug-2021.) Avoid ax-13 2371. (Revised by Gino Giotto, 6-Oct-2023.)
Assertion
Ref Expression
vtoclgft (((𝑥𝐴 ∧ Ⅎ𝑥𝜓) ∧ (∀𝑥(𝑥 = 𝐴 → (𝜑𝜓)) ∧ ∀𝑥𝜑) ∧ 𝐴𝑉) → 𝜓)

Proof of Theorem vtoclgft
Dummy variable 𝑧 is distinct from all other variables.
StepHypRef Expression
1 elissetv 2819 . . . . 5 (𝐴𝑉 → ∃𝑧 𝑧 = 𝐴)
2 nfv 1918 . . . . . . . 8 𝑧𝑥𝐴
3 nfnfc1 2911 . . . . . . . 8 𝑥𝑥𝐴
4 nfcvd 2909 . . . . . . . . . 10 (𝑥𝐴𝑥𝑧)
5 id 22 . . . . . . . . . 10 (𝑥𝐴𝑥𝐴)
64, 5nfeqd 2918 . . . . . . . . 9 (𝑥𝐴 → Ⅎ𝑥 𝑧 = 𝐴)
76nfnd 1862 . . . . . . . 8 (𝑥𝐴 → Ⅎ𝑥 ¬ 𝑧 = 𝐴)
8 nfvd 1919 . . . . . . . 8 (𝑥𝐴 → Ⅎ𝑧 ¬ 𝑥 = 𝐴)
9 eqeq1 2741 . . . . . . . . . 10 (𝑧 = 𝑥 → (𝑧 = 𝐴𝑥 = 𝐴))
109notbid 318 . . . . . . . . 9 (𝑧 = 𝑥 → (¬ 𝑧 = 𝐴 ↔ ¬ 𝑥 = 𝐴))
1110a1i 11 . . . . . . . 8 (𝑥𝐴 → (𝑧 = 𝑥 → (¬ 𝑧 = 𝐴 ↔ ¬ 𝑥 = 𝐴)))
122, 3, 7, 8, 11cbv2w 2334 . . . . . . 7 (𝑥𝐴 → (∀𝑧 ¬ 𝑧 = 𝐴 ↔ ∀𝑥 ¬ 𝑥 = 𝐴))
13 alnex 1784 . . . . . . 7 (∀𝑧 ¬ 𝑧 = 𝐴 ↔ ¬ ∃𝑧 𝑧 = 𝐴)
14 alnex 1784 . . . . . . 7 (∀𝑥 ¬ 𝑥 = 𝐴 ↔ ¬ ∃𝑥 𝑥 = 𝐴)
1512, 13, 143bitr3g 313 . . . . . 6 (𝑥𝐴 → (¬ ∃𝑧 𝑧 = 𝐴 ↔ ¬ ∃𝑥 𝑥 = 𝐴))
1615con4bid 317 . . . . 5 (𝑥𝐴 → (∃𝑧 𝑧 = 𝐴 ↔ ∃𝑥 𝑥 = 𝐴))
171, 16imbitrid 243 . . . 4 (𝑥𝐴 → (𝐴𝑉 → ∃𝑥 𝑥 = 𝐴))
1817ad2antrr 725 . . 3 (((𝑥𝐴 ∧ Ⅎ𝑥𝜓) ∧ (∀𝑥(𝑥 = 𝐴 → (𝜑𝜓)) ∧ ∀𝑥𝜑)) → (𝐴𝑉 → ∃𝑥 𝑥 = 𝐴))
19183impia 1118 . 2 (((𝑥𝐴 ∧ Ⅎ𝑥𝜓) ∧ (∀𝑥(𝑥 = 𝐴 → (𝜑𝜓)) ∧ ∀𝑥𝜑) ∧ 𝐴𝑉) → ∃𝑥 𝑥 = 𝐴)
20 biimp 214 . . . . . . . . 9 ((𝜑𝜓) → (𝜑𝜓))
2120imim2i 16 . . . . . . . 8 ((𝑥 = 𝐴 → (𝜑𝜓)) → (𝑥 = 𝐴 → (𝜑𝜓)))
2221com23 86 . . . . . . 7 ((𝑥 = 𝐴 → (𝜑𝜓)) → (𝜑 → (𝑥 = 𝐴𝜓)))
2322imp 408 . . . . . 6 (((𝑥 = 𝐴 → (𝜑𝜓)) ∧ 𝜑) → (𝑥 = 𝐴𝜓))
2423alanimi 1819 . . . . 5 ((∀𝑥(𝑥 = 𝐴 → (𝜑𝜓)) ∧ ∀𝑥𝜑) → ∀𝑥(𝑥 = 𝐴𝜓))
25 19.23t 2204 . . . . . 6 (Ⅎ𝑥𝜓 → (∀𝑥(𝑥 = 𝐴𝜓) ↔ (∃𝑥 𝑥 = 𝐴𝜓)))
2625adantl 483 . . . . 5 ((𝑥𝐴 ∧ Ⅎ𝑥𝜓) → (∀𝑥(𝑥 = 𝐴𝜓) ↔ (∃𝑥 𝑥 = 𝐴𝜓)))
2724, 26imbitrid 243 . . . 4 ((𝑥𝐴 ∧ Ⅎ𝑥𝜓) → ((∀𝑥(𝑥 = 𝐴 → (𝜑𝜓)) ∧ ∀𝑥𝜑) → (∃𝑥 𝑥 = 𝐴𝜓)))
2827imp 408 . . 3 (((𝑥𝐴 ∧ Ⅎ𝑥𝜓) ∧ (∀𝑥(𝑥 = 𝐴 → (𝜑𝜓)) ∧ ∀𝑥𝜑)) → (∃𝑥 𝑥 = 𝐴𝜓))
29283adant3 1133 . 2 (((𝑥𝐴 ∧ Ⅎ𝑥𝜓) ∧ (∀𝑥(𝑥 = 𝐴 → (𝜑𝜓)) ∧ ∀𝑥𝜑) ∧ 𝐴𝑉) → (∃𝑥 𝑥 = 𝐴𝜓))
3019, 29mpd 15 1 (((𝑥𝐴 ∧ Ⅎ𝑥𝜓) ∧ (∀𝑥(𝑥 = 𝐴 → (𝜑𝜓)) ∧ ∀𝑥𝜑) ∧ 𝐴𝑉) → 𝜓)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 397  w3a 1088  wal 1540   = wceq 1542  wex 1782  wnf 1786  wcel 2107  wnfc 2888
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2708
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-ex 1783  df-nf 1787  df-cleq 2729  df-clel 2815  df-nfc 2890
This theorem is referenced by:  vtocldf  3513  bj-vtoclgfALT  35559
  Copyright terms: Public domain W3C validator