Theorem dfac12lem3 10151

Description: Lemma for dfac12 10155. (Contributed by Mario Carneiro, 29-May-2015.)

Hypotheses

Ref	Expression
dfac12.1	⊢ (𝜑 → 𝐴 ∈ On)
dfac12.3	⊢ (𝜑 → 𝐹:𝒫 (har‘(𝑅1‘𝐴))–1-1→On)
dfac12.4	⊢ 𝐺 = recs((𝑥 ∈ V ↦ (𝑦 ∈ (𝑅1‘dom 𝑥) ↦ if(dom 𝑥 = ∪ dom 𝑥, ((suc ∪ ran ∪ ran 𝑥 ·o (rank‘𝑦)) +o ((𝑥‘suc (rank‘𝑦))‘𝑦)), (𝐹‘((◡OrdIso( E , ran (𝑥‘∪ dom 𝑥)) ∘ (𝑥‘∪ dom 𝑥)) “ 𝑦))))))

Assertion

Ref	Expression
dfac12lem3	⊢ (𝜑 → (𝑅1‘𝐴) ∈ dom card)

Distinct variable groups:   𝑦,𝐴   𝑥,𝑦,𝐺   𝜑,𝑦   𝑥,𝐹,𝑦

Allowed substitution hints:   𝜑(𝑥)   𝐴(𝑥)

Proof of Theorem dfac12lem3

