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

Theorem kmlem14 9169
Description: Lemma for 5-quantifier AC of Kurt Maes, Th. 4, part of 5 <=> 4. (Contributed by NM, 4-Apr-2004.)
Hypotheses
Ref Expression
kmlem14.1 (𝜑 ↔ (𝑧𝑦 → ((𝑣𝑥𝑦𝑣) ∧ 𝑧𝑣)))
kmlem14.2 (𝜓 ↔ (𝑧𝑥 → ((𝑣𝑧𝑣𝑦) ∧ ((𝑢𝑧𝑢𝑦) → 𝑢 = 𝑣))))
kmlem14.3 (𝜒 ↔ ∀𝑧𝑥 ∃!𝑣 𝑣 ∈ (𝑧𝑦))
Assertion
Ref Expression
kmlem14 (∃𝑧𝑥𝑣𝑧𝑤𝑥 (𝑧𝑤𝑣 ∈ (𝑧𝑤)) ↔ ∃𝑦𝑧𝑣𝑢(𝑦𝑥𝜑))
Distinct variable groups:   𝑥,𝑦,𝑧,𝑤,𝑣,𝑢   𝜑,𝑢
Allowed substitution hints:   𝜑(𝑥,𝑦,𝑧,𝑤,𝑣)   𝜓(𝑥,𝑦,𝑧,𝑤,𝑣,𝑢)   𝜒(𝑥,𝑦,𝑧,𝑤,𝑣,𝑢)

