Theorem permac8prim 45693

Description: The Axiom of Choice ac8prim 45670 holds in permutation models. Part of Exercise II.9.3 of [Kunen2] p. 149. Note that ax-ac 10442 requires Regularity for its derivation from the usual Axiom of Choice and does not necessarily hold in permutation models. (Contributed by Eric Schmidt, 16-Nov-2025.)

Hypotheses

Ref	Expression
permmodel.1	⊢ 𝐹:V–1-1-onto→V
permmodel.2	⊢ 𝑅 = (◡𝐹 ∘ E )

Assertion

Ref	Expression
permac8prim	⊢ ((∀𝑧(𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧) ∧ ∀𝑧∀𝑤((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤)))) → ∃𝑦∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)))

Distinct variable groups:   𝑥,𝑧,𝑦,𝑤,𝑣   𝑦,𝐹,𝑧,𝑤,𝑣

Allowed substitution hints:   𝑅(𝑥,𝑦,𝑧,𝑤,𝑣)   𝐹(𝑥)

Proof of Theorem permac8prim

Dummy variables 𝑞 𝑟 𝑠 𝑡 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-ral 3078	. . . 4 ⊢ (∀𝑧 ∈ (𝐹‘𝑥)(𝐹‘𝑧) ≠ ∅ ↔ ∀𝑧(𝑧 ∈ (𝐹‘𝑥) → (𝐹‘𝑧) ≠ ∅))
2		permmodel.1	. . . . . 6 ⊢ 𝐹:V–1-1-onto→V
3		f1ofn 6821	. . . . . 6 ⊢ (𝐹:V–1-1-onto→V → 𝐹 Fn V)
4	2, 3	ax-mp 5	. . . . 5 ⊢ 𝐹 Fn V
5		ssv 3960	. . . . 5 ⊢ (𝐹‘𝑥) ⊆ V
6		neeq1 3018	. . . . . 6 ⊢ (𝑡 = (𝐹‘𝑧) → (𝑡 ≠ ∅ ↔ (𝐹‘𝑧) ≠ ∅))
7	6	ralima 7235	. . . . 5 ⊢ ((𝐹 Fn V ∧ (𝐹‘𝑥) ⊆ V) → (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ↔ ∀𝑧 ∈ (𝐹‘𝑥)(𝐹‘𝑧) ≠ ∅))
8	4, 5, 7	mp2an 704	. . . 4 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ↔ ∀𝑧 ∈ (𝐹‘𝑥)(𝐹‘𝑧) ≠ ∅)
9		permmodel.2	. . . . . . 7 ⊢ 𝑅 = (◡𝐹 ∘ E )
10		vex 3457	. . . . . . 7 ⊢ 𝑧 ∈ V
11		vex 3457	. . . . . . 7 ⊢ 𝑥 ∈ V
12	2, 9, 10, 11	brpermmodel 45682	. . . . . 6 ⊢ (𝑧𝑅𝑥 ↔ 𝑧 ∈ (𝐹‘𝑥))
13		vex 3457	. . . . . . . . 9 ⊢ 𝑤 ∈ V
14	2, 9, 13, 10	brpermmodel 45682	. . . . . . . 8 ⊢ (𝑤𝑅𝑧 ↔ 𝑤 ∈ (𝐹‘𝑧))
15	14	exbii 1876	. . . . . . 7 ⊢ (∃𝑤 𝑤𝑅𝑧 ↔ ∃𝑤 𝑤 ∈ (𝐹‘𝑧))
16		n0 4306	. . . . . . 7 ⊢ ((𝐹‘𝑧) ≠ ∅ ↔ ∃𝑤 𝑤 ∈ (𝐹‘𝑧))
17	15, 16	bitr4i 281	. . . . . 6 ⊢ (∃𝑤 𝑤𝑅𝑧 ↔ (𝐹‘𝑧) ≠ ∅)
18	12, 17	imbi12i 353	. . . . 5 ⊢ ((𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧) ↔ (𝑧 ∈ (𝐹‘𝑥) → (𝐹‘𝑧) ≠ ∅))
19	18	albii 1847	. . . 4 ⊢ (∀𝑧(𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧) ↔ ∀𝑧(𝑧 ∈ (𝐹‘𝑥) → (𝐹‘𝑧) ≠ ∅))
20	1, 8, 19	3bitr4i 306	. . 3 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ↔ ∀𝑧(𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧))
21		neeq2 3019	. . . . . . . . 9 ⊢ (𝑞 = (𝐹‘𝑤) → (𝑡 ≠ 𝑞 ↔ 𝑡 ≠ (𝐹‘𝑤)))
22		ineq2 4166	. . . . . . . . . 10 ⊢ (𝑞 = (𝐹‘𝑤) → (𝑡 ∩ 𝑞) = (𝑡 ∩ (𝐹‘𝑤)))
23	22	eqeq1d 2763	. . . . . . . . 9 ⊢ (𝑞 = (𝐹‘𝑤) → ((𝑡 ∩ 𝑞) = ∅ ↔ (𝑡 ∩ (𝐹‘𝑤)) = ∅))
24	21, 23	imbi12d 347	. . . . . . . 8 ⊢ (𝑞 = (𝐹‘𝑤) → ((𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ (𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅)))
25	24	ralima 7235	. . . . . . 7 ⊢ ((𝐹 Fn V ∧ (𝐹‘𝑥) ⊆ V) → (∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅)))
26	4, 5, 25	mp2an 704	. . . . . 6 ⊢ (∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅))
27	26	ralbii 3109	. . . . 5 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅))
28		neeq1 3018	. . . . . . . . 9 ⊢ (𝑡 = (𝐹‘𝑧) → (𝑡 ≠ (𝐹‘𝑤) ↔ (𝐹‘𝑧) ≠ (𝐹‘𝑤)))
29		ineq1 4165	. . . . . . . . . 10 ⊢ (𝑡 = (𝐹‘𝑧) → (𝑡 ∩ (𝐹‘𝑤)) = ((𝐹‘𝑧) ∩ (𝐹‘𝑤)))
30	29	eqeq1d 2763	. . . . . . . . 9 ⊢ (𝑡 = (𝐹‘𝑧) → ((𝑡 ∩ (𝐹‘𝑤)) = ∅ ↔ ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅))
31	28, 30	imbi12d 347	. . . . . . . 8 ⊢ (𝑡 = (𝐹‘𝑧) → ((𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅) ↔ ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
32	31	ralbidv 3186	. . . . . . 7 ⊢ (𝑡 = (𝐹‘𝑧) → (∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅) ↔ ∀𝑤 ∈ (𝐹‘𝑥)((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
33	32	ralima 7235	. . . . . 6 ⊢ ((𝐹 Fn V ∧ (𝐹‘𝑥) ⊆ V) → (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅) ↔ ∀𝑧 ∈ (𝐹‘𝑥)∀𝑤 ∈ (𝐹‘𝑥)((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
34	4, 5, 33	mp2an 704	. . . . 5 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅) ↔ ∀𝑧 ∈ (𝐹‘𝑥)∀𝑤 ∈ (𝐹‘𝑥)((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅))
35		r2al 3199	. . . . 5 ⊢ (∀𝑧 ∈ (𝐹‘𝑥)∀𝑤 ∈ (𝐹‘𝑥)((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅) ↔ ∀𝑧∀𝑤((𝑧 ∈ (𝐹‘𝑥) ∧ 𝑤 ∈ (𝐹‘𝑥)) → ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
36	27, 34, 35	3bitri 300	. . . 4 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑧∀𝑤((𝑧 ∈ (𝐹‘𝑥) ∧ 𝑤 ∈ (𝐹‘𝑥)) → ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
37	2, 9, 13, 11	brpermmodel 45682	. . . . . . 7 ⊢ (𝑤𝑅𝑥 ↔ 𝑤 ∈ (𝐹‘𝑥))
38	12, 37	anbi12i 639	. . . . . 6 ⊢ ((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) ↔ (𝑧 ∈ (𝐹‘𝑥) ∧ 𝑤 ∈ (𝐹‘𝑥)))
39		df-ne 2957	. . . . . . . 8 ⊢ ((𝐹‘𝑧) ≠ (𝐹‘𝑤) ↔ ¬ (𝐹‘𝑧) = (𝐹‘𝑤))
40		f1of1 6819	. . . . . . . . . . . 12 ⊢ (𝐹:V–1-1-onto→V → 𝐹:V–1-1→V)
41	2, 40	ax-mp 5	. . . . . . . . . . 11 ⊢ 𝐹:V–1-1→V
42		f1fveq 7260	. . . . . . . . . . 11 ⊢ ((𝐹:V–1-1→V ∧ (𝑧 ∈ V ∧ 𝑤 ∈ V)) → ((𝐹‘𝑧) = (𝐹‘𝑤) ↔ 𝑧 = 𝑤))
43	41, 42	mpan 702	. . . . . . . . . 10 ⊢ ((𝑧 ∈ V ∧ 𝑤 ∈ V) → ((𝐹‘𝑧) = (𝐹‘𝑤) ↔ 𝑧 = 𝑤))
44	43	el2v 3460	. . . . . . . . 9 ⊢ ((𝐹‘𝑧) = (𝐹‘𝑤) ↔ 𝑧 = 𝑤)
45	44	notbii 323	. . . . . . . 8 ⊢ (¬ (𝐹‘𝑧) = (𝐹‘𝑤) ↔ ¬ 𝑧 = 𝑤)
46	39, 45	bitr2i 279	. . . . . . 7 ⊢ (¬ 𝑧 = 𝑤 ↔ (𝐹‘𝑧) ≠ (𝐹‘𝑤))
47		vex 3457	. . . . . . . . . . 11 ⊢ 𝑦 ∈ V
48	2, 9, 47, 10	brpermmodel 45682	. . . . . . . . . 10 ⊢ (𝑦𝑅𝑧 ↔ 𝑦 ∈ (𝐹‘𝑧))
49	2, 9, 47, 13	brpermmodel 45682	. . . . . . . . . . 11 ⊢ (𝑦𝑅𝑤 ↔ 𝑦 ∈ (𝐹‘𝑤))
50	49	notbii 323	. . . . . . . . . 10 ⊢ (¬ 𝑦𝑅𝑤 ↔ ¬ 𝑦 ∈ (𝐹‘𝑤))
51	48, 50	imbi12i 353	. . . . . . . . 9 ⊢ ((𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤) ↔ (𝑦 ∈ (𝐹‘𝑧) → ¬ 𝑦 ∈ (𝐹‘𝑤)))
52	51	albii 1847	. . . . . . . 8 ⊢ (∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤) ↔ ∀𝑦(𝑦 ∈ (𝐹‘𝑧) → ¬ 𝑦 ∈ (𝐹‘𝑤)))
53		disj1 4411	. . . . . . . 8 ⊢ (((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅ ↔ ∀𝑦(𝑦 ∈ (𝐹‘𝑧) → ¬ 𝑦 ∈ (𝐹‘𝑤)))
54	52, 53	bitr4i 281	. . . . . . 7 ⊢ (∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤) ↔ ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)
55	46, 54	imbi12i 353	. . . . . 6 ⊢ ((¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤)) ↔ ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅))
56	38, 55	imbi12i 353	. . . . 5 ⊢ (((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤))) ↔ ((𝑧 ∈ (𝐹‘𝑥) ∧ 𝑤 ∈ (𝐹‘𝑥)) → ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
57	56	2albii 1848	. . . 4 ⊢ (∀𝑧∀𝑤((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤))) ↔ ∀𝑧∀𝑤((𝑧 ∈ (𝐹‘𝑥) ∧ 𝑤 ∈ (𝐹‘𝑥)) → ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
58	36, 57	bitr4i 281	. . 3 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑧∀𝑤((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤))))
59		f1ofun 6822	. . . . 5 ⊢ (𝐹:V–1-1-onto→V → Fun 𝐹)
60		fvex 6894	. . . . . 6 ⊢ (𝐹‘𝑥) ∈ V
61	60	funimaex 6623	. . . . 5 ⊢ (Fun 𝐹 → (𝐹 “ (𝐹‘𝑥)) ∈ V)
62	2, 59, 61	mp2b 10	. . . 4 ⊢ (𝐹 “ (𝐹‘𝑥)) ∈ V
63		raleq 3318	. . . . . 6 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (∀𝑡 ∈ 𝑟 𝑡 ≠ ∅ ↔ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅))
64		raleq 3318	. . . . . . 7 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (∀𝑞 ∈ 𝑟 (𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)))
65	64	raleqbi1dv 3331	. . . . . 6 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (∀𝑡 ∈ 𝑟 ∀𝑞 ∈ 𝑟 (𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)))
66	63, 65	anbi12d 643	. . . . 5 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → ((∀𝑡 ∈ 𝑟 𝑡 ≠ ∅ ∧ ∀𝑡 ∈ 𝑟 ∀𝑞 ∈ 𝑟 (𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)) ↔ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ∧ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅))))
67		raleq 3318	. . . . . 6 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (∀𝑡 ∈ 𝑟 ∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠)))
68	67	exbidv 1949	. . . . 5 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (∃𝑠∀𝑡 ∈ 𝑟 ∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∃𝑠∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠)))
69	66, 68	imbi12d 347	. . . 4 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (((∀𝑡 ∈ 𝑟 𝑡 ≠ ∅ ∧ ∀𝑡 ∈ 𝑟 ∀𝑞 ∈ 𝑟 (𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)) → ∃𝑠∀𝑡 ∈ 𝑟 ∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠)) ↔ ((∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ∧ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)) → ∃𝑠∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠))))
70		ac8 10475	. . . 4 ⊢ ((∀𝑡 ∈ 𝑟 𝑡 ≠ ∅ ∧ ∀𝑡 ∈ 𝑟 ∀𝑞 ∈ 𝑟 (𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)) → ∃𝑠∀𝑡 ∈ 𝑟 ∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠))
71	62, 69, 70	vtocl 3524	. . 3 ⊢ ((∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ∧ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)) → ∃𝑠∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠))
72	20, 58, 71	syl2anbr 610	. 2 ⊢ ((∀𝑧(𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧) ∧ ∀𝑧∀𝑤((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤)))) → ∃𝑠∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠))
73		ineq1 4165	. . . . . . . . 9 ⊢ (𝑡 = (𝐹‘𝑧) → (𝑡 ∩ 𝑠) = ((𝐹‘𝑧) ∩ 𝑠))
74	73	eleq2d 2847	. . . . . . . 8 ⊢ (𝑡 = (𝐹‘𝑧) → (𝑣 ∈ (𝑡 ∩ 𝑠) ↔ 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
75	74	eubidv 2612	. . . . . . 7 ⊢ (𝑡 = (𝐹‘𝑧) → (∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
76	75	ralima 7235	. . . . . 6 ⊢ ((𝐹 Fn V ∧ (𝐹‘𝑥) ⊆ V) → (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∀𝑧 ∈ (𝐹‘𝑥)∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
77	4, 5, 76	mp2an 704	. . . . 5 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∀𝑧 ∈ (𝐹‘𝑥)∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠))
78		df-ral 3078	. . . . 5 ⊢ (∀𝑧 ∈ (𝐹‘𝑥)∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠) ↔ ∀𝑧(𝑧 ∈ (𝐹‘𝑥) → ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
79	77, 78	bitri 278	. . . 4 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∀𝑧(𝑧 ∈ (𝐹‘𝑥) → ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
80		fvex 6894	. . . . 5 ⊢ (◡𝐹‘𝑠) ∈ V
81	12	a1i 11	. . . . . . 7 ⊢ (𝑦 = (◡𝐹‘𝑠) → (𝑧𝑅𝑥 ↔ 𝑧 ∈ (𝐹‘𝑥)))
82		vex 3457	. . . . . . . . . . . . . 14 ⊢ 𝑣 ∈ V
83	2, 9, 82, 10	brpermmodel 45682	. . . . . . . . . . . . 13 ⊢ (𝑣𝑅𝑧 ↔ 𝑣 ∈ (𝐹‘𝑧))
84	83	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑦 = (◡𝐹‘𝑠) → (𝑣𝑅𝑧 ↔ 𝑣 ∈ (𝐹‘𝑧)))
85		breq2 5112	. . . . . . . . . . . . 13 ⊢ (𝑦 = (◡𝐹‘𝑠) → (𝑣𝑅𝑦 ↔ 𝑣𝑅(◡𝐹‘𝑠)))
86		vex 3457	. . . . . . . . . . . . . 14 ⊢ 𝑠 ∈ V
87	2, 9, 82, 86	brpermmodelcnv 45683	. . . . . . . . . . . . 13 ⊢ (𝑣𝑅(◡𝐹‘𝑠) ↔ 𝑣 ∈ 𝑠)
88	85, 87	bitrdi 290	. . . . . . . . . . . 12 ⊢ (𝑦 = (◡𝐹‘𝑠) → (𝑣𝑅𝑦 ↔ 𝑣 ∈ 𝑠))
89	84, 88	anbi12d 643	. . . . . . . . . . 11 ⊢ (𝑦 = (◡𝐹‘𝑠) → ((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ (𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠)))
90	89	bibi1d 346	. . . . . . . . . 10 ⊢ (𝑦 = (◡𝐹‘𝑠) → (((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤) ↔ ((𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ 𝑣 = 𝑤)))
91	90	albidv 1948	. . . . . . . . 9 ⊢ (𝑦 = (◡𝐹‘𝑠) → (∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤) ↔ ∀𝑣((𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ 𝑣 = 𝑤)))
92	91	exbidv 1949	. . . . . . . 8 ⊢ (𝑦 = (◡𝐹‘𝑠) → (∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤) ↔ ∃𝑤∀𝑣((𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ 𝑣 = 𝑤)))
93		elin 3920	. . . . . . . . . 10 ⊢ (𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠) ↔ (𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠))
94	93	eubii 2611	. . . . . . . . 9 ⊢ (∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠) ↔ ∃!𝑣(𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠))
95		eu6 2600	. . . . . . . . 9 ⊢ (∃!𝑣(𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ ∃𝑤∀𝑣((𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ 𝑣 = 𝑤))
96	94, 95	bitri 278	. . . . . . . 8 ⊢ (∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠) ↔ ∃𝑤∀𝑣((𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ 𝑣 = 𝑤))
97	92, 96	bitr4di 292	. . . . . . 7 ⊢ (𝑦 = (◡𝐹‘𝑠) → (∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤) ↔ ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
98	81, 97	imbi12d 347	. . . . . 6 ⊢ (𝑦 = (◡𝐹‘𝑠) → ((𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)) ↔ (𝑧 ∈ (𝐹‘𝑥) → ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠))))
99	98	albidv 1948	. . . . 5 ⊢ (𝑦 = (◡𝐹‘𝑠) → (∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)) ↔ ∀𝑧(𝑧 ∈ (𝐹‘𝑥) → ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠))))
100	80, 99	spcev 3564	. . . 4 ⊢ (∀𝑧(𝑧 ∈ (𝐹‘𝑥) → ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)) → ∃𝑦∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)))
101	79, 100	sylbi 220	. . 3 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) → ∃𝑦∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)))
102	101	exlimiv 1958	. 2 ⊢ (∃𝑠∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) → ∃𝑦∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)))
103	72, 102	syl 18	1 ⊢ ((∀𝑧(𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧) ∧ ∀𝑧∀𝑤((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤)))) → ∃𝑦∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400  ∀wal 1566   = wceq 1568  ∃wex 1807   ∈ wcel 2141  ∃!weu 2594   ≠ wne 2956  ∀wral 3077  Vcvv 3453   ∩ cin 3903   ⊆ wss 3904  ∅c0 4285   class class class wbr 5108   E cep 5560  ^◡ccnv 5660   “ cima 5664   ∘ ccom 5665  Fun wfun 6530   Fn wfn 6531  –1-1→wf1 6533  –1-1-onto→wf1o 6535  ‘cfv 6536

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1823  ax-4 1837  ax-5 1938  ax-6 1995  ax-7 2036  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5237  ax-sep 5256  ax-nul 5268  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-ac2 10446

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1571  df-fal 1581  df-ex 1808  df-nf 1812  df-sb 2095  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-rab 3415  df-v 3455  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-iun 4957  df-br 5109  df-opab 5173  df-mpt 5192  df-id 5556  df-eprel 5561  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-ac 10099

This theorem is referenced by: (None)