Theorem permac8prim 45528

Description: The Axiom of Choice ac8prim 45505 holds in permutation models. Part of Exercise II.9.3 of [Kunen2] p. 149. Note that ax-ac 10402 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 3067	. . . 4 ⊢ (∀𝑧 ∈ (𝐹‘𝑥)(𝐹‘𝑧) ≠ ∅ ↔ ∀𝑧(𝑧 ∈ (𝐹‘𝑥) → (𝐹‘𝑧) ≠ ∅))
2		permmodel.1	. . . . . 6 ⊢ 𝐹:V–1-1-onto→V
3		f1ofn 6792	. . . . . 6 ⊢ (𝐹:V–1-1-onto→V → 𝐹 Fn V)
4	2, 3	ax-mp 5	. . . . 5 ⊢ 𝐹 Fn V
5		ssv 3951	. . . . 5 ⊢ (𝐹‘𝑥) ⊆ V
6		neeq1 3009	. . . . . 6 ⊢ (𝑡 = (𝐹‘𝑧) → (𝑡 ≠ ∅ ↔ (𝐹‘𝑧) ≠ ∅))
7	6	ralima 7206	. . . . 5 ⊢ ((𝐹 Fn V ∧ (𝐹‘𝑥) ⊆ V) → (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ↔ ∀𝑧 ∈ (𝐹‘𝑥)(𝐹‘𝑧) ≠ ∅))
8	4, 5, 7	mp2an 700	. . . 4 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ↔ ∀𝑧 ∈ (𝐹‘𝑥)(𝐹‘𝑧) ≠ ∅)
9		permmodel.2	. . . . . . 7 ⊢ 𝑅 = (◡𝐹 ∘ E )
10		vex 3448	. . . . . . 7 ⊢ 𝑧 ∈ V
11		vex 3448	. . . . . . 7 ⊢ 𝑥 ∈ V
12	2, 9, 10, 11	brpermmodel 45517	. . . . . 6 ⊢ (𝑧𝑅𝑥 ↔ 𝑧 ∈ (𝐹‘𝑥))
13		vex 3448	. . . . . . . . 9 ⊢ 𝑤 ∈ V
14	2, 9, 13, 10	brpermmodel 45517	. . . . . . . 8 ⊢ (𝑤𝑅𝑧 ↔ 𝑤 ∈ (𝐹‘𝑧))
15	14	exbii 1858	. . . . . . 7 ⊢ (∃𝑤 𝑤𝑅𝑧 ↔ ∃𝑤 𝑤 ∈ (𝐹‘𝑧))
16		n0 4296	. . . . . . 7 ⊢ ((𝐹‘𝑧) ≠ ∅ ↔ ∃𝑤 𝑤 ∈ (𝐹‘𝑧))
17	15, 16	bitr4i 280	. . . . . 6 ⊢ (∃𝑤 𝑤𝑅𝑧 ↔ (𝐹‘𝑧) ≠ ∅)
18	12, 17	imbi12i 352	. . . . 5 ⊢ ((𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧) ↔ (𝑧 ∈ (𝐹‘𝑥) → (𝐹‘𝑧) ≠ ∅))
19	18	albii 1829	. . . 4 ⊢ (∀𝑧(𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧) ↔ ∀𝑧(𝑧 ∈ (𝐹‘𝑥) → (𝐹‘𝑧) ≠ ∅))
20	1, 8, 19	3bitr4i 305	. . 3 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ↔ ∀𝑧(𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧))
21		neeq2 3010	. . . . . . . . 9 ⊢ (𝑞 = (𝐹‘𝑤) → (𝑡 ≠ 𝑞 ↔ 𝑡 ≠ (𝐹‘𝑤)))
22		ineq2 4157	. . . . . . . . . 10 ⊢ (𝑞 = (𝐹‘𝑤) → (𝑡 ∩ 𝑞) = (𝑡 ∩ (𝐹‘𝑤)))
23	22	eqeq1d 2754	. . . . . . . . 9 ⊢ (𝑞 = (𝐹‘𝑤) → ((𝑡 ∩ 𝑞) = ∅ ↔ (𝑡 ∩ (𝐹‘𝑤)) = ∅))
24	21, 23	imbi12d 346	. . . . . . . 8 ⊢ (𝑞 = (𝐹‘𝑤) → ((𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ (𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅)))
25	24	ralima 7206	. . . . . . 7 ⊢ ((𝐹 Fn V ∧ (𝐹‘𝑥) ⊆ V) → (∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅)))
26	4, 5, 25	mp2an 700	. . . . . 6 ⊢ (∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅))
27	26	ralbii 3098	. . . . 5 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅))
28		neeq1 3009	. . . . . . . . 9 ⊢ (𝑡 = (𝐹‘𝑧) → (𝑡 ≠ (𝐹‘𝑤) ↔ (𝐹‘𝑧) ≠ (𝐹‘𝑤)))
29		ineq1 4156	. . . . . . . . . 10 ⊢ (𝑡 = (𝐹‘𝑧) → (𝑡 ∩ (𝐹‘𝑤)) = ((𝐹‘𝑧) ∩ (𝐹‘𝑤)))
30	29	eqeq1d 2754	. . . . . . . . 9 ⊢ (𝑡 = (𝐹‘𝑧) → ((𝑡 ∩ (𝐹‘𝑤)) = ∅ ↔ ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅))
31	28, 30	imbi12d 346	. . . . . . . 8 ⊢ (𝑡 = (𝐹‘𝑧) → ((𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅) ↔ ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
32	31	ralbidv 3175	. . . . . . 7 ⊢ (𝑡 = (𝐹‘𝑧) → (∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅) ↔ ∀𝑤 ∈ (𝐹‘𝑥)((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
33	32	ralima 7206	. . . . . 6 ⊢ ((𝐹 Fn V ∧ (𝐹‘𝑥) ⊆ V) → (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅) ↔ ∀𝑧 ∈ (𝐹‘𝑥)∀𝑤 ∈ (𝐹‘𝑥)((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
34	4, 5, 33	mp2an 700	. . . . 5 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑤 ∈ (𝐹‘𝑥)(𝑡 ≠ (𝐹‘𝑤) → (𝑡 ∩ (𝐹‘𝑤)) = ∅) ↔ ∀𝑧 ∈ (𝐹‘𝑥)∀𝑤 ∈ (𝐹‘𝑥)((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅))
35		r2al 3188	. . . . 5 ⊢ (∀𝑧 ∈ (𝐹‘𝑥)∀𝑤 ∈ (𝐹‘𝑥)((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅) ↔ ∀𝑧∀𝑤((𝑧 ∈ (𝐹‘𝑥) ∧ 𝑤 ∈ (𝐹‘𝑥)) → ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
36	27, 34, 35	3bitri 299	. . . 4 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑧∀𝑤((𝑧 ∈ (𝐹‘𝑥) ∧ 𝑤 ∈ (𝐹‘𝑥)) → ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
37	2, 9, 13, 11	brpermmodel 45517	. . . . . . 7 ⊢ (𝑤𝑅𝑥 ↔ 𝑤 ∈ (𝐹‘𝑥))
38	12, 37	anbi12i 636	. . . . . 6 ⊢ ((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) ↔ (𝑧 ∈ (𝐹‘𝑥) ∧ 𝑤 ∈ (𝐹‘𝑥)))
39		df-ne 2948	. . . . . . . 8 ⊢ ((𝐹‘𝑧) ≠ (𝐹‘𝑤) ↔ ¬ (𝐹‘𝑧) = (𝐹‘𝑤))
40		f1of1 6790	. . . . . . . . . . . 12 ⊢ (𝐹:V–1-1-onto→V → 𝐹:V–1-1→V)
41	2, 40	ax-mp 5	. . . . . . . . . . 11 ⊢ 𝐹:V–1-1→V
42		f1fveq 7231	. . . . . . . . . . 11 ⊢ ((𝐹:V–1-1→V ∧ (𝑧 ∈ V ∧ 𝑤 ∈ V)) → ((𝐹‘𝑧) = (𝐹‘𝑤) ↔ 𝑧 = 𝑤))
43	41, 42	mpan 698	. . . . . . . . . 10 ⊢ ((𝑧 ∈ V ∧ 𝑤 ∈ V) → ((𝐹‘𝑧) = (𝐹‘𝑤) ↔ 𝑧 = 𝑤))
44	43	el2v 3451	. . . . . . . . 9 ⊢ ((𝐹‘𝑧) = (𝐹‘𝑤) ↔ 𝑧 = 𝑤)
45	44	notbii 322	. . . . . . . 8 ⊢ (¬ (𝐹‘𝑧) = (𝐹‘𝑤) ↔ ¬ 𝑧 = 𝑤)
46	39, 45	bitr2i 278	. . . . . . 7 ⊢ (¬ 𝑧 = 𝑤 ↔ (𝐹‘𝑧) ≠ (𝐹‘𝑤))
47		vex 3448	. . . . . . . . . . 11 ⊢ 𝑦 ∈ V
48	2, 9, 47, 10	brpermmodel 45517	. . . . . . . . . 10 ⊢ (𝑦𝑅𝑧 ↔ 𝑦 ∈ (𝐹‘𝑧))
49	2, 9, 47, 13	brpermmodel 45517	. . . . . . . . . . 11 ⊢ (𝑦𝑅𝑤 ↔ 𝑦 ∈ (𝐹‘𝑤))
50	49	notbii 322	. . . . . . . . . 10 ⊢ (¬ 𝑦𝑅𝑤 ↔ ¬ 𝑦 ∈ (𝐹‘𝑤))
51	48, 50	imbi12i 352	. . . . . . . . 9 ⊢ ((𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤) ↔ (𝑦 ∈ (𝐹‘𝑧) → ¬ 𝑦 ∈ (𝐹‘𝑤)))
52	51	albii 1829	. . . . . . . 8 ⊢ (∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤) ↔ ∀𝑦(𝑦 ∈ (𝐹‘𝑧) → ¬ 𝑦 ∈ (𝐹‘𝑤)))
53		disj1 4396	. . . . . . . 8 ⊢ (((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅ ↔ ∀𝑦(𝑦 ∈ (𝐹‘𝑧) → ¬ 𝑦 ∈ (𝐹‘𝑤)))
54	52, 53	bitr4i 280	. . . . . . 7 ⊢ (∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤) ↔ ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)
55	46, 54	imbi12i 352	. . . . . 6 ⊢ ((¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤)) ↔ ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅))
56	38, 55	imbi12i 352	. . . . 5 ⊢ (((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤))) ↔ ((𝑧 ∈ (𝐹‘𝑥) ∧ 𝑤 ∈ (𝐹‘𝑥)) → ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
57	56	2albii 1830	. . . 4 ⊢ (∀𝑧∀𝑤((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤))) ↔ ∀𝑧∀𝑤((𝑧 ∈ (𝐹‘𝑥) ∧ 𝑤 ∈ (𝐹‘𝑥)) → ((𝐹‘𝑧) ≠ (𝐹‘𝑤) → ((𝐹‘𝑧) ∩ (𝐹‘𝑤)) = ∅)))
58	36, 57	bitr4i 280	. . 3 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑧∀𝑤((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤))))
59		f1ofun 6793	. . . . 5 ⊢ (𝐹:V–1-1-onto→V → Fun 𝐹)
60		fvex 6865	. . . . . 6 ⊢ (𝐹‘𝑥) ∈ V
61	60	funimaex 6594	. . . . 5 ⊢ (Fun 𝐹 → (𝐹 “ (𝐹‘𝑥)) ∈ V)
62	2, 59, 61	mp2b 10	. . . 4 ⊢ (𝐹 “ (𝐹‘𝑥)) ∈ V
63		raleq 3307	. . . . . 6 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (∀𝑡 ∈ 𝑟 𝑡 ≠ ∅ ↔ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅))
64		raleq 3307	. . . . . . 7 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (∀𝑞 ∈ 𝑟 (𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)))
65	64	raleqbi1dv 3320	. . . . . 6 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (∀𝑡 ∈ 𝑟 ∀𝑞 ∈ 𝑟 (𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅) ↔ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)))
66	63, 65	anbi12d 640	. . . . 5 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → ((∀𝑡 ∈ 𝑟 𝑡 ≠ ∅ ∧ ∀𝑡 ∈ 𝑟 ∀𝑞 ∈ 𝑟 (𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)) ↔ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ∧ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅))))
67		raleq 3307	. . . . . 6 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (∀𝑡 ∈ 𝑟 ∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠)))
68	67	exbidv 1931	. . . . 5 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (∃𝑠∀𝑡 ∈ 𝑟 ∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∃𝑠∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠)))
69	66, 68	imbi12d 346	. . . 4 ⊢ (𝑟 = (𝐹 “ (𝐹‘𝑥)) → (((∀𝑡 ∈ 𝑟 𝑡 ≠ ∅ ∧ ∀𝑡 ∈ 𝑟 ∀𝑞 ∈ 𝑟 (𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)) → ∃𝑠∀𝑡 ∈ 𝑟 ∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠)) ↔ ((∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ∧ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)) → ∃𝑠∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠))))
70		ac8 10435	. . . 4 ⊢ ((∀𝑡 ∈ 𝑟 𝑡 ≠ ∅ ∧ ∀𝑡 ∈ 𝑟 ∀𝑞 ∈ 𝑟 (𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)) → ∃𝑠∀𝑡 ∈ 𝑟 ∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠))
71	62, 69, 70	vtocl 3515	. . 3 ⊢ ((∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))𝑡 ≠ ∅ ∧ ∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∀𝑞 ∈ (𝐹 “ (𝐹‘𝑥))(𝑡 ≠ 𝑞 → (𝑡 ∩ 𝑞) = ∅)) → ∃𝑠∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠))
72	20, 58, 71	syl2anbr 607	. 2 ⊢ ((∀𝑧(𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧) ∧ ∀𝑧∀𝑤((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤)))) → ∃𝑠∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠))
73		ineq1 4156	. . . . . . . . 9 ⊢ (𝑡 = (𝐹‘𝑧) → (𝑡 ∩ 𝑠) = ((𝐹‘𝑧) ∩ 𝑠))
74	73	eleq2d 2838	. . . . . . . 8 ⊢ (𝑡 = (𝐹‘𝑧) → (𝑣 ∈ (𝑡 ∩ 𝑠) ↔ 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
75	74	eubidv 2603	. . . . . . 7 ⊢ (𝑡 = (𝐹‘𝑧) → (∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
76	75	ralima 7206	. . . . . 6 ⊢ ((𝐹 Fn V ∧ (𝐹‘𝑥) ⊆ V) → (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∀𝑧 ∈ (𝐹‘𝑥)∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
77	4, 5, 76	mp2an 700	. . . . 5 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∀𝑧 ∈ (𝐹‘𝑥)∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠))
78		df-ral 3067	. . . . 5 ⊢ (∀𝑧 ∈ (𝐹‘𝑥)∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠) ↔ ∀𝑧(𝑧 ∈ (𝐹‘𝑥) → ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
79	77, 78	bitri 277	. . . 4 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) ↔ ∀𝑧(𝑧 ∈ (𝐹‘𝑥) → ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
80		fvex 6865	. . . . 5 ⊢ (◡𝐹‘𝑠) ∈ V
81	12	a1i 11	. . . . . . 7 ⊢ (𝑦 = (◡𝐹‘𝑠) → (𝑧𝑅𝑥 ↔ 𝑧 ∈ (𝐹‘𝑥)))
82		vex 3448	. . . . . . . . . . . . . 14 ⊢ 𝑣 ∈ V
83	2, 9, 82, 10	brpermmodel 45517	. . . . . . . . . . . . 13 ⊢ (𝑣𝑅𝑧 ↔ 𝑣 ∈ (𝐹‘𝑧))
84	83	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑦 = (◡𝐹‘𝑠) → (𝑣𝑅𝑧 ↔ 𝑣 ∈ (𝐹‘𝑧)))
85		breq2 5094	. . . . . . . . . . . . 13 ⊢ (𝑦 = (◡𝐹‘𝑠) → (𝑣𝑅𝑦 ↔ 𝑣𝑅(◡𝐹‘𝑠)))
86		vex 3448	. . . . . . . . . . . . . 14 ⊢ 𝑠 ∈ V
87	2, 9, 82, 86	brpermmodelcnv 45518	. . . . . . . . . . . . 13 ⊢ (𝑣𝑅(◡𝐹‘𝑠) ↔ 𝑣 ∈ 𝑠)
88	85, 87	bitrdi 289	. . . . . . . . . . . 12 ⊢ (𝑦 = (◡𝐹‘𝑠) → (𝑣𝑅𝑦 ↔ 𝑣 ∈ 𝑠))
89	84, 88	anbi12d 640	. . . . . . . . . . 11 ⊢ (𝑦 = (◡𝐹‘𝑠) → ((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ (𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠)))
90	89	bibi1d 345	. . . . . . . . . 10 ⊢ (𝑦 = (◡𝐹‘𝑠) → (((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤) ↔ ((𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ 𝑣 = 𝑤)))
91	90	albidv 1930	. . . . . . . . 9 ⊢ (𝑦 = (◡𝐹‘𝑠) → (∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤) ↔ ∀𝑣((𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ 𝑣 = 𝑤)))
92	91	exbidv 1931	. . . . . . . 8 ⊢ (𝑦 = (◡𝐹‘𝑠) → (∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤) ↔ ∃𝑤∀𝑣((𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ 𝑣 = 𝑤)))
93		elin 3911	. . . . . . . . . 10 ⊢ (𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠) ↔ (𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠))
94	93	eubii 2602	. . . . . . . . 9 ⊢ (∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠) ↔ ∃!𝑣(𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠))
95		eu6 2591	. . . . . . . . 9 ⊢ (∃!𝑣(𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ ∃𝑤∀𝑣((𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ 𝑣 = 𝑤))
96	94, 95	bitri 277	. . . . . . . 8 ⊢ (∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠) ↔ ∃𝑤∀𝑣((𝑣 ∈ (𝐹‘𝑧) ∧ 𝑣 ∈ 𝑠) ↔ 𝑣 = 𝑤))
97	92, 96	bitr4di 291	. . . . . . 7 ⊢ (𝑦 = (◡𝐹‘𝑠) → (∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤) ↔ ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)))
98	81, 97	imbi12d 346	. . . . . 6 ⊢ (𝑦 = (◡𝐹‘𝑠) → ((𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)) ↔ (𝑧 ∈ (𝐹‘𝑥) → ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠))))
99	98	albidv 1930	. . . . 5 ⊢ (𝑦 = (◡𝐹‘𝑠) → (∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)) ↔ ∀𝑧(𝑧 ∈ (𝐹‘𝑥) → ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠))))
100	80, 99	spcev 3556	. . . 4 ⊢ (∀𝑧(𝑧 ∈ (𝐹‘𝑥) → ∃!𝑣 𝑣 ∈ ((𝐹‘𝑧) ∩ 𝑠)) → ∃𝑦∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)))
101	79, 100	sylbi 219	. . 3 ⊢ (∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) → ∃𝑦∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)))
102	101	exlimiv 1940	. 2 ⊢ (∃𝑠∀𝑡 ∈ (𝐹 “ (𝐹‘𝑥))∃!𝑣 𝑣 ∈ (𝑡 ∩ 𝑠) → ∃𝑦∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)))
103	72, 102	syl 17	1 ⊢ ((∀𝑧(𝑧𝑅𝑥 → ∃𝑤 𝑤𝑅𝑧) ∧ ∀𝑧∀𝑤((𝑧𝑅𝑥 ∧ 𝑤𝑅𝑥) → (¬ 𝑧 = 𝑤 → ∀𝑦(𝑦𝑅𝑧 → ¬ 𝑦𝑅𝑤)))) → ∃𝑦∀𝑧(𝑧𝑅𝑥 → ∃𝑤∀𝑣((𝑣𝑅𝑧 ∧ 𝑣𝑅𝑦) ↔ 𝑣 = 𝑤)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398  ∀wal 1548   = wceq 1550  ∃wex 1789   ∈ wcel 2132  ∃!weu 2585   ≠ wne 2947  ∀wral 3066  Vcvv 3444   ∩ cin 3894   ⊆ wss 3895  ∅c0 4276   class class class wbr 5090   E cep 5535  ^◡ccnv 5635   “ cima 5639   ∘ ccom 5640  Fun wfun 6500   Fn wfn 6501  –1-1→wf1 6503  –1-1-onto→wf1o 6505  ‘cfv 6506

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1805  ax-4 1819  ax-5 1920  ax-6 1977  ax-7 2018  ax-8 2134  ax-9 2142  ax-10 2165  ax-11 2181  ax-12 2202  ax-ext 2724  ax-rep 5217  ax-sep 5236  ax-nul 5246  ax-pow 5312  ax-pr 5380  ax-un 7703  ax-ac2 10406

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3an 1097  df-tru 1553  df-fal 1563  df-ex 1790  df-nf 1794  df-sb 2081  df-mo 2556  df-eu 2586  df-clab 2731  df-cleq 2744  df-clel 2827  df-nfc 2901  df-ne 2948  df-ral 3067  df-rex 3077  df-rab 3405  df-v 3446  df-sbc 3736  df-csb 3844  df-dif 3898  df-un 3900  df-in 3902  df-ss 3912  df-nul 4277  df-if 4471  df-pw 4547  df-sn 4573  df-pr 4575  df-op 4579  df-uni 4856  df-iun 4941  df-br 5091  df-opab 5153  df-mpt 5172  df-id 5531  df-eprel 5536  df-xp 5642  df-rel 5643  df-cnv 5644  df-co 5645  df-dm 5646  df-rn 5647  df-res 5648  df-ima 5649  df-iota 6462  df-fun 6508  df-fn 6509  df-f 6510  df-f1 6511  df-fo 6512  df-f1o 6513  df-fv 6514  df-ac 10058

This theorem is referenced by: (None)