Theorem dfacacn 9165

Description: A choice equivalent: every set has choice sets of every length. (Contributed by Mario Carneiro, 31-Aug-2015.)

Assertion

Ref	Expression
dfacacn	⊢ (CHOICE ↔ ∀𝑥AC 𝑥 = V)

Proof of Theorem dfacacn

Dummy variables 𝑓 𝑔 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		vex 3354	. . . 4 ⊢ 𝑥 ∈ V
2		acacni 9164	. . . 4 ⊢ ((CHOICE ∧ 𝑥 ∈ V) → AC 𝑥 = V)
3	1, 2	mpan2 671	. . 3 ⊢ (CHOICE → AC 𝑥 = V)
4	3	alrimiv 2007	. 2 ⊢ (CHOICE → ∀𝑥AC 𝑥 = V)
5		vex 3354	. . . . . . 7 ⊢ 𝑦 ∈ V
6		difexg 4942	. . . . . . 7 ⊢ (𝑦 ∈ V → (𝑦 ∖ {∅}) ∈ V)
7	5, 6	ax-mp 5	. . . . . 6 ⊢ (𝑦 ∖ {∅}) ∈ V
8		acneq 9066	. . . . . . 7 ⊢ (𝑥 = (𝑦 ∖ {∅}) → AC 𝑥 = AC (𝑦 ∖ {∅}))
9	8	eqeq1d 2773	. . . . . 6 ⊢ (𝑥 = (𝑦 ∖ {∅}) → (AC 𝑥 = V ↔ AC (𝑦 ∖ {∅}) = V))
10	7, 9	spcv 3450	. . . . 5 ⊢ (∀𝑥AC 𝑥 = V → AC (𝑦 ∖ {∅}) = V)
11		vuniex 7101	. . . . . . 7 ⊢ ∪ 𝑦 ∈ V
12		id 22	. . . . . . 7 ⊢ (AC (𝑦 ∖ {∅}) = V → AC (𝑦 ∖ {∅}) = V)
13	11, 12	syl5eleqr 2857	. . . . . 6 ⊢ (AC (𝑦 ∖ {∅}) = V → ∪ 𝑦 ∈ AC (𝑦 ∖ {∅}))
14		eldifi 3883	. . . . . . . . 9 ⊢ (𝑧 ∈ (𝑦 ∖ {∅}) → 𝑧 ∈ 𝑦)
15		elssuni 4603	. . . . . . . . 9 ⊢ (𝑧 ∈ 𝑦 → 𝑧 ⊆ ∪ 𝑦)
16	14, 15	syl 17	. . . . . . . 8 ⊢ (𝑧 ∈ (𝑦 ∖ {∅}) → 𝑧 ⊆ ∪ 𝑦)
17		eldifsni 4457	. . . . . . . 8 ⊢ (𝑧 ∈ (𝑦 ∖ {∅}) → 𝑧 ≠ ∅)
18	16, 17	jca 501	. . . . . . 7 ⊢ (𝑧 ∈ (𝑦 ∖ {∅}) → (𝑧 ⊆ ∪ 𝑦 ∧ 𝑧 ≠ ∅))
19	18	rgen 3071	. . . . . 6 ⊢ ∀𝑧 ∈ (𝑦 ∖ {∅})(𝑧 ⊆ ∪ 𝑦 ∧ 𝑧 ≠ ∅)
20		acni2 9069	. . . . . 6 ⊢ ((∪ 𝑦 ∈ AC (𝑦 ∖ {∅}) ∧ ∀𝑧 ∈ (𝑦 ∖ {∅})(𝑧 ⊆ ∪ 𝑦 ∧ 𝑧 ≠ ∅)) → ∃𝑔(𝑔:(𝑦 ∖ {∅})⟶∪ 𝑦 ∧ ∀𝑧 ∈ (𝑦 ∖ {∅})(𝑔‘𝑧) ∈ 𝑧))
21	13, 19, 20	sylancl 574	. . . . 5 ⊢ (AC (𝑦 ∖ {∅}) = V → ∃𝑔(𝑔:(𝑦 ∖ {∅})⟶∪ 𝑦 ∧ ∀𝑧 ∈ (𝑦 ∖ {∅})(𝑔‘𝑧) ∈ 𝑧))
22	5	mptex 6630	. . . . . . 7 ⊢ (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) ∈ V
23		simpr 471	. . . . . . . . 9 ⊢ ((𝑔:(𝑦 ∖ {∅})⟶∪ 𝑦 ∧ ∀𝑧 ∈ (𝑦 ∖ {∅})(𝑔‘𝑧) ∈ 𝑧) → ∀𝑧 ∈ (𝑦 ∖ {∅})(𝑔‘𝑧) ∈ 𝑧)
24		eldifsn 4453	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ (𝑦 ∖ {∅}) ↔ (𝑧 ∈ 𝑦 ∧ 𝑧 ≠ ∅))
25	24	imbi1i 338	. . . . . . . . . . 11 ⊢ ((𝑧 ∈ (𝑦 ∖ {∅}) → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧) ↔ ((𝑧 ∈ 𝑦 ∧ 𝑧 ≠ ∅) → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧))
26		fveq2 6332	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑧 → (𝑔‘𝑥) = (𝑔‘𝑧))
27		eqid 2771	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) = (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))
28		fvex 6342	. . . . . . . . . . . . . . 15 ⊢ (𝑔‘𝑧) ∈ V
29	26, 27, 28	fvmpt 6424	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ 𝑦 → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) = (𝑔‘𝑧))
30	14, 29	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ (𝑦 ∖ {∅}) → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) = (𝑔‘𝑧))
31	30	eleq1d 2835	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ (𝑦 ∖ {∅}) → (((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧 ↔ (𝑔‘𝑧) ∈ 𝑧))
32	31	pm5.74i 260	. . . . . . . . . . 11 ⊢ ((𝑧 ∈ (𝑦 ∖ {∅}) → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧) ↔ (𝑧 ∈ (𝑦 ∖ {∅}) → (𝑔‘𝑧) ∈ 𝑧))
33		impexp 437	. . . . . . . . . . 11 ⊢ (((𝑧 ∈ 𝑦 ∧ 𝑧 ≠ ∅) → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧) ↔ (𝑧 ∈ 𝑦 → (𝑧 ≠ ∅ → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧)))
34	25, 32, 33	3bitr3i 290	. . . . . . . . . 10 ⊢ ((𝑧 ∈ (𝑦 ∖ {∅}) → (𝑔‘𝑧) ∈ 𝑧) ↔ (𝑧 ∈ 𝑦 → (𝑧 ≠ ∅ → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧)))
35	34	ralbii2 3127	. . . . . . . . 9 ⊢ (∀𝑧 ∈ (𝑦 ∖ {∅})(𝑔‘𝑧) ∈ 𝑧 ↔ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧))
36	23, 35	sylib 208	. . . . . . . 8 ⊢ ((𝑔:(𝑦 ∖ {∅})⟶∪ 𝑦 ∧ ∀𝑧 ∈ (𝑦 ∖ {∅})(𝑔‘𝑧) ∈ 𝑧) → ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧))
37		fvrn0 6357	. . . . . . . . . . 11 ⊢ (𝑔‘𝑥) ∈ (ran 𝑔 ∪ {∅})
38	37	rgenw 3073	. . . . . . . . . 10 ⊢ ∀𝑥 ∈ 𝑦 (𝑔‘𝑥) ∈ (ran 𝑔 ∪ {∅})
39	27	fmpt 6523	. . . . . . . . . 10 ⊢ (∀𝑥 ∈ 𝑦 (𝑔‘𝑥) ∈ (ran 𝑔 ∪ {∅}) ↔ (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)):𝑦⟶(ran 𝑔 ∪ {∅}))
40	38, 39	mpbi 220	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)):𝑦⟶(ran 𝑔 ∪ {∅})
41		ffn 6185	. . . . . . . . 9 ⊢ ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)):𝑦⟶(ran 𝑔 ∪ {∅}) → (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) Fn 𝑦)
42	40, 41	ax-mp 5	. . . . . . . 8 ⊢ (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) Fn 𝑦
43	36, 42	jctil 509	. . . . . . 7 ⊢ ((𝑔:(𝑦 ∖ {∅})⟶∪ 𝑦 ∧ ∀𝑧 ∈ (𝑦 ∖ {∅})(𝑔‘𝑧) ∈ 𝑧) → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) Fn 𝑦 ∧ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧)))
44		fneq1 6119	. . . . . . . . 9 ⊢ (𝑓 = (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) → (𝑓 Fn 𝑦 ↔ (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) Fn 𝑦))
45		fveq1 6331	. . . . . . . . . . . 12 ⊢ (𝑓 = (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) → (𝑓‘𝑧) = ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧))
46	45	eleq1d 2835	. . . . . . . . . . 11 ⊢ (𝑓 = (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) → ((𝑓‘𝑧) ∈ 𝑧 ↔ ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧))
47	46	imbi2d 329	. . . . . . . . . 10 ⊢ (𝑓 = (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) → ((𝑧 ≠ ∅ → (𝑓‘𝑧) ∈ 𝑧) ↔ (𝑧 ≠ ∅ → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧)))
48	47	ralbidv 3135	. . . . . . . . 9 ⊢ (𝑓 = (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) → (∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → (𝑓‘𝑧) ∈ 𝑧) ↔ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧)))
49	44, 48	anbi12d 616	. . . . . . . 8 ⊢ (𝑓 = (𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) → ((𝑓 Fn 𝑦 ∧ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → (𝑓‘𝑧) ∈ 𝑧)) ↔ ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) Fn 𝑦 ∧ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧))))
50	49	spcegv 3445	. . . . . . 7 ⊢ ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) ∈ V → (((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥)) Fn 𝑦 ∧ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → ((𝑥 ∈ 𝑦 ↦ (𝑔‘𝑥))‘𝑧) ∈ 𝑧)) → ∃𝑓(𝑓 Fn 𝑦 ∧ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → (𝑓‘𝑧) ∈ 𝑧))))
51	22, 43, 50	mpsyl 68	. . . . . 6 ⊢ ((𝑔:(𝑦 ∖ {∅})⟶∪ 𝑦 ∧ ∀𝑧 ∈ (𝑦 ∖ {∅})(𝑔‘𝑧) ∈ 𝑧) → ∃𝑓(𝑓 Fn 𝑦 ∧ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → (𝑓‘𝑧) ∈ 𝑧)))
52	51	exlimiv 2010	. . . . 5 ⊢ (∃𝑔(𝑔:(𝑦 ∖ {∅})⟶∪ 𝑦 ∧ ∀𝑧 ∈ (𝑦 ∖ {∅})(𝑔‘𝑧) ∈ 𝑧) → ∃𝑓(𝑓 Fn 𝑦 ∧ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → (𝑓‘𝑧) ∈ 𝑧)))
53	10, 21, 52	3syl 18	. . . 4 ⊢ (∀𝑥AC 𝑥 = V → ∃𝑓(𝑓 Fn 𝑦 ∧ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → (𝑓‘𝑧) ∈ 𝑧)))
54	53	alrimiv 2007	. . 3 ⊢ (∀𝑥AC 𝑥 = V → ∀𝑦∃𝑓(𝑓 Fn 𝑦 ∧ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → (𝑓‘𝑧) ∈ 𝑧)))
55		dfac4 9145	. . 3 ⊢ (CHOICE ↔ ∀𝑦∃𝑓(𝑓 Fn 𝑦 ∧ ∀𝑧 ∈ 𝑦 (𝑧 ≠ ∅ → (𝑓‘𝑧) ∈ 𝑧)))
56	54, 55	sylibr 224	. 2 ⊢ (∀𝑥AC 𝑥 = V → CHOICE)
57	4, 56	impbii 199	1 ⊢ (CHOICE ↔ ∀𝑥AC 𝑥 = V)

