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

Theorem kmlem12 9775
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 4030 . . . . . . 7 (𝑡 = 𝑧 → (𝑡 (𝑥 ∖ {𝑡})) = (𝑧 (𝑥 ∖ {𝑡})))
2 sneq 4551 . . . . . . . . . 10 (𝑡 = 𝑧 → {𝑡} = {𝑧})
32difeq2d 4037 . . . . . . . . 9 (𝑡 = 𝑧 → (𝑥 ∖ {𝑡}) = (𝑥 ∖ {𝑧}))
43unieqd 4833 . . . . . . . 8 (𝑡 = 𝑧 (𝑥 ∖ {𝑡}) = (𝑥 ∖ {𝑧}))
54difeq2d 4037 . . . . . . 7 (𝑡 = 𝑧 → (𝑧 (𝑥 ∖ {𝑡})) = (𝑧 (𝑥 ∖ {𝑧})))
61, 5eqtrd 2777 . . . . . 6 (𝑡 = 𝑧 → (𝑡 (𝑥 ∖ {𝑡})) = (𝑧 (𝑥 ∖ {𝑧})))
76neeq1d 3000 . . . . 5 (𝑡 = 𝑧 → ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ ↔ (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅))
87cbvralvw 3358 . . . 4 (∀𝑡𝑥 (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ ↔ ∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅)
96ineq1d 4126 . . . . . . 7 (𝑡 = 𝑧 → ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦) = ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦))
109eleq2d 2823 . . . . . 6 (𝑡 = 𝑧 → (𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦)))
1110eubidv 2585 . . . . 5 (𝑡 = 𝑧 → (∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ ∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦)))
1211cbvralvw 3358 . . . 4 (∀𝑡𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ ∀𝑧𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦))
138, 12imbi12i 354 . . 3 ((∀𝑡𝑥 (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)) ↔ (∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦)))
14 in12 4135 . . . . . . . . . 10 (𝑧 ∩ (𝑦 𝐴)) = (𝑦 ∩ (𝑧 𝐴))
15 incom 4115 . . . . . . . . . 10 (𝑦 ∩ (𝑧 𝐴)) = ((𝑧 𝐴) ∩ 𝑦)
1614, 15eqtri 2765 . . . . . . . . 9 (𝑧 ∩ (𝑦 𝐴)) = ((𝑧 𝐴) ∩ 𝑦)
17 kmlem9.1 . . . . . . . . . . 11 𝐴 = {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))}
1817kmlem11 9774 . . . . . . . . . 10 (𝑧𝑥 → (𝑧 𝐴) = (𝑧 (𝑥 ∖ {𝑧})))
1918ineq1d 4126 . . . . . . . . 9 (𝑧𝑥 → ((𝑧 𝐴) ∩ 𝑦) = ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦))
2016, 19eqtr2id 2791 . . . . . . . 8 (𝑧𝑥 → ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦) = (𝑧 ∩ (𝑦 𝐴)))
2120eleq2d 2823 . . . . . . 7 (𝑧𝑥 → (𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦) ↔ 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴))))
2221eubidv 2585 . . . . . 6 (𝑧𝑥 → (∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦) ↔ ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴))))
23 ax-1 6 . . . . . 6 (∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴))))
2422, 23syl6bi 256 . . . . 5 (𝑧𝑥 → (∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)))))
2524ralimia 3081 . . . 4 (∀𝑧𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦) → ∀𝑧𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴))))
2625imim2i 16 . . 3 ((∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 (𝑥 ∖ {𝑧})) ∩ 𝑦)) → (∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)))))
2713, 26sylbi 220 . 2 ((∀𝑡𝑥 (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)) → (∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)))))
2817raleqi 3323 . . . 4 (∀𝑧𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) ↔ ∀𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)))
29 df-ral 3066 . . . 4 (∀𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) ↔ ∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
30 vex 3412 . . . . . . . . 9 𝑧 ∈ V
31 eqeq1 2741 . . . . . . . . . 10 (𝑢 = 𝑧 → (𝑢 = (𝑡 (𝑥 ∖ {𝑡})) ↔ 𝑧 = (𝑡 (𝑥 ∖ {𝑡}))))
3231rexbidv 3216 . . . . . . . . 9 (𝑢 = 𝑧 → (∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡})) ↔ ∃𝑡𝑥 𝑧 = (𝑡 (𝑥 ∖ {𝑡}))))
3330, 32elab 3587 . . . . . . . 8 (𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} ↔ ∃𝑡𝑥 𝑧 = (𝑡 (𝑥 ∖ {𝑡})))
3433imbi1i 353 . . . . . . 7 ((𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ (∃𝑡𝑥 𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
35 r19.23v 3198 . . . . . . 7 (∀𝑡𝑥 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ (∃𝑡𝑥 𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
3634, 35bitr4i 281 . . . . . 6 ((𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ∀𝑡𝑥 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
3736albii 1827 . . . . 5 (∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ∀𝑧𝑡𝑥 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
38 ralcom4 3157 . . . . 5 (∀𝑡𝑥𝑧(𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ∀𝑧𝑡𝑥 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))))
39 vex 3412 . . . . . . . 8 𝑡 ∈ V
4039difexi 5221 . . . . . . 7 (𝑡 (𝑥 ∖ {𝑡})) ∈ V
41 neeq1 3003 . . . . . . . 8 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ ↔ (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅))
42 ineq1 4120 . . . . . . . . . 10 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧𝑦) = ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦))
4342eleq2d 2823 . . . . . . . . 9 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑣 ∈ (𝑧𝑦) ↔ 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
4443eubidv 2585 . . . . . . . 8 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (∃!𝑣 𝑣 ∈ (𝑧𝑦) ↔ ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
4541, 44imbi12d 348 . . . . . . 7 (𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → ((𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) ↔ ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦))))
4640, 45ceqsalv 3443 . . . . . 6 (∀𝑧(𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
4746ralbii 3088 . . . . 5 (∀𝑡𝑥𝑧(𝑧 = (𝑡 (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ∀𝑡𝑥 ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
4837, 38, 473bitr2i 302 . . . 4 (∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡𝑥 𝑢 = (𝑡 (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦))) ↔ ∀𝑡𝑥 ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
4928, 29, 483bitri 300 . . 3 (∀𝑧𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) ↔ ∀𝑡𝑥 ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
50 ralim 3085 . . 3 (∀𝑡𝑥 ((𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)) → (∀𝑡𝑥 (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
5149, 50sylbi 220 . 2 (∀𝑧𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) → (∀𝑡𝑥 (𝑡 (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 (𝑥 ∖ {𝑡})) ∩ 𝑦)))
5227, 51syl11 33 1 (∀𝑧𝑥 (𝑧 (𝑥 ∖ {𝑧})) ≠ ∅ → (∀𝑧𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧𝑦)) → ∀𝑧𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 𝐴)))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wal 1541   = wceq 1543  wcel 2110  ∃!weu 2567  {cab 2714  wne 2940  wral 3061  wrex 3062  cdif 3863  cin 3865  c0 4237  {csn 4541   cuni 4819
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2708  ax-sep 5192
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2816  df-ne 2941  df-ral 3066  df-rex 3067  df-rab 3070  df-v 3410  df-dif 3869  df-un 3871  df-in 3873  df-ss 3883  df-nul 4238  df-sn 4542  df-uni 4820  df-iun 4906
This theorem is referenced by:  kmlem13  9776
  Copyright terms: Public domain W3C validator