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

Theorem kmlem12 9240
Description: Lemma for 5-quantifier AC of Kurt Maes, Th. 4, part of 3 => 4. (Contributed by NM, 27-Mar-2004.)
Hypothesis
Ref Expression
kmlem9.1 𝐴 = {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))}
Assertion
Ref Expression
kmlem12 (∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → (∀𝑧𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) → ∀𝑧𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)))))
Distinct variable groups:   𝑥,𝑦,𝑧,𝑣,𝑢,𝑡   𝑦,𝐴,𝑧,𝑣
Allowed substitution hints:   𝐴(𝑥,𝑢,𝑡)

Proof of Theorem kmlem12
StepHypRef Expression
1 difeq1 3885 . . . . . . 7 (𝑡 = 𝑧 → (𝑡 (𝑥 ∖ {𝑡})) = (𝑧 (𝑥 ∖ {𝑡})))
2 sneq 4346 . . . . . . . . . 10 (𝑡 = 𝑧 → {𝑡} = {𝑧})
32difeq2d 3892 . . . . . . . . 9 (𝑡 = 𝑧 → (𝑥 ∖ {𝑡}) = (𝑥 ∖ {𝑧}))
43unieqd 4606 . . . . . . . 8 (𝑡 = 𝑧 (𝑥 ∖ {𝑡}) = (𝑥 ∖ {𝑧}))
54difeq2d 3892 . . . . . . 7 (𝑡 = 𝑧 → (𝑧 (𝑥 ∖ {𝑡})) = (𝑧 (𝑥 ∖ {𝑧})))
61, 5eqtrd 2799 . . . . . 6 (𝑡 = 𝑧 → (𝑡 (𝑥 ∖ {𝑡})) = (𝑧 (𝑥 ∖ {𝑧})))
76neeq1d 2996 . . . . 5 (𝑡 = 𝑧 → ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ ↔ (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅))
87cbvralv 3319 . . . 4 (∀𝑡𝑥 (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ ↔ ∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅)
96ineq1d 3977 . . . . . . 7 (𝑡 = 𝑧 → ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦) = ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦))
109eleq2d 2830 . . . . . 6 (𝑡 = 𝑧 → (𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦)))
1110eubidv 2585 . . . . 5 (𝑡 = 𝑧 → (∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ ∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦)))
1211cbvralv 3319 . . . 4 (∀𝑡𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ ∀𝑧𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦))
138, 12imbi12i 341 . . 3 ((∀𝑡𝑥 (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)) ↔ (∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦)))
14 in12 3986 . . . . . . . . . 10 (𝑧 ∩ (𝑦 𝐴)) = (𝑦 ∩ (𝑧 𝐴))
15 incom 3969 . . . . . . . . . 10 (𝑦 ∩ (𝑧 𝐴)) = ((𝑧 𝐴) ∩ 𝑦)
1614, 15eqtri 2787 . . . . . . . . 9 (𝑧 ∩ (𝑦 𝐴)) = ((𝑧 𝐴) ∩ 𝑦)
17 kmlem9.1 . . . . . . . . . . 11 𝐴 = {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))}
1817kmlem11 9239 . . . . . . . . . 10 (𝑧𝑥 → (𝑧 𝐴) = (𝑧 (𝑥 ∖ {𝑧})))
1918ineq1d 3977 . . . . . . . . 9 (𝑧𝑥 → ((𝑧 𝐴) ∩ 𝑦) = ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦))
2016, 19syl5req 2812 . . . . . . . 8 (𝑧𝑥 → ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦) = (𝑧 ∩ (𝑦 𝐴)))
2120eleq2d 2830 . . . . . . 7 (𝑧𝑥 → (𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦) ↔ 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴))))
2221eubidv 2585 . . . . . 6 (𝑧𝑥 → (∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦) ↔ ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴))))
23 ax-1 6 . . . . . 6 (∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴))))
2422, 23syl6bi 244 . . . . 5 (𝑧𝑥 → (∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)))))
2524ralimia 3097 . . . 4 (∀𝑧𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦) → ∀𝑧𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴))))
2625imim2i 16 . . 3 ((∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦)) → (∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)))))
2713, 26sylbi 208 . 2 ((∀𝑡𝑥 (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)) → (∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)))))
2817raleqi 3290 . . . 4 (∀𝑧𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) ↔ ∀𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)))
29 df-ral 3060 . . . 4 (∀𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) ↔ ∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
30 vex 3353 . . . . . . . . 9 𝑧 ∈ V
31 eqeq1 2769 . . . . . . . . . 10 (𝑢 = 𝑧 → (𝑢 = (𝑡 (𝑥 ∖ {𝑡})) ↔ 𝑧 = (𝑡 (𝑥 ∖ {𝑡}))))
3231rexbidv 3199 . . . . . . . . 9 (𝑢 = 𝑧 → (∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡})) ↔ ∃𝑡𝑥 𝑧 = (𝑡 (𝑥 ∖ {𝑡}))))
3330, 32elab 3507 . . . . . . . 8 (𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} ↔ ∃𝑡𝑥 𝑧 = (𝑡 (𝑥 ∖ {𝑡})))
3433imbi1i 340 . . . . . . 7 ((𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ (∃𝑡𝑥 𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
35 r19.23v 3170 . . . . . . 7 (∀𝑡𝑥 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ (∃𝑡𝑥 𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
3634, 35bitr4i 269 . . . . . 6 ((𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ∀𝑡𝑥 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
3736albii 1914 . . . . 5 (∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ∀𝑧𝑡𝑥 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
38 ralcom4 3377 . . . . 5 (∀𝑡𝑥𝑧(𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ∀𝑧𝑡𝑥 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
39 vex 3353 . . . . . . . 8 𝑡 ∈ V
4039difexi 4972 . . . . . . 7 (𝑡 (𝑥 ∖ {𝑡})) ∈ V
41 neeq1 2999 . . . . . . . 8 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ ↔ (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅))
42 ineq1 3971 . . . . . . . . . 10 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧𝑦) = ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦))
4342eleq2d 2830 . . . . . . . . 9 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑣 ∈ (𝑧𝑦) ↔ 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
4443eubidv 2585 . . . . . . . 8 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (∃!𝑣 𝑣 ∈ (𝑧𝑦) ↔ ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
4541, 44imbi12d 335 . . . . . . 7 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → ((𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) ↔ ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦))))
4640, 45ceqsalv 3386 . . . . . 6 (∀𝑧(𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
4746ralbii 3127 . . . . 5 (∀𝑡𝑥𝑧(𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ∀𝑡𝑥 ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
4837, 38, 473bitr2i 290 . . . 4 (∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ∀𝑡𝑥 ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
4928, 29, 483bitri 288 . . 3 (∀𝑧𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) ↔ ∀𝑡𝑥 ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
50 ralim 3095 . . 3 (∀𝑡𝑥 ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)) → (∀𝑡𝑥 (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
5149, 50sylbi 208 . 2 (∀𝑧𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) → (∀𝑡𝑥 (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
5227, 51syl11 33 1 (∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → (∀𝑧𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) → ∀𝑧𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wal 1650   = wceq 1652  wcel 2155  ∃!weu 2581  {cab 2751  wne 2937  wral 3055  wrex 3056  cdif 3731  cin 3733  c0 4081  {csn 4336   cuni 4596
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1890  ax-4 1904  ax-5 2005  ax-6 2070  ax-7 2105  ax-9 2164  ax-10 2183  ax-11 2198  ax-12 2211  ax-13 2352  ax-ext 2743  ax-sep 4943
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 874  df-3an 1109  df-tru 1656  df-ex 1875  df-nf 1879  df-sb 2063  df-mo 2565  df-eu 2582  df-clab 2752  df-cleq 2758  df-clel 2761  df-nfc 2896  df-ne 2938  df-ral 3060  df-rex 3061  df-rab 3064  df-v 3352  df-sbc 3599  df-dif 3737  df-un 3739  df-in 3741  df-ss 3748  df-nul 4082  df-sn 4337  df-uni 4597  df-iun 4680
This theorem is referenced by:  kmlem13  9241
  Copyright terms: Public domain W3C validator