Syntax hints:   → wi 4   ↔ wb 196   ∧ wa 382  ∀wal 1629   = wceq 1631  ∃wex 1852   ∈ wcel 2145   ≠ wne 2943  ∀wral 3061  Vcvv 3351   ∖ cdif 3720   ∪ cun 3721   ⊆ wss 3723  ∅c0 4063  {csn 4316  ∪ cuni 4574   ↦ cmpt 4863  ran crn 5250   Fn wfn 6026  ⟶wf 6027  ‘cfv 6031  AC wacn 8964  CHOICEwac 9138

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1870  ax-4 1885  ax-5 1991  ax-6 2057  ax-7 2093  ax-8 2147  ax-9 2154  ax-10 2174  ax-11 2190  ax-12 2203  ax-13 2408  ax-ext 2751  ax-rep 4904  ax-sep 4915  ax-nul 4923  ax-pow 4974  ax-pr 5034  ax-un 7096

This theorem depends on definitions:  df-bi 197  df-an 383  df-or 837  df-3or 1072  df-3an 1073  df-tru 1634  df-ex 1853  df-nf 1858  df-sb 2050  df-eu 2622  df-mo 2623  df-clab 2758  df-cleq 2764  df-clel 2767  df-nfc 2902  df-ne 2944  df-ral 3066  df-rex 3067  df-reu 3068  df-rmo 3069  df-rab 3070  df-v 3353  df-sbc 3588  df-csb 3683  df-dif 3726  df-un 3728  df-in 3730  df-ss 3737  df-pss 3739  df-nul 4064  df-if 4226  df-pw 4299  df-sn 4317  df-pr 4319  df-tp 4321  df-op 4323  df-uni 4575  df-int 4612  df-iun 4656  df-br 4787  df-opab 4847  df-mpt 4864  df-tr 4887  df-id 5157  df-eprel 5162  df-po 5170  df-so 5171  df-fr 5208  df-se 5209  df-we 5210  df-xp 5255  df-rel 5256  df-cnv 5257  df-co 5258  df-dm 5259  df-rn 5260  df-res 5261  df-ima 5262  df-pred 5823  df-ord 5869  df-on 5870  df-suc 5872  df-iota 5994  df-fun 6033  df-fn 6034  df-f 6035  df-f1 6036  df-fo 6037  df-f1o 6038  df-fv 6039  df-isom 6040  df-riota 6754  df-ov 6796  df-oprab 6797  df-mpt2 6798  df-1st 7315  df-2nd 7316  df-wrecs 7559  df-recs 7621  df-er 7896  df-map 8011  df-en 8110  df-dom 8111  df-card 8965  df-acn 8968  df-ac 9139

This theorem is referenced by:  dfac13  9166