Theorem fin1a2lem11 9115

Description: Lemma for fin1a2 9120. (Contributed by Stefan O'Rear, 8-Nov-2014.)

Assertion

Ref	Expression
fin1a2lem11	⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ran (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = (𝐴 ∪ {∅}))

Distinct variable group:   𝑏,𝑐,𝐴

Proof of Theorem fin1a2lem11

Dummy variable 𝑑 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqid 2610	. . 3 ⊢ (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
2	1	rnmpt 5292	. 2 ⊢ ran (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = {𝑑 ∣ ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}}
3		unieq 4380	. . . . . . . . . . . 12 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ ∅)
4		uni0 4401	. . . . . . . . . . . 12 ⊢ ∪ ∅ = ∅
5	3, 4	syl6eq 2660	. . . . . . . . . . 11 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
6	5	adantl 481	. . . . . . . . . 10 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
7		0ex 4718	. . . . . . . . . . 11 ⊢ ∅ ∈ V
8	7	elsn2 4158	. . . . . . . . . 10 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅} ↔ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
9	6, 8	sylibr 223	. . . . . . . . 9 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅})
10	9	olcd 407	. . . . . . . 8 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
11		ssrab2 3650	. . . . . . . . . 10 ⊢ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ⊆ 𝐴
12		simpr 476	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅)
13		simplll 794	. . . . . . . . . . . 12 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → [⊊] Or 𝐴)
14		simpllr 795	. . . . . . . . . . . 12 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → 𝐴 ⊆ Fin)
15		simplr 788	. . . . . . . . . . . 12 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → 𝑏 ∈ ω)
16		fin1a2lem9 9113	. . . . . . . . . . . 12 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin ∧ 𝑏 ∈ ω) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin)
17	13, 14, 15, 16	syl3anc 1318	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin)
18		soss 4977	. . . . . . . . . . . 12 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ⊆ 𝐴 → ( [⊊] Or 𝐴 → [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
19	11, 13, 18	mpsyl 66	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
20		fin1a2lem10 9114	. . . . . . . . . . 11 ⊢ (({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅ ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin ∧ [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
21	12, 17, 19, 20	syl3anc 1318	. . . . . . . . . 10 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
22	11, 21	sseldi 3566	. . . . . . . . 9 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴)
23	22	orcd 406	. . . . . . . 8 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
24	10, 23	pm2.61dane 2869	. . . . . . 7 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) → (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
25		eleq1 2676	. . . . . . . 8 ⊢ (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ 𝐴 ↔ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴))
26		eleq1 2676	. . . . . . . 8 ⊢ (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ {∅} ↔ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
27	25, 26	orbi12d 742	. . . . . . 7 ⊢ (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → ((𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅}) ↔ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅})))
28	24, 27	syl5ibrcom 236	. . . . . 6 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) → (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅})))
29	28	rexlimdva 3013	. . . . 5 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅})))
30		simpr 476	. . . . . . . . . 10 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → 𝐴 ⊆ Fin)
31	30	sselda 3568	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ Fin)
32		ficardom 8670	. . . . . . . . 9 ⊢ (𝑑 ∈ Fin → (card‘𝑑) ∈ ω)
33	31, 32	syl 17	. . . . . . . 8 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (card‘𝑑) ∈ ω)
34		simpr 476	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ 𝐴)
35		ficardid 8671	. . . . . . . . . . . . 13 ⊢ (𝑑 ∈ Fin → (card‘𝑑) ≈ 𝑑)
36	31, 35	syl 17	. . . . . . . . . . . 12 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (card‘𝑑) ≈ 𝑑)
37		ensym 7891	. . . . . . . . . . . 12 ⊢ ((card‘𝑑) ≈ 𝑑 → 𝑑 ≈ (card‘𝑑))
38		endom 7868	. . . . . . . . . . . 12 ⊢ (𝑑 ≈ (card‘𝑑) → 𝑑 ≼ (card‘𝑑))
39	36, 37, 38	3syl 18	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ≼ (card‘𝑑))
40		breq1 4586	. . . . . . . . . . . 12 ⊢ (𝑐 = 𝑑 → (𝑐 ≼ (card‘𝑑) ↔ 𝑑 ≼ (card‘𝑑)))
41	40	elrab 3331	. . . . . . . . . . 11 ⊢ (𝑑 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ↔ (𝑑 ∈ 𝐴 ∧ 𝑑 ≼ (card‘𝑑)))
42	34, 39, 41	sylanbrc 695	. . . . . . . . . 10 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
43		elssuni 4403	. . . . . . . . . 10 ⊢ (𝑑 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} → 𝑑 ⊆ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
44	42, 43	syl 17	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ⊆ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
45		breq1 4586	. . . . . . . . . . . . 13 ⊢ (𝑐 = 𝑏 → (𝑐 ≼ (card‘𝑑) ↔ 𝑏 ≼ (card‘𝑑)))
46	45	elrab 3331	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ↔ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑)))
47		simprr 792	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ≼ (card‘𝑑))
48	36	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (card‘𝑑) ≈ 𝑑)
49		domentr 7901	. . . . . . . . . . . . . . 15 ⊢ ((𝑏 ≼ (card‘𝑑) ∧ (card‘𝑑) ≈ 𝑑) → 𝑏 ≼ 𝑑)
50	47, 48, 49	syl2anc 691	. . . . . . . . . . . . . 14 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ≼ 𝑑)
51		simpllr 795	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝐴 ⊆ Fin)
52		simprl 790	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ∈ 𝐴)
53	51, 52	sseldd 3569	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ∈ Fin)
54	31	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑑 ∈ Fin)
55		simplll 794	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → [⊊] Or 𝐴)
56		simplr 788	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑑 ∈ 𝐴)
57		sorpssi 6841	. . . . . . . . . . . . . . . 16 ⊢ (( [⊊] Or 𝐴 ∧ (𝑏 ∈ 𝐴 ∧ 𝑑 ∈ 𝐴)) → (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏))
58	55, 52, 56, 57	syl12anc 1316	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏))
59		fincssdom 9028	. . . . . . . . . . . . . . 15 ⊢ ((𝑏 ∈ Fin ∧ 𝑑 ∈ Fin ∧ (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏)) → (𝑏 ≼ 𝑑 ↔ 𝑏 ⊆ 𝑑))
60	53, 54, 58, 59	syl3anc 1318	. . . . . . . . . . . . . 14 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (𝑏 ≼ 𝑑 ↔ 𝑏 ⊆ 𝑑))
61	50, 60	mpbid 221	. . . . . . . . . . . . 13 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ⊆ 𝑑)
62	61	ex 449	. . . . . . . . . . . 12 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑)) → 𝑏 ⊆ 𝑑))
63	46, 62	syl5bi 231	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} → 𝑏 ⊆ 𝑑))
64	63	ralrimiv 2948	. . . . . . . . . 10 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∀𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}𝑏 ⊆ 𝑑)
65		unissb 4405	. . . . . . . . . 10 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ⊆ 𝑑 ↔ ∀𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}𝑏 ⊆ 𝑑)
66	64, 65	sylibr 223	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ⊆ 𝑑)
67	44, 66	eqssd 3585	. . . . . . . 8 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
68		breq2 4587	. . . . . . . . . . . 12 ⊢ (𝑏 = (card‘𝑑) → (𝑐 ≼ 𝑏 ↔ 𝑐 ≼ (card‘𝑑)))
69	68	rabbidv 3164	. . . . . . . . . . 11 ⊢ (𝑏 = (card‘𝑑) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
70	69	unieqd 4382	. . . . . . . . . 10 ⊢ (𝑏 = (card‘𝑑) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
71	70	eqeq2d 2620	. . . . . . . . 9 ⊢ (𝑏 = (card‘𝑑) → (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}))
72	71	rspcev 3282	. . . . . . . 8 ⊢ (((card‘𝑑) ∈ ω ∧ 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
73	33, 67, 72	syl2anc 691	. . . . . . 7 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
74	73	ex 449	. . . . . 6 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑑 ∈ 𝐴 → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
75		velsn 4141	. . . . . . 7 ⊢ (𝑑 ∈ {∅} ↔ 𝑑 = ∅)
76		peano1 6977	. . . . . . . . 9 ⊢ ∅ ∈ ω
77		dom0 7973	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 ≼ ∅ ↔ 𝑏 = ∅)
78	77	biimpi 205	. . . . . . . . . . . . . . 15 ⊢ (𝑏 ≼ ∅ → 𝑏 = ∅)
79	78	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅) → 𝑏 = ∅)
80	79	a1i 11	. . . . . . . . . . . . 13 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅) → 𝑏 = ∅))
81		breq1 4586	. . . . . . . . . . . . . 14 ⊢ (𝑐 = 𝑏 → (𝑐 ≼ ∅ ↔ 𝑏 ≼ ∅))
82	81	elrab 3331	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ↔ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅))
83		velsn 4141	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ {∅} ↔ 𝑏 = ∅)
84	80, 82, 83	3imtr4g 284	. . . . . . . . . . . 12 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} → 𝑏 ∈ {∅}))
85	84	ssrdv 3574	. . . . . . . . . . 11 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ⊆ {∅})
86		uni0b 4399	. . . . . . . . . . 11 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} = ∅ ↔ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ⊆ {∅})
87	85, 86	sylibr 223	. . . . . . . . . 10 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} = ∅)
88	87	eqcomd 2616	. . . . . . . . 9 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
89		breq2 4587	. . . . . . . . . . . . 13 ⊢ (𝑏 = ∅ → (𝑐 ≼ 𝑏 ↔ 𝑐 ≼ ∅))
90	89	rabbidv 3164	. . . . . . . . . . . 12 ⊢ (𝑏 = ∅ → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
91	90	unieqd 4382	. . . . . . . . . . 11 ⊢ (𝑏 = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
92	91	eqeq2d 2620	. . . . . . . . . 10 ⊢ (𝑏 = ∅ → (∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅}))
93	92	rspcev 3282	. . . . . . . . 9 ⊢ ((∅ ∈ ω ∧ ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅}) → ∃𝑏 ∈ ω ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
94	76, 88, 93	sylancr 694	. . . . . . . 8 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∃𝑏 ∈ ω ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
95		eqeq1 2614	. . . . . . . . 9 ⊢ (𝑑 = ∅ → (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
96	95	rexbidv 3034	. . . . . . . 8 ⊢ (𝑑 = ∅ → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ ∃𝑏 ∈ ω ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
97	94, 96	syl5ibrcom 236	. . . . . . 7 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑑 = ∅ → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
98	75, 97	syl5bi 231	. . . . . 6 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑑 ∈ {∅} → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
99	74, 98	jaod 394	. . . . 5 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ((𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅}) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
100	29, 99	impbid 201	. . . 4 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅})))
101		elun 3715	. . . 4 ⊢ (𝑑 ∈ (𝐴 ∪ {∅}) ↔ (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅}))
102	100, 101	syl6bbr 277	. . 3 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ 𝑑 ∈ (𝐴 ∪ {∅})))
103	102	abbi1dv 2730	. 2 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → {𝑑 ∣ ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}} = (𝐴 ∪ {∅}))
104	2, 103	syl5eq 2656	1 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ran (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = (𝐴 ∪ {∅}))

Syntax hints:   → wi 4   ↔ wb 195   ∨ wo 382   ∧ wa 383   = wceq 1475   ∈ wcel 1977  {cab 2596   ≠ wne 2780  ∀wral 2896  ∃wrex 2897  {crab 2900   ∪ cun 3538   ⊆ wss 3540  ∅c0 3874  {csn 4125  ∪ cuni 4372   class class class wbr 4583   ↦ cmpt 4643   Or wor 4958  ran crn 5039  ‘cfv 5804   [⊊] crpss 6834  ωcom 6957   ≈ cen 7838   ≼ cdom 7839  Fincfn 7841  cardccrd 8644

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-ral 2901  df-rex 2902  df-reu 2903  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-int 4411  df-iun 4457  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-rpss 6835  df-om 6958  df-1o 7447  df-er 7629  df-en 7842  df-dom 7843  df-sdom 7844  df-fin 7845  df-card 8648

This theorem is referenced by:  fin1a2lem12  9116