Theorem grothprim 10259

Description: The Tarski-Grothendieck Axiom ax-groth 10248 expanded into set theory primitives using 163 symbols (allowing the defined symbols ∧, ∨, ↔, and ∃). An open problem is whether a shorter equivalent exists (when expanded to primitives). (Contributed by NM, 16-Apr-2007.)

Assertion

Ref	Expression
grothprim	⊢ ∃𝑦(𝑥 ∈ 𝑦 ∧ ∀𝑧((𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))) ∧ ∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦))))

Distinct variable group:   𝑥,𝑦,𝑧,𝑤,𝑣,𝑢,𝑡,ℎ,𝑔

Proof of Theorem grothprim

Step	Hyp	Ref	Expression
1		axgroth4 10257	. 2 ⊢ ∃𝑦(𝑥 ∈ 𝑦 ∧ ∀𝑧 ∈ 𝑦 ∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ∧ ∀𝑧(𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦)))
2		3anass 1091	. . . 4 ⊢ ((𝑥 ∈ 𝑦 ∧ ∀𝑧 ∈ 𝑦 ∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ∧ ∀𝑧(𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦))) ↔ (𝑥 ∈ 𝑦 ∧ (∀𝑧 ∈ 𝑦 ∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ∧ ∀𝑧(𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦)))))
3		dfss2 3958	. . . . . . . . . . . . 13 ⊢ (𝑤 ⊆ 𝑧 ↔ ∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧))
4		elin 4172	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ (𝑦 ∩ 𝑣) ↔ (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣))
5	3, 4	imbi12i 353	. . . . . . . . . . . 12 ⊢ ((𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ↔ (∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))
6	5	albii 1819	. . . . . . . . . . 11 ⊢ (∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ↔ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))
7	6	rexbii 3250	. . . . . . . . . 10 ⊢ (∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ↔ ∃𝑣 ∈ 𝑦 ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))
8		df-rex 3147	. . . . . . . . . 10 ⊢ (∃𝑣 ∈ 𝑦 ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)) ↔ ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣))))
9	7, 8	bitri 277	. . . . . . . . 9 ⊢ (∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ↔ ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣))))
10	9	ralbii 3168	. . . . . . . 8 ⊢ (∀𝑧 ∈ 𝑦 ∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ↔ ∀𝑧 ∈ 𝑦 ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣))))
11		df-ral 3146	. . . . . . . 8 ⊢ (∀𝑧 ∈ 𝑦 ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣))) ↔ ∀𝑧(𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))))
12	10, 11	bitri 277	. . . . . . 7 ⊢ (∀𝑧 ∈ 𝑦 ∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ↔ ∀𝑧(𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))))
13		dfss2 3958	. . . . . . . . . . 11 ⊢ (𝑧 ⊆ 𝑦 ↔ ∀𝑤(𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦))
14		vex 3500	. . . . . . . . . . . . . . 15 ⊢ 𝑦 ∈ V
15	14	difexi 5235	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∖ 𝑧) ∈ V
16		vex 3500	. . . . . . . . . . . . . 14 ⊢ 𝑧 ∈ V
17		incom 4181	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∖ 𝑧) ∩ 𝑧) = (𝑧 ∩ (𝑦 ∖ 𝑧))
18		disjdif 4424	. . . . . . . . . . . . . . 15 ⊢ (𝑧 ∩ (𝑦 ∖ 𝑧)) = ∅
19	17, 18	eqtri 2847	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∖ 𝑧) ∩ 𝑧) = ∅
20	15, 16, 19	brdom6disj 9957	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∖ 𝑧) ≼ 𝑧 ↔ ∃𝑤(∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤))
21	20	orbi1i 910	. . . . . . . . . . . 12 ⊢ (((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦) ↔ (∃𝑤(∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦))
22		19.44v 1998	. . . . . . . . . . . 12 ⊢ (∃𝑤((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦) ↔ (∃𝑤(∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦))
23	21, 22	bitr4i 280	. . . . . . . . . . 11 ⊢ (((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦) ↔ ∃𝑤((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦))
24	13, 23	imbi12i 353	. . . . . . . . . 10 ⊢ ((𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦)) ↔ (∀𝑤(𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → ∃𝑤((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦)))
25		19.35 1877	. . . . . . . . . 10 ⊢ (∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → ((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦)) ↔ (∀𝑤(𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → ∃𝑤((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦)))
26	24, 25	bitr4i 280	. . . . . . . . 9 ⊢ ((𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦)) ↔ ∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → ((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦)))
27		grothprimlem 10258	. . . . . . . . . . . . . . . . . 18 ⊢ ({𝑣, 𝑢} ∈ 𝑤 ↔ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))))
28	27	mobii 2630	. . . . . . . . . . . . . . . . 17 ⊢ (∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ↔ ∃*𝑢∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))))
29		df-mo 2621	. . . . . . . . . . . . . . . . 17 ⊢ (∃*𝑢∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) ↔ ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡))
30	28, 29	bitri 277	. . . . . . . . . . . . . . . 16 ⊢ (∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ↔ ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡))
31	30	ralbii 3168	. . . . . . . . . . . . . . 15 ⊢ (∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ↔ ∀𝑣 ∈ 𝑧 ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡))
32		df-ral 3146	. . . . . . . . . . . . . . 15 ⊢ (∀𝑣 ∈ 𝑧 ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡) ↔ ∀𝑣(𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)))
33	31, 32	bitri 277	. . . . . . . . . . . . . 14 ⊢ (∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ↔ ∀𝑣(𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)))
34		df-ral 3146	. . . . . . . . . . . . . . 15 ⊢ (∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤 ↔ ∀𝑣(𝑣 ∈ (𝑦 ∖ 𝑧) → ∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤))
35		eldif 3949	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑣 ∈ (𝑦 ∖ 𝑧) ↔ (𝑣 ∈ 𝑦 ∧ ¬ 𝑣 ∈ 𝑧))
36		grothprimlem 10258	. . . . . . . . . . . . . . . . . . . 20 ⊢ ({𝑢, 𝑣} ∈ 𝑤 ↔ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))
37	36	rexbii 3250	. . . . . . . . . . . . . . . . . . 19 ⊢ (∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤 ↔ ∃𝑢 ∈ 𝑧 ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))
38		df-rex 3147	. . . . . . . . . . . . . . . . . . 19 ⊢ (∃𝑢 ∈ 𝑧 ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))) ↔ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣)))))
39	37, 38	bitri 277	. . . . . . . . . . . . . . . . . 18 ⊢ (∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤 ↔ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣)))))
40	35, 39	imbi12i 353	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑣 ∈ (𝑦 ∖ 𝑧) → ∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ↔ ((𝑣 ∈ 𝑦 ∧ ¬ 𝑣 ∈ 𝑧) → ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))
41		pm5.6 998	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑣 ∈ 𝑦 ∧ ¬ 𝑣 ∈ 𝑧) → ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))) ↔ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣)))))))
42	40, 41	bitri 277	. . . . . . . . . . . . . . . 16 ⊢ ((𝑣 ∈ (𝑦 ∖ 𝑧) → ∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ↔ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣)))))))
43	42	albii 1819	. . . . . . . . . . . . . . 15 ⊢ (∀𝑣(𝑣 ∈ (𝑦 ∖ 𝑧) → ∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ↔ ∀𝑣(𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣)))))))
44	34, 43	bitri 277	. . . . . . . . . . . . . 14 ⊢ (∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤 ↔ ∀𝑣(𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣)))))))
45	33, 44	anbi12i 628	. . . . . . . . . . . . 13 ⊢ ((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ↔ (∀𝑣(𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ ∀𝑣(𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))))
46		19.26 1870	. . . . . . . . . . . . 13 ⊢ (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ↔ (∀𝑣(𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ ∀𝑣(𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))))
47	45, 46	bitr4i 280	. . . . . . . . . . . 12 ⊢ ((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ↔ ∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))))
48	47	orbi1i 910	. . . . . . . . . . 11 ⊢ (((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦) ↔ (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦))
49	48	imbi2i 338	. . . . . . . . . 10 ⊢ (((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → ((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦)) ↔ ((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦)))
50	49	exbii 1847	. . . . . . . . 9 ⊢ (∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → ((∀𝑣 ∈ 𝑧 ∃*𝑢{𝑣, 𝑢} ∈ 𝑤 ∧ ∀𝑣 ∈ (𝑦 ∖ 𝑧)∃𝑢 ∈ 𝑧 {𝑢, 𝑣} ∈ 𝑤) ∨ 𝑧 ∈ 𝑦)) ↔ ∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦)))
51	26, 50	bitri 277	. . . . . . . 8 ⊢ ((𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦)) ↔ ∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦)))
52	51	albii 1819	. . . . . . 7 ⊢ (∀𝑧(𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦)) ↔ ∀𝑧∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦)))
53	12, 52	anbi12i 628	. . . . . 6 ⊢ ((∀𝑧 ∈ 𝑦 ∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ∧ ∀𝑧(𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦))) ↔ (∀𝑧(𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))) ∧ ∀𝑧∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦))))
54		19.26 1870	. . . . . 6 ⊢ (∀𝑧((𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))) ∧ ∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦))) ↔ (∀𝑧(𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))) ∧ ∀𝑧∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦))))
55	53, 54	bitr4i 280	. . . . 5 ⊢ ((∀𝑧 ∈ 𝑦 ∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ∧ ∀𝑧(𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦))) ↔ ∀𝑧((𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))) ∧ ∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦))))
56	55	anbi2i 624	. . . 4 ⊢ ((𝑥 ∈ 𝑦 ∧ (∀𝑧 ∈ 𝑦 ∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ∧ ∀𝑧(𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦)))) ↔ (𝑥 ∈ 𝑦 ∧ ∀𝑧((𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))) ∧ ∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦)))))
57	2, 56	bitri 277	. . 3 ⊢ ((𝑥 ∈ 𝑦 ∧ ∀𝑧 ∈ 𝑦 ∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ∧ ∀𝑧(𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦))) ↔ (𝑥 ∈ 𝑦 ∧ ∀𝑧((𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))) ∧ ∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦)))))
58	57	exbii 1847	. 2 ⊢ (∃𝑦(𝑥 ∈ 𝑦 ∧ ∀𝑧 ∈ 𝑦 ∃𝑣 ∈ 𝑦 ∀𝑤(𝑤 ⊆ 𝑧 → 𝑤 ∈ (𝑦 ∩ 𝑣)) ∧ ∀𝑧(𝑧 ⊆ 𝑦 → ((𝑦 ∖ 𝑧) ≼ 𝑧 ∨ 𝑧 ∈ 𝑦))) ↔ ∃𝑦(𝑥 ∈ 𝑦 ∧ ∀𝑧((𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))) ∧ ∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦)))))
59	1, 58	mpbi 232	1 ⊢ ∃𝑦(𝑥 ∈ 𝑦 ∧ ∀𝑧((𝑧 ∈ 𝑦 → ∃𝑣(𝑣 ∈ 𝑦 ∧ ∀𝑤(∀𝑢(𝑢 ∈ 𝑤 → 𝑢 ∈ 𝑧) → (𝑤 ∈ 𝑦 ∧ 𝑤 ∈ 𝑣)))) ∧ ∃𝑤((𝑤 ∈ 𝑧 → 𝑤 ∈ 𝑦) → (∀𝑣((𝑣 ∈ 𝑧 → ∃𝑡∀𝑢(∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑣 ∨ ℎ = 𝑢))) → 𝑢 = 𝑡)) ∧ (𝑣 ∈ 𝑦 → (𝑣 ∈ 𝑧 ∨ ∃𝑢(𝑢 ∈ 𝑧 ∧ ∃𝑔(𝑔 ∈ 𝑤 ∧ ∀ℎ(ℎ ∈ 𝑔 ↔ (ℎ = 𝑢 ∨ ℎ = 𝑣))))))) ∨ 𝑧 ∈ 𝑦))))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   ∨ wo 843   ∧ w3a 1083  ∀wal 1534  ∃wex 1779   ∈ wcel 2113  ∃*wmo 2619  ∀wral 3141  ∃wrex 3142   ∖ cdif 3936   ∩ cin 3938   ⊆ wss 3939  ∅c0 4294  {cpr 4572   class class class wbr 5069   ≼ cdom 8510

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1969  ax-7 2014  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2160  ax-12 2176  ax-ext 2796  ax-rep 5193  ax-sep 5206  ax-nul 5213  ax-pow 5269  ax-pr 5333  ax-un 7464  ax-reg 9059  ax-inf2 9107  ax-cc 9860  ax-ac2 9888  ax-groth 10248

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1539  df-ex 1780  df-nf 1784  df-sb 2069  df-mo 2621  df-eu 2653  df-clab 2803  df-cleq 2817  df-clel 2896  df-nfc 2966  df-ne 3020  df-ral 3146  df-rex 3147  df-reu 3148  df-rmo 3149  df-rab 3150  df-v 3499  df-sbc 3776  df-csb 3887  df-dif 3942  df-un 3944  df-in 3946  df-ss 3955  df-pss 3957  df-nul 4295  df-if 4471  df-pw 4544  df-sn 4571  df-pr 4573  df-tp 4575  df-op 4577  df-uni 4842  df-int 4880  df-iun 4924  df-br 5070  df-opab 5132  df-mpt 5150  df-tr 5176  df-id 5463  df-eprel 5468  df-po 5477  df-so 5478  df-fr 5517  df-se 5518  df-we 5519  df-xp 5564  df-rel 5565  df-cnv 5566  df-co 5567  df-dm 5568  df-rn 5569  df-res 5570  df-ima 5571  df-pred 6151  df-ord 6197  df-on 6198  df-lim 6199  df-suc 6200  df-iota 6317  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-isom 6367  df-riota 7117  df-ov 7162  df-oprab 7163  df-mpo 7164  df-om 7584  df-1st 7692  df-2nd 7693  df-wrecs 7950  df-recs 8011  df-rdg 8049  df-1o 8105  df-2o 8106  df-oadd 8109  df-er 8292  df-map 8411  df-en 8513  df-dom 8514  df-sdom 8515  df-fin 8516  df-oi 8977  df-dju 9333  df-card 9371  df-acn 9374  df-ac 9545

This theorem is referenced by: (None)