Theorem aomclem1 43411

Description: Lemma for dfac11 43419. This is the beginning of the proof that multiple choice is equivalent to choice. Our goal is to construct, by transfinite recursion, a well-ordering of (𝑅₁‘𝐴). In what follows, 𝐴 is the index of the rank we wish to well-order, 𝑧 is the collection of well-orderings constructed so far, dom 𝑧 is the set of ordinal indices of constructed ranks i.e. the next rank to construct, and 𝑦 is a postulated multiple-choice function.

Successor case 1, define a simple ordering from the well-ordered predecessor. (Contributed by Stefan O'Rear, 18-Jan-2015.)

Hypotheses

Ref	Expression
aomclem1.b	⊢ 𝐵 = {⟨𝑎, 𝑏⟩ ∣ ∃𝑐 ∈ (𝑅1‘∪ dom 𝑧)((𝑐 ∈ 𝑏 ∧ ¬ 𝑐 ∈ 𝑎) ∧ ∀𝑑 ∈ (𝑅1‘∪ dom 𝑧)(𝑑(𝑧‘∪ dom 𝑧)𝑐 → (𝑑 ∈ 𝑎 ↔ 𝑑 ∈ 𝑏)))}
aomclem1.on	⊢ (𝜑 → dom 𝑧 ∈ On)
aomclem1.su	⊢ (𝜑 → dom 𝑧 = suc ∪ dom 𝑧)
aomclem1.we	⊢ (𝜑 → ∀𝑎 ∈ dom 𝑧(𝑧‘𝑎) We (𝑅1‘𝑎))

Assertion

Ref	Expression
aomclem1	⊢ (𝜑 → 𝐵 Or (𝑅1‘dom 𝑧))

Distinct variable group:   𝑧,𝑎,𝑏,𝑐,𝑑

Allowed substitution hints:   𝜑(𝑧,𝑎,𝑏,𝑐,𝑑)   𝐵(𝑧,𝑎,𝑏,𝑐,𝑑)

Proof of Theorem aomclem1

Step	Hyp	Ref	Expression
1		fvex 6855	. . 3 ⊢ (𝑅1‘∪ dom 𝑧) ∈ V
2		vex 3446	. . . . . . . 8 ⊢ 𝑧 ∈ V
3	2	dmex 7861	. . . . . . 7 ⊢ dom 𝑧 ∈ V
4	3	uniex 7696	. . . . . 6 ⊢ ∪ dom 𝑧 ∈ V
5	4	sucid 6409	. . . . 5 ⊢ ∪ dom 𝑧 ∈ suc ∪ dom 𝑧
6		aomclem1.su	. . . . 5 ⊢ (𝜑 → dom 𝑧 = suc ∪ dom 𝑧)
7	5, 6	eleqtrrid 2844	. . . 4 ⊢ (𝜑 → ∪ dom 𝑧 ∈ dom 𝑧)
8		aomclem1.we	. . . 4 ⊢ (𝜑 → ∀𝑎 ∈ dom 𝑧(𝑧‘𝑎) We (𝑅1‘𝑎))
9		fveq2 6842	. . . . . 6 ⊢ (𝑎 = ∪ dom 𝑧 → (𝑧‘𝑎) = (𝑧‘∪ dom 𝑧))
10		fveq2 6842	. . . . . 6 ⊢ (𝑎 = ∪ dom 𝑧 → (𝑅1‘𝑎) = (𝑅1‘∪ dom 𝑧))
11	9, 10	weeq12d 5621	. . . . 5 ⊢ (𝑎 = ∪ dom 𝑧 → ((𝑧‘𝑎) We (𝑅1‘𝑎) ↔ (𝑧‘∪ dom 𝑧) We (𝑅1‘∪ dom 𝑧)))
12	11	rspcva 3576	. . . 4 ⊢ ((∪ dom 𝑧 ∈ dom 𝑧 ∧ ∀𝑎 ∈ dom 𝑧(𝑧‘𝑎) We (𝑅1‘𝑎)) → (𝑧‘∪ dom 𝑧) We (𝑅1‘∪ dom 𝑧))
13	7, 8, 12	syl2anc 585	. . 3 ⊢ (𝜑 → (𝑧‘∪ dom 𝑧) We (𝑅1‘∪ dom 𝑧))
14		aomclem1.b	. . . 4 ⊢ 𝐵 = {⟨𝑎, 𝑏⟩ ∣ ∃𝑐 ∈ (𝑅1‘∪ dom 𝑧)((𝑐 ∈ 𝑏 ∧ ¬ 𝑐 ∈ 𝑎) ∧ ∀𝑑 ∈ (𝑅1‘∪ dom 𝑧)(𝑑(𝑧‘∪ dom 𝑧)𝑐 → (𝑑 ∈ 𝑎 ↔ 𝑑 ∈ 𝑏)))}
15	14	wepwso 43400	. . 3 ⊢ (((𝑅1‘∪ dom 𝑧) ∈ V ∧ (𝑧‘∪ dom 𝑧) We (𝑅1‘∪ dom 𝑧)) → 𝐵 Or 𝒫 (𝑅1‘∪ dom 𝑧))
16	1, 13, 15	sylancr 588	. 2 ⊢ (𝜑 → 𝐵 Or 𝒫 (𝑅1‘∪ dom 𝑧))
17	6	fveq2d 6846	. . . 4 ⊢ (𝜑 → (𝑅1‘dom 𝑧) = (𝑅1‘suc ∪ dom 𝑧))
18		aomclem1.on	. . . . 5 ⊢ (𝜑 → dom 𝑧 ∈ On)
19		onuni 7743	. . . . 5 ⊢ (dom 𝑧 ∈ On → ∪ dom 𝑧 ∈ On)
20		r1suc 9694	. . . . 5 ⊢ (∪ dom 𝑧 ∈ On → (𝑅1‘suc ∪ dom 𝑧) = 𝒫 (𝑅1‘∪ dom 𝑧))
21	18, 19, 20	3syl 18	. . . 4 ⊢ (𝜑 → (𝑅1‘suc ∪ dom 𝑧) = 𝒫 (𝑅1‘∪ dom 𝑧))
22	17, 21	eqtrd 2772	. . 3 ⊢ (𝜑 → (𝑅1‘dom 𝑧) = 𝒫 (𝑅1‘∪ dom 𝑧))
23		soeq2 5562	. . 3 ⊢ ((𝑅1‘dom 𝑧) = 𝒫 (𝑅1‘∪ dom 𝑧) → (𝐵 Or (𝑅1‘dom 𝑧) ↔ 𝐵 Or 𝒫 (𝑅1‘∪ dom 𝑧)))
24	22, 23	syl 17	. 2 ⊢ (𝜑 → (𝐵 Or (𝑅1‘dom 𝑧) ↔ 𝐵 Or 𝒫 (𝑅1‘∪ dom 𝑧)))
25	16, 24	mpbird 257	1 ⊢ (𝜑 → 𝐵 Or (𝑅1‘dom 𝑧))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1542   ∈ wcel 2114  ∀wral 3052  ∃wrex 3062  Vcvv 3442  𝒫 cpw 4556  ∪ cuni 4865   class class class wbr 5100  {copab 5162   Or wor 5539   We wwe 5584  dom cdm 5632  Oncon0 6325  suc csuc 6327  ‘cfv 6500  𝑅₁cr1 9686

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-isom 6509  df-ov 7371  df-oprab 7372  df-mpo 7373  df-om 7819  df-1st 7943  df-2nd 7944  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-2o 8408  df-map 8777  df-r1 9688

This theorem is referenced by:  aomclem2  43412