Theorem fin1a2lem11 10390

Description: Lemma for fin1a2 10395. (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 2769	. . 3 ⊢ (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
2	1	rnmpt 5945	. 2 ⊢ ran (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = {𝑑 ∣ ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}}
3		unieq 4884	. . . . . . . . . . . 12 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ ∅)
4		uni0 4902	. . . . . . . . . . . 12 ⊢ ∪ ∅ = ∅
5	3, 4	eqtrdi 2820	. . . . . . . . . . 11 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
6	5	adantl 486	. . . . . . . . . 10 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
7		0ex 5269	. . . . . . . . . . 11 ⊢ ∅ ∈ V
8	7	elsn2 4633	. . . . . . . . . 10 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅} ↔ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅)
9	6, 8	sylibr 237	. . . . . . . . 9 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅})
10	9	olcd 887	. . . . . . . 8 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∅) → (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
11		ssrab2 4042	. . . . . . . . . 10 ⊢ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ⊆ 𝐴
12		simpr 489	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅)
13		fin1a2lem9 10388	. . . . . . . . . . . 12 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin ∧ 𝑏 ∈ ω) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin)
14	13	ad4ant123 1189	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin)
15		simplll 786	. . . . . . . . . . . 12 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → [⊊] Or 𝐴)
16		soss 5587	. . . . . . . . . . . 12 ⊢ ({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ⊆ 𝐴 → ( [⊊] Or 𝐴 → [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
17	11, 15, 16	mpsyl 69	. . . . . . . . . . 11 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
18		fin1a2lem10 10389	. . . . . . . . . . 11 ⊢ (({𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅ ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ Fin ∧ [⊊] Or {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
19	12, 14, 17, 18	syl3anc 1396	. . . . . . . . . 10 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
20	11, 19	sselid 3943	. . . . . . . . 9 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴)
21	20	orcd 886	. . . . . . . 8 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) ∧ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ≠ ∅) → (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
22	10, 21	pm2.61dane 3051	. . . . . . 7 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) → (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
23		eleq1 2857	. . . . . . . 8 ⊢ (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ 𝐴 ↔ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴))
24		eleq1 2857	. . . . . . . 8 ⊢ (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ {∅} ↔ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅}))
25	23, 24	orbi12d 931	. . . . . . 7 ⊢ (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → ((𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅}) ↔ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ 𝐴 ∨ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ∈ {∅})))
26	22, 25	syl5ibrcom 250	. . . . . 6 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑏 ∈ ω) → (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅})))
27	26	rexlimdva 3172	. . . . 5 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} → (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅})))
28		simpr 489	. . . . . . . . . 10 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → 𝐴 ⊆ Fin)
29	28	sselda 3945	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ Fin)
30		ficardom 9943	. . . . . . . . 9 ⊢ (𝑑 ∈ Fin → (card‘𝑑) ∈ ω)
31	29, 30	syl 18	. . . . . . . 8 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (card‘𝑑) ∈ ω)
32		breq1 5113	. . . . . . . . . . 11 ⊢ (𝑐 = 𝑑 → (𝑐 ≼ (card‘𝑑) ↔ 𝑑 ≼ (card‘𝑑)))
33		simpr 489	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ 𝐴)
34		ficardid 9944	. . . . . . . . . . . . 13 ⊢ (𝑑 ∈ Fin → (card‘𝑑) ≈ 𝑑)
35	29, 34	syl 18	. . . . . . . . . . . 12 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (card‘𝑑) ≈ 𝑑)
36		ensym 8996	. . . . . . . . . . . 12 ⊢ ((card‘𝑑) ≈ 𝑑 → 𝑑 ≈ (card‘𝑑))
37		endom 8972	. . . . . . . . . . . 12 ⊢ (𝑑 ≈ (card‘𝑑) → 𝑑 ≼ (card‘𝑑))
38	35, 36, 37	3syl 19	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ≼ (card‘𝑑))
39	32, 33, 38	elrabd 3661	. . . . . . . . . 10 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
40		elssuni 4905	. . . . . . . . . 10 ⊢ (𝑑 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} → 𝑑 ⊆ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
41	39, 40	syl 18	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 ⊆ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
42		breq1 5113	. . . . . . . . . . . . 13 ⊢ (𝑐 = 𝑏 → (𝑐 ≼ (card‘𝑑) ↔ 𝑏 ≼ (card‘𝑑)))
43	42	elrab 3659	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ↔ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑)))
44		simprr 784	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ≼ (card‘𝑑))
45	35	adantr 485	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (card‘𝑑) ≈ 𝑑)
46		domentr 9006	. . . . . . . . . . . . . . 15 ⊢ ((𝑏 ≼ (card‘𝑑) ∧ (card‘𝑑) ≈ 𝑑) → 𝑏 ≼ 𝑑)
47	44, 45, 46	syl2anc 595	. . . . . . . . . . . . . 14 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ≼ 𝑑)
48		simpllr 787	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝐴 ⊆ Fin)
49		simprl 782	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ∈ 𝐴)
50	48, 49	sseldd 3946	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ∈ Fin)
51	29	adantr 485	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑑 ∈ Fin)
52		simplll 786	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → [⊊] Or 𝐴)
53		simplr 780	. . . . . . . . . . . . . . . 16 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑑 ∈ 𝐴)
54		sorpssi 7724	. . . . . . . . . . . . . . . 16 ⊢ (( [⊊] Or 𝐴 ∧ (𝑏 ∈ 𝐴 ∧ 𝑑 ∈ 𝐴)) → (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏))
55	52, 49, 53, 54	syl12anc 849	. . . . . . . . . . . . . . 15 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏))
56		fincssdom 10303	. . . . . . . . . . . . . . 15 ⊢ ((𝑏 ∈ Fin ∧ 𝑑 ∈ Fin ∧ (𝑏 ⊆ 𝑑 ∨ 𝑑 ⊆ 𝑏)) → (𝑏 ≼ 𝑑 ↔ 𝑏 ⊆ 𝑑))
57	50, 51, 55, 56	syl3anc 1396	. . . . . . . . . . . . . 14 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → (𝑏 ≼ 𝑑 ↔ 𝑏 ⊆ 𝑑))
58	47, 57	mpbid 235	. . . . . . . . . . . . 13 ⊢ (((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) ∧ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑))) → 𝑏 ⊆ 𝑑)
59	58	ex 417	. . . . . . . . . . . 12 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ (card‘𝑑)) → 𝑏 ⊆ 𝑑))
60	43, 59	biimtrid 245	. . . . . . . . . . 11 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} → 𝑏 ⊆ 𝑑))
61	60	ralrimiv 3162	. . . . . . . . . 10 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∀𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}𝑏 ⊆ 𝑑)
62		unissb 4907	. . . . . . . . . 10 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ⊆ 𝑑 ↔ ∀𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}𝑏 ⊆ 𝑑)
63	61, 62	sylibr 237	. . . . . . . . 9 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)} ⊆ 𝑑)
64	41, 63	eqssd 3962	. . . . . . . 8 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
65		breq2 5114	. . . . . . . . . . 11 ⊢ (𝑏 = (card‘𝑑) → (𝑐 ≼ 𝑏 ↔ 𝑐 ≼ (card‘𝑑)))
66	65	rabbidv 3430	. . . . . . . . . 10 ⊢ (𝑏 = (card‘𝑑) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
67	66	unieqd 4886	. . . . . . . . 9 ⊢ (𝑏 = (card‘𝑑) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)})
68	67	rspceeqv 3613	. . . . . . . 8 ⊢ (((card‘𝑑) ∈ ω ∧ 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ (card‘𝑑)}) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
69	31, 64, 68	syl2anc 595	. . . . . . 7 ⊢ ((( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) ∧ 𝑑 ∈ 𝐴) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
70	69	ex 417	. . . . . 6 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑑 ∈ 𝐴 → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
71		velsn 4607	. . . . . . 7 ⊢ (𝑑 ∈ {∅} ↔ 𝑑 = ∅)
72		peano1 7881	. . . . . . . . 9 ⊢ ∅ ∈ ω
73		dom0 9089	. . . . . . . . . . . . . . 15 ⊢ (𝑏 ≼ ∅ ↔ 𝑏 = ∅)
74	73	bilani 509	. . . . . . . . . . . . . 14 ⊢ ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅) → 𝑏 = ∅)
75	74	a1i 11	. . . . . . . . . . . . 13 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ((𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅) → 𝑏 = ∅))
76		breq1 5113	. . . . . . . . . . . . . 14 ⊢ (𝑐 = 𝑏 → (𝑐 ≼ ∅ ↔ 𝑏 ≼ ∅))
77	76	elrab 3659	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ↔ (𝑏 ∈ 𝐴 ∧ 𝑏 ≼ ∅))
78		velsn 4607	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ {∅} ↔ 𝑏 = ∅)
79	75, 77, 78	3imtr4g 299	. . . . . . . . . . . 12 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑏 ∈ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} → 𝑏 ∈ {∅}))
80	79	ssrdv 3951	. . . . . . . . . . 11 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ⊆ {∅})
81		uni0b 4900	. . . . . . . . . . 11 ⊢ (∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} = ∅ ↔ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} ⊆ {∅})
82	80, 81	sylibr 237	. . . . . . . . . 10 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅} = ∅)
83	82	eqcomd 2775	. . . . . . . . 9 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
84		breq2 5114	. . . . . . . . . . . 12 ⊢ (𝑏 = ∅ → (𝑐 ≼ 𝑏 ↔ 𝑐 ≼ ∅))
85	84	rabbidv 3430	. . . . . . . . . . 11 ⊢ (𝑏 = ∅ → {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
86	85	unieqd 4886	. . . . . . . . . 10 ⊢ (𝑏 = ∅ → ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅})
87	86	rspceeqv 3613	. . . . . . . . 9 ⊢ ((∅ ∈ ω ∧ ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ ∅}) → ∃𝑏 ∈ ω ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
88	72, 83, 87	sylancr 598	. . . . . . . 8 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ∃𝑏 ∈ ω ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏})
89		eqeq1 2773	. . . . . . . . 9 ⊢ (𝑑 = ∅ → (𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
90	89	rexbidv 3195	. . . . . . . 8 ⊢ (𝑑 = ∅ → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ ∃𝑏 ∈ ω ∅ = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
91	88, 90	syl5ibrcom 250	. . . . . . 7 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑑 = ∅ → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
92	71, 91	biimtrid 245	. . . . . 6 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (𝑑 ∈ {∅} → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
93	70, 92	jaod 872	. . . . 5 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ((𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅}) → ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}))
94	27, 93	impbid 215	. . . 4 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅})))
95		elun 4115	. . . 4 ⊢ (𝑑 ∈ (𝐴 ∪ {∅}) ↔ (𝑑 ∈ 𝐴 ∨ 𝑑 ∈ {∅}))
96	94, 95	bitr4di 292	. . 3 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → (∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏} ↔ 𝑑 ∈ (𝐴 ∪ {∅})))
97	96	eqabcdv 2903	. 2 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → {𝑑 ∣ ∃𝑏 ∈ ω 𝑑 = ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}} = (𝐴 ∪ {∅}))
98	2, 97	eqtrid 2816	1 ⊢ (( [⊊] Or 𝐴 ∧ 𝐴 ⊆ Fin) → ran (𝑏 ∈ ω ↦ ∪ {𝑐 ∈ 𝐴 ∣ 𝑐 ≼ 𝑏}) = (𝐴 ∪ {∅}))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400   ∨ wo 860   = wceq 1567   ∈ wcel 2149  {cab 2747   ≠ wne 2964  ∀wral 3085  ∃wrex 3095  {crab 3423   ∪ cun 3911   ⊆ wss 3913  ∅c0 4294  {csn 4591  ∪ cuni 4873   class class class wbr 5110   ↦ cmpt 5193   Or wor 5566  ran crn 5660  ‘cfv 6533   [⊊] crpss 7717  ωcom 7858   ≈ cen 8936   ≼ cdom 8937  Fincfn 8939  cardccrd 9917

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5239  ax-sep 5258  ax-nul 5268  ax-pow 5334  ax-pr 5402  ax-un 7730

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4874  df-int 4914  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  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 7718  df-om 7859  df-1o 8449  df-er 8690  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-card 9921

This theorem is referenced by:  fin1a2lem12  10391