Dummy variables 𝑚 𝑛 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fvex 6892	. . . 4 ⊢ (𝐺‘𝐴) ∈ V
2	1	rnex 7908	. . 3 ⊢ ran (𝐺‘𝐴) ∈ V
3		ssid 3953	. . . . 5 ⊢ 𝐴 ⊆ 𝐴
4		dfac12.1	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ On)
5		sseq1 3956	. . . . . . . . 9 ⊢ (𝑚 = 𝑛 → (𝑚 ⊆ 𝐴 ↔ 𝑛 ⊆ 𝐴))
6		fveq2 6879	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑛 → (𝐺‘𝑚) = (𝐺‘𝑛))
7		f1eq1 6767	. . . . . . . . . . 11 ⊢ ((𝐺‘𝑚) = (𝐺‘𝑛) → ((𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On ↔ (𝐺‘𝑛):(𝑅1‘𝑚)–1-1→On))
8	6, 7	syl 18	. . . . . . . . . 10 ⊢ (𝑚 = 𝑛 → ((𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On ↔ (𝐺‘𝑛):(𝑅1‘𝑚)–1-1→On))
9		fveq2 6879	. . . . . . . . . . 11 ⊢ (𝑚 = 𝑛 → (𝑅1‘𝑚) = (𝑅1‘𝑛))
10		f1eq2 6768	. . . . . . . . . . 11 ⊢ ((𝑅1‘𝑚) = (𝑅1‘𝑛) → ((𝐺‘𝑛):(𝑅1‘𝑚)–1-1→On ↔ (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On))
11	9, 10	syl 18	. . . . . . . . . 10 ⊢ (𝑚 = 𝑛 → ((𝐺‘𝑛):(𝑅1‘𝑚)–1-1→On ↔ (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On))
12	8, 11	bitrd 282	. . . . . . . . 9 ⊢ (𝑚 = 𝑛 → ((𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On ↔ (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On))
13	5, 12	imbi12d 347	. . . . . . . 8 ⊢ (𝑚 = 𝑛 → ((𝑚 ⊆ 𝐴 → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On) ↔ (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On)))
14	13	imbi2d 343	. . . . . . 7 ⊢ (𝑚 = 𝑛 → ((𝜑 → (𝑚 ⊆ 𝐴 → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On)) ↔ (𝜑 → (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On))))
15		sseq1 3956	. . . . . . . . 9 ⊢ (𝑚 = 𝐴 → (𝑚 ⊆ 𝐴 ↔ 𝐴 ⊆ 𝐴))
16		fveq2 6879	. . . . . . . . . . 11 ⊢ (𝑚 = 𝐴 → (𝐺‘𝑚) = (𝐺‘𝐴))
17		f1eq1 6767	. . . . . . . . . . 11 ⊢ ((𝐺‘𝑚) = (𝐺‘𝐴) → ((𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On ↔ (𝐺‘𝐴):(𝑅1‘𝑚)–1-1→On))
18	16, 17	syl 18	. . . . . . . . . 10 ⊢ (𝑚 = 𝐴 → ((𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On ↔ (𝐺‘𝐴):(𝑅1‘𝑚)–1-1→On))
19		fveq2 6879	. . . . . . . . . . 11 ⊢ (𝑚 = 𝐴 → (𝑅1‘𝑚) = (𝑅1‘𝐴))
20		f1eq2 6768	. . . . . . . . . . 11 ⊢ ((𝑅1‘𝑚) = (𝑅1‘𝐴) → ((𝐺‘𝐴):(𝑅1‘𝑚)–1-1→On ↔ (𝐺‘𝐴):(𝑅1‘𝐴)–1-1→On))
21	19, 20	syl 18	. . . . . . . . . 10 ⊢ (𝑚 = 𝐴 → ((𝐺‘𝐴):(𝑅1‘𝑚)–1-1→On ↔ (𝐺‘𝐴):(𝑅1‘𝐴)–1-1→On))
22	18, 21	bitrd 282	. . . . . . . . 9 ⊢ (𝑚 = 𝐴 → ((𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On ↔ (𝐺‘𝐴):(𝑅1‘𝐴)–1-1→On))
23	15, 22	imbi12d 347	. . . . . . . 8 ⊢ (𝑚 = 𝐴 → ((𝑚 ⊆ 𝐴 → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On) ↔ (𝐴 ⊆ 𝐴 → (𝐺‘𝐴):(𝑅1‘𝐴)–1-1→On)))
24	23	imbi2d 343	. . . . . . 7 ⊢ (𝑚 = 𝐴 → ((𝜑 → (𝑚 ⊆ 𝐴 → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On)) ↔ (𝜑 → (𝐴 ⊆ 𝐴 → (𝐺‘𝐴):(𝑅1‘𝐴)–1-1→On))))
25		r19.21v 3187	. . . . . . . 8 ⊢ (∀𝑛 ∈ 𝑚 (𝜑 → (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On)) ↔ (𝜑 → ∀𝑛 ∈ 𝑚 (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On)))
26		eloni 6367	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑚 ∈ On → Ord 𝑚)
27	26	ad2antrl 741	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) → Ord 𝑚)
28		ordelss 6373	. . . . . . . . . . . . . . . . 17 ⊢ ((Ord 𝑚 ∧ 𝑛 ∈ 𝑚) → 𝑛 ⊆ 𝑚)
29	27, 28	sylan 592	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) ∧ 𝑛 ∈ 𝑚) → 𝑛 ⊆ 𝑚)
30		simplrr 790	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) ∧ 𝑛 ∈ 𝑚) → 𝑚 ⊆ 𝐴)
31	29, 30	sstrd 3941	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) ∧ 𝑛 ∈ 𝑚) → 𝑛 ⊆ 𝐴)
32		pm5.5 364	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ⊆ 𝐴 → ((𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) ↔ (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On))
33	31, 32	syl 18	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) ∧ 𝑛 ∈ 𝑚) → ((𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) ↔ (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On))
34	33	ralbidva 3183	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) → (∀𝑛 ∈ 𝑚 (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) ↔ ∀𝑛 ∈ 𝑚 (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On))
35	4	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) ∧ ∀𝑛 ∈ 𝑚 (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) → 𝐴 ∈ On)
36		dfac12.3	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐹:𝒫 (har‘(𝑅1‘𝐴))–1-1→On)
37	36	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) ∧ ∀𝑛 ∈ 𝑚 (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) → 𝐹:𝒫 (har‘(𝑅1‘𝐴))–1-1→On)
38		dfac12.4	. . . . . . . . . . . . . . 15 ⊢ 𝐺 = recs((𝑥 ∈ V ↦ (𝑦 ∈ (𝑅1‘dom 𝑥) ↦ if(dom 𝑥 = ∪ dom 𝑥, ((suc ∪ ran ∪ ran 𝑥 ·o (rank‘𝑦)) +o ((𝑥‘suc (rank‘𝑦))‘𝑦)), (𝐹‘((◡OrdIso( E , ran (𝑥‘∪ dom 𝑥)) ∘ (𝑥‘∪ dom 𝑥)) “ 𝑦))))))
39		simplrl 789	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) ∧ ∀𝑛 ∈ 𝑚 (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) → 𝑚 ∈ On)
40		eqid 2760	. . . . . . . . . . . . . . 15 ⊢ (◡OrdIso( E , ran (𝐺‘∪ 𝑚)) ∘ (𝐺‘∪ 𝑚)) = (◡OrdIso( E , ran (𝐺‘∪ 𝑚)) ∘ (𝐺‘∪ 𝑚))
41		simplrr 790	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) ∧ ∀𝑛 ∈ 𝑚 (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) → 𝑚 ⊆ 𝐴)
42		fveq2 6879	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 𝑧 → (𝐺‘𝑛) = (𝐺‘𝑧))
43		f1eq1 6767	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐺‘𝑛) = (𝐺‘𝑧) → ((𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On ↔ (𝐺‘𝑧):(𝑅1‘𝑛)–1-1→On))
44	42, 43	syl 18	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑧 → ((𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On ↔ (𝐺‘𝑧):(𝑅1‘𝑛)–1-1→On))
45		fveq2 6879	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 𝑧 → (𝑅1‘𝑛) = (𝑅1‘𝑧))
46		f1eq2 6768	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑅1‘𝑛) = (𝑅1‘𝑧) → ((𝐺‘𝑧):(𝑅1‘𝑛)–1-1→On ↔ (𝐺‘𝑧):(𝑅1‘𝑧)–1-1→On))
47	45, 46	syl 18	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑧 → ((𝐺‘𝑧):(𝑅1‘𝑛)–1-1→On ↔ (𝐺‘𝑧):(𝑅1‘𝑧)–1-1→On))
48	44, 47	bitrd 282	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 𝑧 → ((𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On ↔ (𝐺‘𝑧):(𝑅1‘𝑧)–1-1→On))
49	48	cbvralvw 3240	. . . . . . . . . . . . . . . 16 ⊢ (∀𝑛 ∈ 𝑚 (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On ↔ ∀𝑧 ∈ 𝑚 (𝐺‘𝑧):(𝑅1‘𝑧)–1-1→On)
50	49	bilani 510	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) ∧ ∀𝑛 ∈ 𝑚 (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) → ∀𝑧 ∈ 𝑚 (𝐺‘𝑧):(𝑅1‘𝑧)–1-1→On)
51	35, 37, 38, 39, 40, 41, 50	dfac12lem2 10150	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) ∧ ∀𝑛 ∈ 𝑚 (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On)
52	51	ex 418	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) → (∀𝑛 ∈ 𝑚 (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On))
53	34, 52	sylbid 243	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑚 ∈ On ∧ 𝑚 ⊆ 𝐴)) → (∀𝑛 ∈ 𝑚 (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On))
54	53	expr 462	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ On) → (𝑚 ⊆ 𝐴 → (∀𝑛 ∈ 𝑚 (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On)))
55	54	com23 87	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ On) → (∀𝑛 ∈ 𝑚 (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) → (𝑚 ⊆ 𝐴 → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On)))
56	55	expcom 419	. . . . . . . . 9 ⊢ (𝑚 ∈ On → (𝜑 → (∀𝑛 ∈ 𝑚 (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On) → (𝑚 ⊆ 𝐴 → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On))))
57	56	a2d 30	. . . . . . . 8 ⊢ (𝑚 ∈ On → ((𝜑 → ∀𝑛 ∈ 𝑚 (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On)) → (𝜑 → (𝑚 ⊆ 𝐴 → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On))))
58	25, 57	biimtrid 245	. . . . . . 7 ⊢ (𝑚 ∈ On → (∀𝑛 ∈ 𝑚 (𝜑 → (𝑛 ⊆ 𝐴 → (𝐺‘𝑛):(𝑅1‘𝑛)–1-1→On)) → (𝜑 → (𝑚 ⊆ 𝐴 → (𝐺‘𝑚):(𝑅1‘𝑚)–1-1→On))))
59	14, 24, 58	tfis3 7855	. . . . . 6 ⊢ (𝐴 ∈ On → (𝜑 → (𝐴 ⊆ 𝐴 → (𝐺‘𝐴):(𝑅1‘𝐴)–1-1→On)))
60	4, 59	mpcom 39	. . . . 5 ⊢ (𝜑 → (𝐴 ⊆ 𝐴 → (𝐺‘𝐴):(𝑅1‘𝐴)–1-1→On))
61	3, 60	mpi 21	. . . 4 ⊢ (𝜑 → (𝐺‘𝐴):(𝑅1‘𝐴)–1-1→On)
62		f1f 6772	. . . 4 ⊢ ((𝐺‘𝐴):(𝑅1‘𝐴)–1-1→On → (𝐺‘𝐴):(𝑅1‘𝐴)⟶On)
63		frn 6711	. . . 4 ⊢ ((𝐺‘𝐴):(𝑅1‘𝐴)⟶On → ran (𝐺‘𝐴) ⊆ On)
64	61, 62, 63	3syl 19	. . 3 ⊢ (𝜑 → ran (𝐺‘𝐴) ⊆ On)
65		onssnum 10046	. . 3 ⊢ ((ran (𝐺‘𝐴) ∈ V ∧ ran (𝐺‘𝐴) ⊆ On) → ran (𝐺‘𝐴) ∈ dom card)
66	2, 64, 65	sylancr 599	. 2 ⊢ (𝜑 → ran (𝐺‘𝐴) ∈ dom card)
67		f1f1orn 6830	. . . 4 ⊢ ((𝐺‘𝐴):(𝑅1‘𝐴)–1-1→On → (𝐺‘𝐴):(𝑅1‘𝐴)–1-1-onto→ran (𝐺‘𝐴))
68	61, 67	syl 18	. . 3 ⊢ (𝜑 → (𝐺‘𝐴):(𝑅1‘𝐴)–1-1-onto→ran (𝐺‘𝐴))
69		fvex 6892	. . . 4 ⊢ (𝑅1‘𝐴) ∈ V
70	69	f1oen 8981	. . 3 ⊢ ((𝐺‘𝐴):(𝑅1‘𝐴)–1-1-onto→ran (𝐺‘𝐴) → (𝑅1‘𝐴) ≈ ran (𝐺‘𝐴))
71		ennum 9955	. . 3 ⊢ ((𝑅1‘𝐴) ≈ ran (𝐺‘𝐴) → ((𝑅1‘𝐴) ∈ dom card ↔ ran (𝐺‘𝐴) ∈ dom card))
72	68, 70, 71	3syl 19	. 2 ⊢ (𝜑 → ((𝑅1‘𝐴) ∈ dom card ↔ ran (𝐺‘𝐴) ∈ dom card))
73	66, 72	mpbird 260	1 ⊢ (𝜑 → (𝑅1‘𝐴) ∈ dom card)

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570   ∈ wcel 2145  ∀wral 3076  Vcvv 3450   ⊆ wss 3899  ifcif 4482  𝒫 cpw 4557  ∪ cuni 4867   class class class wbr 5103   ↦ cmpt 5186   E cep 5554  ^◡ccnv 5654  dom cdm 5655  ran crn 5656   “ cima 5658   ∘ ccom 5659  Ord word 6356  Oncon0 6357  suc csuc 6359  ⟶wf 6529  –1-1→wf1 6530  –1-1-onto→wf1o 6532  ‘cfv 6533  (class class class)co 7414  recscrecs 8360   +_o coa 8455   ·_o comu 8456   ≈ cen 8952  OrdIsocoi 9484  harchar 9531  𝑅₁cr1 9747  rankcrnk 9748  cardccrd 9943

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 7737

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-rmo 3365  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-se 5609  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-pred 6299  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-isom 6542  df-riota 7371  df-ov 7417  df-oprab 7418  df-mpo 7419  df-om 7864  df-2nd 7988  df-frecs 8281  df-wrecs 8312  df-recs 8361  df-rdg 8400  df-oadd 8462  df-omul 8463  df-er 8699  df-en 8956  df-dom 8957  df-oi 9485  df-har 9532  df-r1 9749  df-rank 9750  df-card 9947

This theorem is used by:  dfac12r  10152