Theorem kmlem15 10246

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
kmlem15	⊢ ((¬ 𝑦 ∈ 𝑥 ∧ 𝜒) ↔ ∀𝑧∃𝑣∀𝑢(¬ 𝑦 ∈ 𝑥 ∧ 𝜓))

Distinct variable groups:   𝑥,𝑦,𝑧,𝑣,𝑢   𝜑,𝑢

Allowed substitution hints:   𝜑(𝑥, 𝑦, 𝑧, 𝑣)   𝜓(𝑥, 𝑦, 𝑧, 𝑣, 𝑢)   𝜒(𝑥, 𝑦, 𝑧, 𝑣, 𝑢)

Proof of Theorem kmlem15

Step	Hyp	Ref	Expression
1		kmlem14.3	. . . 4 ⊢ (𝜒 ↔ ∀𝑧 ∈ 𝑥 ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))
2		nfv 1946	. . . . . . 7 ⊢ Ⅎ𝑢 𝑣 ∈ (𝑧 ∩ 𝑦)
3	2	eu1 2635	. . . . . 6 ⊢ (∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦) ↔ ∃𝑣(𝑣 ∈ (𝑧 ∩ 𝑦) ∧ ∀𝑢([𝑢 / 𝑣]𝑣 ∈ (𝑧 ∩ 𝑦) → 𝑣 = 𝑢)))
4		elin 4093	. . . . . . . . 9 ⊢ (𝑣 ∈ (𝑧 ∩ 𝑦) ↔ (𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦))
5		clelsb1 2887	. . . . . . . . . . . 12 ⊢ ([𝑢 / 𝑣]𝑣 ∈ (𝑧 ∩ 𝑦) ↔ 𝑢 ∈ (𝑧 ∩ 𝑦))
6		elin 4093	. . . . . . . . . . . 12 ⊢ (𝑢 ∈ (𝑧 ∩ 𝑦) ↔ (𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦))
7	5, 6	bitri 278	. . . . . . . . . . 11 ⊢ ([𝑢 / 𝑣]𝑣 ∈ (𝑧 ∩ 𝑦) ↔ (𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦))
8		equcom 2050	. . . . . . . . . . 11 ⊢ (𝑣 = 𝑢 ↔ 𝑢 = 𝑣)
9	7, 8	imbi12i 353	. . . . . . . . . 10 ⊢ (([𝑢 / 𝑣]𝑣 ∈ (𝑧 ∩ 𝑦) → 𝑣 = 𝑢) ↔ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))
10	9	albii 1851	. . . . . . . . 9 ⊢ (∀𝑢([𝑢 / 𝑣]𝑣 ∈ (𝑧 ∩ 𝑦) → 𝑣 = 𝑢) ↔ ∀𝑢((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))
11	4, 10	anbi12i 640	. . . . . . . 8 ⊢ ((𝑣 ∈ (𝑧 ∩ 𝑦) ∧ ∀𝑢([𝑢 / 𝑣]𝑣 ∈ (𝑧 ∩ 𝑦) → 𝑣 = 𝑢)) ↔ ((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ∀𝑢((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣)))
12		19.28v 2028	. . . . . . . 8 ⊢ (∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣)) ↔ ((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ∀𝑢((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣)))
13	11, 12	bitr4i 281	. . . . . . 7 ⊢ ((𝑣 ∈ (𝑧 ∩ 𝑦) ∧ ∀𝑢([𝑢 / 𝑣]𝑣 ∈ (𝑧 ∩ 𝑦) → 𝑣 = 𝑢)) ↔ ∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣)))
14	13	exbii 1880	. . . . . 6 ⊢ (∃𝑣(𝑣 ∈ (𝑧 ∩ 𝑦) ∧ ∀𝑢([𝑢 / 𝑣]𝑣 ∈ (𝑧 ∩ 𝑦) → 𝑣 = 𝑢)) ↔ ∃𝑣∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣)))
15	3, 14	bitri 278	. . . . 5 ⊢ (∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦) ↔ ∃𝑣∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣)))
16	15	ralbii 3108	. . . 4 ⊢ (∀𝑧 ∈ 𝑥 ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦) ↔ ∀𝑧 ∈ 𝑥 ∃𝑣∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣)))
17		df-ral 3077	. . . . 5 ⊢ (∀𝑧 ∈ 𝑥 ∃𝑣∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣)) ↔ ∀𝑧(𝑧 ∈ 𝑥 → ∃𝑣∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))))
18		kmlem14.2	. . . . . . . . . 10 ⊢ (𝜓 ↔ (𝑧 ∈ 𝑥 → ((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))))
19	18	albii 1851	. . . . . . . . 9 ⊢ (∀𝑢𝜓 ↔ ∀𝑢(𝑧 ∈ 𝑥 → ((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))))
20		19.21v 1971	. . . . . . . . 9 ⊢ (∀𝑢(𝑧 ∈ 𝑥 → ((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))) ↔ (𝑧 ∈ 𝑥 → ∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))))
21	19, 20	bitri 278	. . . . . . . 8 ⊢ (∀𝑢𝜓 ↔ (𝑧 ∈ 𝑥 → ∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))))
22	21	exbii 1880	. . . . . . 7 ⊢ (∃𝑣∀𝑢𝜓 ↔ ∃𝑣(𝑧 ∈ 𝑥 → ∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))))
23		19.37v 2029	. . . . . . 7 ⊢ (∃𝑣(𝑧 ∈ 𝑥 → ∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))) ↔ (𝑧 ∈ 𝑥 → ∃𝑣∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))))
24	22, 23	bitri 278	. . . . . 6 ⊢ (∃𝑣∀𝑢𝜓 ↔ (𝑧 ∈ 𝑥 → ∃𝑣∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))))
25	24	albii 1851	. . . . 5 ⊢ (∀𝑧∃𝑣∀𝑢𝜓 ↔ ∀𝑧(𝑧 ∈ 𝑥 → ∃𝑣∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣))))
26	17, 25	bitr4i 281	. . . 4 ⊢ (∀𝑧 ∈ 𝑥 ∃𝑣∀𝑢((𝑣 ∈ 𝑧 ∧ 𝑣 ∈ 𝑦) ∧ ((𝑢 ∈ 𝑧 ∧ 𝑢 ∈ 𝑦) → 𝑢 = 𝑣)) ↔ ∀𝑧∃𝑣∀𝑢𝜓)
27	1, 16, 26	3bitri 300	. . 3 ⊢ (𝜒 ↔ ∀𝑧∃𝑣∀𝑢𝜓)
28	27	anbi2i 635	. 2 ⊢ ((¬ 𝑦 ∈ 𝑥 ∧ 𝜒) ↔ (¬ 𝑦 ∈ 𝑥 ∧ ∀𝑧∃𝑣∀𝑢𝜓))
29		19.28v 2028	. 2 ⊢ (∀𝑧(¬ 𝑦 ∈ 𝑥 ∧ ∃𝑣∀𝑢𝜓) ↔ (¬ 𝑦 ∈ 𝑥 ∧ ∀𝑧∃𝑣∀𝑢𝜓))
30		19.28v 2028	. . . . 5 ⊢ (∀𝑢(¬ 𝑦 ∈ 𝑥 ∧ 𝜓) ↔ (¬ 𝑦 ∈ 𝑥 ∧ ∀𝑢𝜓))
31	30	exbii 1880	. . . 4 ⊢ (∃𝑣∀𝑢(¬ 𝑦 ∈ 𝑥 ∧ 𝜓) ↔ ∃𝑣(¬ 𝑦 ∈ 𝑥 ∧ ∀𝑢𝜓))
32		19.42v 1985	. . . 4 ⊢ (∃𝑣(¬ 𝑦 ∈ 𝑥 ∧ ∀𝑢𝜓) ↔ (¬ 𝑦 ∈ 𝑥 ∧ ∃𝑣∀𝑢𝜓))
33	31, 32	bitr2i 279	. . 3 ⊢ ((¬ 𝑦 ∈ 𝑥 ∧ ∃𝑣∀𝑢𝜓) ↔ ∃𝑣∀𝑢(¬ 𝑦 ∈ 𝑥 ∧ 𝜓))
34	33	albii 1851	. 2 ⊢ (∀𝑧(¬ 𝑦 ∈ 𝑥 ∧ ∃𝑣∀𝑢𝜓) ↔ ∀𝑧∃𝑣∀𝑢(¬ 𝑦 ∈ 𝑥 ∧ 𝜓))
35	28, 29, 34	3bitr2i 302	1 ⊢ ((¬ 𝑦 ∈ 𝑥 ∧ 𝜒) ↔ ∀𝑧∃𝑣∀𝑢(¬ 𝑦 ∈ 𝑥 ∧ 𝜓))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401  ∀wal 1567  ∃wex 1811  [wsb 2098   ∈ wcel 2144  ∃!weu 2593   ≠ wne 2955  ∀wral 3076   ∩ cin 4089

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-tru 1572  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-ral 3077  df-v 3452  df-in 4091

This theorem is used by:  kmlem16  10247