Proof of Theorem kmlem14
StepHypRef Expression
1 neeq1 2986 . . . . . 6 (𝑧 = 𝑦 → (𝑧𝑤𝑦𝑤))
2 ineq1 3942 . . . . . . 7 (𝑧 = 𝑦 → (𝑧𝑤) = (𝑦𝑤))
32eleq2d 2817 . . . . . 6 (𝑧 = 𝑦 → (𝑣 ∈ (𝑧𝑤) ↔ 𝑣 ∈ (𝑦𝑤)))
41, 3anbi12d 749 . . . . 5 (𝑧 = 𝑦 → ((𝑧𝑤𝑣 ∈ (𝑧𝑤)) ↔ (𝑦𝑤𝑣 ∈ (𝑦𝑤))))
54rexbidv 3182 . . . 4 (𝑧 = 𝑦 → (∃𝑤𝑥 (𝑧𝑤𝑣 ∈ (𝑧𝑤)) ↔ ∃𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤))))
65raleqbi1dv 3277 . . 3 (𝑧 = 𝑦 → (∀𝑣𝑧𝑤𝑥 (𝑧𝑤𝑣 ∈ (𝑧𝑤)) ↔ ∀𝑣𝑦𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤))))
76cbvrexv 3303 . 2 (∃𝑧𝑥𝑣𝑧𝑤𝑥 (𝑧𝑤𝑣 ∈ (𝑧𝑤)) ↔ ∃𝑦𝑥𝑣𝑦𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤)))
8 df-rex 3048 . 2 (∃𝑦𝑥𝑣𝑦𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤)) ↔ ∃𝑦(𝑦𝑥 ∧ ∀𝑣𝑦𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤))))
9 eleq1w 2814 . . . . . . . . 9 (𝑣 = 𝑧 → (𝑣 ∈ (𝑦𝑤) ↔ 𝑧 ∈ (𝑦𝑤)))
109anbi2d 742 . . . . . . . 8 (𝑣 = 𝑧 → ((𝑦𝑤𝑣 ∈ (𝑦𝑤)) ↔ (𝑦𝑤𝑧 ∈ (𝑦𝑤))))
1110rexbidv 3182 . . . . . . 7 (𝑣 = 𝑧 → (∃𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤)) ↔ ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤))))
1211cbvralv 3302 . . . . . 6 (∀𝑣𝑦𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤)) ↔ ∀𝑧𝑦𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤)))
13 df-ral 3047 . . . . . 6 (∀𝑧𝑦𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤)) ↔ ∀𝑧(𝑧𝑦 → ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤))))
1412, 13bitri 264 . . . . 5 (∀𝑣𝑦𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤)) ↔ ∀𝑧(𝑧𝑦 → ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤))))
1514anbi2i 732 . . . 4 ((𝑦𝑥 ∧ ∀𝑣𝑦𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤))) ↔ (𝑦𝑥 ∧ ∀𝑧(𝑧𝑦 → ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤)))))
16 19.28v 2066 . . . 4 (∀𝑧(𝑦𝑥 ∧ (𝑧𝑦 → ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤)))) ↔ (𝑦𝑥 ∧ ∀𝑧(𝑧𝑦 → ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤)))))
17 neeq2 2987 . . . . . . . . . . . 12 (𝑤 = 𝑣 → (𝑦𝑤𝑦𝑣))
18 ineq2 3943 . . . . . . . . . . . . 13 (𝑤 = 𝑣 → (𝑦𝑤) = (𝑦𝑣))
1918eleq2d 2817 . . . . . . . . . . . 12 (𝑤 = 𝑣 → (𝑧 ∈ (𝑦𝑤) ↔ 𝑧 ∈ (𝑦𝑣)))
2017, 19anbi12d 749 . . . . . . . . . . 11 (𝑤 = 𝑣 → ((𝑦𝑤𝑧 ∈ (𝑦𝑤)) ↔ (𝑦𝑣𝑧 ∈ (𝑦𝑣))))
2120cbvrexv 3303 . . . . . . . . . 10 (∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤)) ↔ ∃𝑣𝑥 (𝑦𝑣𝑧 ∈ (𝑦𝑣)))
22 df-rex 3048 . . . . . . . . . 10 (∃𝑣𝑥 (𝑦𝑣𝑧 ∈ (𝑦𝑣)) ↔ ∃𝑣(𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣))))
2321, 22bitri 264 . . . . . . . . 9 (∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤)) ↔ ∃𝑣(𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣))))
2423imbi2i 325 . . . . . . . 8 ((𝑧𝑦 → ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤))) ↔ (𝑧𝑦 → ∃𝑣(𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣)))))
25 19.37v 2067 . . . . . . . 8 (∃𝑣(𝑧𝑦 → (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣)))) ↔ (𝑧𝑦 → ∃𝑣(𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣)))))
2624, 25bitr4i 267 . . . . . . 7 ((𝑧𝑦 → ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤))) ↔ ∃𝑣(𝑧𝑦 → (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣)))))
2726anbi2i 732 . . . . . 6 ((𝑦𝑥 ∧ (𝑧𝑦 → ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤)))) ↔ (𝑦𝑥 ∧ ∃𝑣(𝑧𝑦 → (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣))))))
28 19.42v 2022 . . . . . 6 (∃𝑣(𝑦𝑥 ∧ (𝑧𝑦 → (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣))))) ↔ (𝑦𝑥 ∧ ∃𝑣(𝑧𝑦 → (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣))))))
29 19.3v 2055 . . . . . . . 8 (∀𝑢(𝑦𝑥𝜑) ↔ (𝑦𝑥𝜑))
30 kmlem14.1 . . . . . . . . . 10 (𝜑 ↔ (𝑧𝑦 → ((𝑣𝑥𝑦𝑣) ∧ 𝑧𝑣)))
31 elin 3931 . . . . . . . . . . . . . 14 (𝑧 ∈ (𝑦𝑣) ↔ (𝑧𝑦𝑧𝑣))
3231baibr 983 . . . . . . . . . . . . 13 (𝑧𝑦 → (𝑧𝑣𝑧 ∈ (𝑦𝑣)))
3332anbi2d 742 . . . . . . . . . . . 12 (𝑧𝑦 → (((𝑣𝑥𝑦𝑣) ∧ 𝑧𝑣) ↔ ((𝑣𝑥𝑦𝑣) ∧ 𝑧 ∈ (𝑦𝑣))))
34 anass 684 . . . . . . . . . . . 12 (((𝑣𝑥𝑦𝑣) ∧ 𝑧 ∈ (𝑦𝑣)) ↔ (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣))))
3533, 34syl6bb 276 . . . . . . . . . . 11 (𝑧𝑦 → (((𝑣𝑥𝑦𝑣) ∧ 𝑧𝑣) ↔ (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣)))))
3635pm5.74i 260 . . . . . . . . . 10 ((𝑧𝑦 → ((𝑣𝑥𝑦𝑣) ∧ 𝑧𝑣)) ↔ (𝑧𝑦 → (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣)))))
3730, 36bitri 264 . . . . . . . . 9 (𝜑 ↔ (𝑧𝑦 → (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣)))))
3837anbi2i 732 . . . . . . . 8 ((𝑦𝑥𝜑) ↔ (𝑦𝑥 ∧ (𝑧𝑦 → (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣))))))
3929, 38bitr2i 265 . . . . . . 7 ((𝑦𝑥 ∧ (𝑧𝑦 → (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣))))) ↔ ∀𝑢(𝑦𝑥𝜑))
4039exbii 1915 . . . . . 6 (∃𝑣(𝑦𝑥 ∧ (𝑧𝑦 → (𝑣𝑥 ∧ (𝑦𝑣𝑧 ∈ (𝑦𝑣))))) ↔ ∃𝑣𝑢(𝑦𝑥𝜑))
4127, 28, 403bitr2i 288 . . . . 5 ((𝑦𝑥 ∧ (𝑧𝑦 → ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤)))) ↔ ∃𝑣𝑢(𝑦𝑥𝜑))
4241albii 1888 . . . 4 (∀𝑧(𝑦𝑥 ∧ (𝑧𝑦 → ∃𝑤𝑥 (𝑦𝑤𝑧 ∈ (𝑦𝑤)))) ↔ ∀𝑧𝑣𝑢(𝑦𝑥𝜑))
4315, 16, 423bitr2i 288 . . 3 ((𝑦𝑥 ∧ ∀𝑣𝑦𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤))) ↔ ∀𝑧𝑣𝑢(𝑦𝑥𝜑))
4443exbii 1915 . 2 (∃𝑦(𝑦𝑥 ∧ ∀𝑣𝑦𝑤𝑥 (𝑦𝑤𝑣 ∈ (𝑦𝑤))) ↔ ∃𝑦𝑧𝑣𝑢(𝑦𝑥𝜑))
457, 8, 443bitri 286 1 (∃𝑧𝑥𝑣𝑧𝑤𝑥 (𝑧𝑤𝑣 ∈ (𝑧𝑤)) ↔ ∃𝑦𝑧𝑣𝑢(𝑦𝑥𝜑))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 383  wal 1622  wex 1845  wcel 2131  ∃!weu 2599  wne 2924  wral 3042  wrex 3043  cin 3706
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1863  ax-4 1878  ax-5 1980  ax-6 2046  ax-7 2082  ax-9 2140  ax-10 2160  ax-11 2175  ax-12 2188  ax-13 2383  ax-ext 2732
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-tru 1627  df-ex 1846  df-nf 1851  df-sb 2039  df-clab 2739  df-cleq 2745  df-clel 2748  df-nfc 2883  df-ne 2925  df-ral 3047  df-rex 3048  df-v 3334  df-in 3714
This theorem is referenced by:  kmlem16  9171
  Copyright terms: Public domain W3C validator