Theorem fin1a2lem11 10412

Description: Lemma for fin1a2 10417. (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 2760	. . 3 ⊢ (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
2	1	rnmpt 5941	. 2 ⊢ ran (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = {𝑑 ∣ ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}}
3		unieq 4878	. . . . . . . . . . . 12 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ ∅)
4		uni0 4896	. . . . . . . . . . . 12 ⊢ ∪ ∅ = ∅
5	3, 4	eqtrdi 2811	. . . . . . . . . . 11 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
6	5	adantl 487	. . . . . . . . . 10 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
7		0ex 5264	. . . . . . . . . . 11 ⊢ ∅ ∈ V
8	7	elsn2 4626	. . . . . . . . . 10 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅} ↔ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
9	6, 8	sylibr 237	. . . . . . . . 9 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅})
10	9	olcd 888	. . . . . . . 8 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
11		ssrab2 4028	. . . . . . . . . 10 ⊢ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ⊆ 𝐴
12		simpr 490	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅)
13		fin1a2lem9 10410	. . . . . . . . . . . 12 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin ∧ 𝑏 ∈ ω) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin)
14	13	ad4ant123 1191	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin)
15		simplll 787	. . . . . . . . . . . 12 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → [⊊] Or 𝐴)
16		soss 5583	. . . . . . . . . . . 12 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ⊆ 𝐴 → ( [⊊] Or 𝐴 → [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
17	11, 15, 16	mpsyl 69	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
18		fin1a2lem10 10411	. . . . . . . . . . 11 ⊢ (({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅ ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin ∧ [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
19	12, 14, 17, 18	syl3anc 1398	. . . . . . . . . 10 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
20	11, 19	sselid 3929	. . . . . . . . 9 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴)
21	20	orcd 887	. . . . . . . 8 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
22	10, 21	pm2.61dane 3042	. . . . . . 7 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) → (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
23		eleq1 2848	. . . . . . . 8 ⊢ (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ 𝐴 ↔ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴))
24		eleq1 2848	. . . . . . . 8 ⊢ (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ {∅} ↔ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
25	23, 24	orbi12d 932	. . . . . . 7 ⊢ (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → ((𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅}) ↔ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅})))
26	22, 25	syl5ibrcom 250	. . . . . 6 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) → (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅})))
27	26	rexlimdva 3163	. . . . 5 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅})))
28		simpr 490	. . . . . . . . . 10 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → 𝐴 ⊆ Fin)
29	28	sselda 3931	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ Fin)
30		ficardom 9966	. . . . . . . . 9 ⊢ (𝑑 ∈ Fin → (card‘𝑑) ∈ ω)
31	29, 30	syl 18	. . . . . . . 8 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (card‘𝑑) ∈ ω)
32		breq1 5106	. . . . . . . . . . 11 ⊢ (𝑐 = 𝑑 → (𝑐 ≼ (card‘𝑑) ↔ 𝑑 ≼ (card‘𝑑)))
33		simpr 490	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ 𝐴)
34		ficardid 9967	. . . . . . . . . . . . 13 ⊢ (𝑑 ∈ Fin → (card‘𝑑) ≈ 𝑑)
35	29, 34	syl 18	. . . . . . . . . . . 12 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (card‘𝑑) ≈ 𝑑)
36		ensym 9009	. . . . . . . . . . . 12 ⊢ ((card‘𝑑) ≈ 𝑑 → 𝑑 ≈ (card‘𝑑))
37		endom 8985	. . . . . . . . . . . 12 ⊢ (𝑑 ≈ (card‘𝑑) → 𝑑 ≼ (card‘𝑑))
38	35, 36, 37	3syl 19	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ≼ (card‘𝑑))
39	32, 33, 38	elrabd 3647	. . . . . . . . . 10 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
40		elssuni 4899	. . . . . . . . . 10 ⊢ (𝑑 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} → 𝑑 ⊆ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
41	39, 40	syl 18	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ⊆ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
42		breq1 5106	. . . . . . . . . . . . 13 ⊢ (𝑐 = 𝑏 → (𝑐 ≼ (card‘𝑑) ↔ 𝑏 ≼ (card‘𝑑)))
43	42	elrab 3645	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ↔ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑)))
44		simprr 785	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ≼ (card‘𝑑))
45	35	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (card‘𝑑) ≈ 𝑑)
46		domentr 9019	. . . . . . . . . . . . . . 15 ⊢ ((𝑏 ≼ (card‘𝑑) ∧ (card‘𝑑) ≈ 𝑑) → 𝑏 ≼ 𝑑)
47	44, 45, 46	syl2anc 596	. . . . . . . . . . . . . 14 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ≼ 𝑑)
48		simpllr 788	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝐴 ⊆ Fin)
49		simprl 783	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ∈ 𝐴)
50	48, 49	sseldd 3932	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ∈ Fin)
51	29	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑑 ∈ Fin)
52		simplll 787	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → [⊊] Or 𝐴)
53		simplr 781	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑑 ∈ 𝐴)
54		sorpssi 7730	. . . . . . . . . . . . . . . 16 ⊢ (( [⊊] Or 𝐴 ∧ (𝑏 ∈ 𝐴 ∧ 𝑑 ∈ 𝐴)) → (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏))
55	52, 49, 53, 54	syl12anc 850	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏))
56		fincssdom 10325	. . . . . . . . . . . . . . 15 ⊢ ((𝑏 ∈ Fin ∧ 𝑑 ∈ Fin ∧ (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏)) → (𝑏 ≼ 𝑑 ↔ 𝑏 ⊆ 𝑑))
57	50, 51, 55, 56	syl3anc 1398	. . . . . . . . . . . . . 14 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (𝑏 ≼ 𝑑 ↔ 𝑏 ⊆ 𝑑))
58	47, 57	mpbid 235	. . . . . . . . . . . . 13 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ⊆ 𝑑)
59	58	ex 418	. . . . . . . . . . . 12 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑)) → 𝑏 ⊆ 𝑑))
60	43, 59	biimtrid 245	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} → 𝑏 ⊆ 𝑑))
61	60	ralrimiv 3153	. . . . . . . . . 10 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∀𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}𝑏 ⊆ 𝑑)
62		unissb 4901	. . . . . . . . . 10 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ⊆ 𝑑 ↔ ∀𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}𝑏 ⊆ 𝑑)
63	61, 62	sylibr 237	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ⊆ 𝑑)
64	41, 63	eqssd 3948	. . . . . . . 8 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
65		breq2 5107	. . . . . . . . . . 11 ⊢ (𝑏 = (card‘𝑑) → (𝑐 ≼ 𝑏 ↔ 𝑐 ≼ (card‘𝑑)))
66	65	rabbidv 3419	. . . . . . . . . 10 ⊢ (𝑏 = (card‘𝑑) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
67	66	unieqd 4880	. . . . . . . . 9 ⊢ (𝑏 = (card‘𝑑) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
68	67	rspceeqv 3599	. . . . . . . 8 ⊢ (((card‘𝑑) ∈ ω ∧ 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
69	31, 64, 68	syl2anc 596	. . . . . . 7 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
70	69	ex 418	. . . . . 6 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑑 ∈ 𝐴 → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
71		velsn 4600	. . . . . . 7 ⊢ (𝑑 ∈ {∅} ↔ 𝑑 = ∅)
72		peano1 7885	. . . . . . . . 9 ⊢ ∅ ∈ ω
73		dom0 9103	. . . . . . . . . . . . . . 15 ⊢ (𝑏 ≼ ∅ ↔ 𝑏 = ∅)
74	73	bilani 510	. . . . . . . . . . . . . 14 ⊢ ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅) → 𝑏 = ∅)
75	74	a1i 11	. . . . . . . . . . . . 13 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅) → 𝑏 = ∅))
76		breq1 5106	. . . . . . . . . . . . . 14 ⊢ (𝑐 = 𝑏 → (𝑐 ≼ ∅ ↔ 𝑏 ≼ ∅))
77	76	elrab 3645	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ↔ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅))
78		velsn 4600	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ {∅} ↔ 𝑏 = ∅)
79	75, 77, 78	3imtr4g 299	. . . . . . . . . . . 12 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} → 𝑏 ∈ {∅}))
80	79	ssrdv 3937	. . . . . . . . . . 11 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ⊆ {∅})
81		uni0b 4894	. . . . . . . . . . 11 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} = ∅ ↔ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ⊆ {∅})
82	80, 81	sylibr 237	. . . . . . . . . 10 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} = ∅)
83	82	eqcomd 2766	. . . . . . . . 9 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
84		breq2 5107	. . . . . . . . . . . 12 ⊢ (𝑏 = ∅ → (𝑐 ≼ 𝑏 ↔ 𝑐 ≼ ∅))
85	84	rabbidv 3419	. . . . . . . . . . 11 ⊢ (𝑏 = ∅ → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
86	85	unieqd 4880	. . . . . . . . . 10 ⊢ (𝑏 = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
87	86	rspceeqv 3599	. . . . . . . . 9 ⊢ ((∅ ∈ ω ∧ ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅}) → ∃𝑏 ∈ ω ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
88	72, 83, 87	sylancr 599	. . . . . . . 8 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∃𝑏 ∈ ω ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
89		eqeq1 2764	. . . . . . . . 9 ⊢ (𝑑 = ∅ → (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
90	89	rexbidv 3186	. . . . . . . 8 ⊢ (𝑑 = ∅ → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ ∃𝑏 ∈ ω ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
91	88, 90	syl5ibrcom 250	. . . . . . 7 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑑 = ∅ → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
92	71, 91	biimtrid 245	. . . . . 6 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑑 ∈ {∅} → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
93	70, 92	jaod 873	. . . . 5 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ((𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅}) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
94	27, 93	impbid 215	. . . 4 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅})))
95		elun 4100	. . . 4 ⊢ (𝑑 ∈ (𝐴 ∪ {∅}) ↔ (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅}))
96	94, 95	bitr4di 292	. . 3 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ 𝑑 ∈ (𝐴 ∪ {∅})))
97	96	eqabcdv 2894	. 2 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → {𝑑 ∣ ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}} = (𝐴 ∪ {∅}))
98	2, 97	eqtrid 2807	1 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ran (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = (𝐴 ∪ {∅}))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   = wceq 1570   ∈ wcel 2145  {cab 2738   ≠ wne 2955  ∀wral 3076  ∃wrex 3086  {crab 3412   ∪ cun 3897   ⊆ wss 3899  ∅c0 4279  {csn 4584  ∪ cuni 4867   class class class wbr 5103   ↦ cmpt 5186   Or wor 5562  ran crn 5656  ‘cfv 6533   [⊊] crpss 7723  ωcom 7862   ≈ cen 8949   ≼ cdom 8950  Fincfn 8952  cardccrd 9940

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7736

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-rpss 7724  df-om 7863  df-1o 8455  df-er 8696  df-en 8953  df-dom 8954  df-sdom 8955  df-fin 8956  df-card 9944

This theorem is used by:  fin1a2lem12  10413