Theorem fin1a2lem11 10495

Description: Lemma for fin1a2 10500. (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 5940	. 2 ⊢ ran (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = {𝑑 ∣ ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}}
3		unieq 4877	. . . . . . . . . . . 12 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ ∅)
4		uni0 4895	. . . . . . . . . . . 12 ⊢ ∪ ∅ = ∅
5	3, 4	eqtrdi 2811	. . . . . . . . . . 11 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
6	5	adantl 487	. . . . . . . . . 10 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
7		0ex 5260	. . . . . . . . . . 11 ⊢ ∅ ∈ V
8	7	elsn2 4622	. . . . . . . . . 10 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅} ↔ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
9	6, 8	sylibr 237	. . . . . . . . 9 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅})
10	9	olcd 888	. . . . . . . 8 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
11		ssrab2 4004	. . . . . . . . . 10 ⊢ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ⊆ 𝐴
12		simpr 490	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅)
13		fin1a2lem9 10493	. . . . . . . . . . . 12 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin ∧ 𝑏 ∈ ω) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin)
14	13	ad4ant123 1191	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin)
15		simplll 787	. . . . . . . . . . . 12 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → [⊊] Or 𝐴)
16		soss 5579	. . . . . . . . . . . 12 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ⊆ 𝐴 → ( [⊊] Or 𝐴 → [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
17	11, 15, 16	mpsyl 69	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
18		fin1a2lem10 10494	. . . . . . . . . . 11 ⊢ (({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅ ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin ∧ [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
19	12, 14, 17, 18	syl3anc 1398	. . . . . . . . . 10 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
20	11, 19	sselid 3907	. . . . . . . . 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 3909	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ Fin)
30		ficardom 10049	. . . . . . . . 9 ⊢ (𝑑 ∈ Fin → (card‘𝑑) ∈ ω)
31	29, 30	syl 18	. . . . . . . 8 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (card‘𝑑) ∈ ω)
32		breq1 5105	. . . . . . . . . . 11 ⊢ (𝑐 = 𝑑 → (𝑐 ≼ (card‘𝑑) ↔ 𝑑 ≼ (card‘𝑑)))
33		simpr 490	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ 𝐴)
34		ficardid 10050	. . . . . . . . . . . . 13 ⊢ (𝑑 ∈ Fin → (card‘𝑑) ≈ 𝑑)
35	29, 34	syl 18	. . . . . . . . . . . 12 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (card‘𝑑) ≈ 𝑑)
36		ensym 9037	. . . . . . . . . . . 12 ⊢ ((card‘𝑑) ≈ 𝑑 → 𝑑 ≈ (card‘𝑑))
37		endom 9013	. . . . . . . . . . . 12 ⊢ (𝑑 ≈ (card‘𝑑) → 𝑑 ≼ (card‘𝑑))
38	35, 36, 37	3syl 19	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ≼ (card‘𝑑))
39	32, 33, 38	elrabd 3646	. . . . . . . . . 10 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
40		elssuni 4898	. . . . . . . . . 10 ⊢ (𝑑 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} → 𝑑 ⊆ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
41	39, 40	syl 18	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ⊆ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
42		breq1 5105	. . . . . . . . . . . . 13 ⊢ (𝑐 = 𝑏 → (𝑐 ≼ (card‘𝑑) ↔ 𝑏 ≼ (card‘𝑑)))
43	42	elrab 3644	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ↔ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑)))
44		simprr 785	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ≼ (card‘𝑑))
45	35	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (card‘𝑑) ≈ 𝑑)
46		domentr 9047	. . . . . . . . . . . . . . 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 3910	. . . . . . . . . . . . . . 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 7749	. . . . . . . . . . . . . . . 16 ⊢ (( [⊊] Or 𝐴 ∧ (𝑏 ∈ 𝐴 ∧ 𝑑 ∈ 𝐴)) → (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏))
55	52, 49, 53, 54	syl12anc 850	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏))
56		fincssdom 10408	. . . . . . . . . . . . . . 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 4900	. . . . . . . . . 10 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ⊆ 𝑑 ↔ ∀𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}𝑏 ⊆ 𝑑)
63	61, 62	sylibr 237	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ⊆ 𝑑)
64	41, 63	eqssd 3926	. . . . . . . 8 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
65		breq2 5106	. . . . . . . . . . 11 ⊢ (𝑏 = (card‘𝑑) → (𝑐 ≼ 𝑏 ↔ 𝑐 ≼ (card‘𝑑)))
66	65	rabbidv 3419	. . . . . . . . . 10 ⊢ (𝑏 = (card‘𝑑) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
67	66	unieqd 4879	. . . . . . . . 9 ⊢ (𝑏 = (card‘𝑑) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
68	67	rspceeqv 3598	. . . . . . . 8 ⊢ (((card‘𝑑) ∈ ω ∧ 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
69	31, 64, 68	syl2anc 596	. . . . . . 7 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
70	69	ex 418	. . . . . 6 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑑 ∈ 𝐴 → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
71		velsn 4596	. . . . . . 7 ⊢ (𝑑 ∈ {∅} ↔ 𝑑 = ∅)
72		peano1 7904	. . . . . . . . 9 ⊢ ∅ ∈ ω
73		dom0 9131	. . . . . . . . . . . . . . 15 ⊢ (𝑏 ≼ ∅ ↔ 𝑏 = ∅)
74	73	bilani 510	. . . . . . . . . . . . . 14 ⊢ ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅) → 𝑏 = ∅)
75	74	a1i 11	. . . . . . . . . . . . 13 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅) → 𝑏 = ∅))
76		breq1 5105	. . . . . . . . . . . . . 14 ⊢ (𝑐 = 𝑏 → (𝑐 ≼ ∅ ↔ 𝑏 ≼ ∅))
77	76	elrab 3644	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ↔ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅))
78		velsn 4596	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ {∅} ↔ 𝑏 = ∅)
79	75, 77, 78	3imtr4g 299	. . . . . . . . . . . 12 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} → 𝑏 ∈ {∅}))
80	79	ssrdv 3915	. . . . . . . . . . 11 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ⊆ {∅})
81		uni0b 4893	. . . . . . . . . . 11 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} = ∅ ↔ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ⊆ {∅})
82	80, 81	sylibr 237	. . . . . . . . . 10 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} = ∅)
83	82	eqcomd 2766	. . . . . . . . 9 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
84		breq2 5106	. . . . . . . . . . . 12 ⊢ (𝑏 = ∅ → (𝑐 ≼ 𝑏 ↔ 𝑐 ≼ ∅))
85	84	rabbidv 3419	. . . . . . . . . . 11 ⊢ (𝑏 = ∅ → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
86	85	unieqd 4879	. . . . . . . . . 10 ⊢ (𝑏 = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
87	86	rspceeqv 3598	. . . . . . . . 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 4151	. . . 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 1569   ∈ wcel 2144  {cab 2738   ≠ wne 2955  ∀wral 3076  ∃wrex 3086  {crab 3412   ⊆ wss 3896   ∪ cun 4148  ∅c0 4277  {csn 4584  ∪ cuni 4866   class class class wbr 5102   ↦ cmpt 5185   Or wor 5558  ran crn 5652  ‘cfv 6543   [⊊] crpss 7742  ωcom 7881   ≈ cen 8977   ≼ cdom 8978  Fincfn 8980  cardccrd 10023

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5327  ax-pr 5391  ax-un 7755

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  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 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-int 4907  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6497  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-rpss 7743  df-om 7882  df-1o 8483  df-er 8724  df-en 8981  df-dom 8982  df-sdom 8983  df-fin 8984  df-card 10027

This theorem is used by:  fin1a2lem12  10496