Theorem dfrcl2 43664

Description: Reflexive closure of a relation as union with restricted identity relation. (Contributed by RP, 6-Jun-2020.)

Assertion

Ref	Expression
dfrcl2	⊢ r* = (𝑥 ∈ V ↦ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))

Proof of Theorem dfrcl2

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-rcl 43663	. 2 ⊢ r* = (𝑥 ∈ V ↦ ∩ {𝑧 ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)})
2		rabab 3510	. . . . . . . 8 ⊢ {𝑧 ∈ V ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)} = {𝑧 ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)}
3	2	eqcomi 2744	. . . . . . 7 ⊢ {𝑧 ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)} = {𝑧 ∈ V ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)}
4	3	inteqi 4955	. . . . . 6 ⊢ ∩ {𝑧 ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)} = ∩ {𝑧 ∈ V ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)}
5	4	a1i 11	. . . . 5 ⊢ (𝑥 ∈ V → ∩ {𝑧 ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)} = ∩ {𝑧 ∈ V ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)})
6		vex 3482	. . . . . . . . . . 11 ⊢ 𝑥 ∈ V
7	6	dmex 7932	. . . . . . . . . 10 ⊢ dom 𝑥 ∈ V
8	6	rnex 7933	. . . . . . . . . 10 ⊢ ran 𝑥 ∈ V
9	7, 8	unex 7763	. . . . . . . . 9 ⊢ (dom 𝑥 ∪ ran 𝑥) ∈ V
10		resiexg 7935	. . . . . . . . 9 ⊢ ((dom 𝑥 ∪ ran 𝑥) ∈ V → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V)
11	9, 10	ax-mp 5	. . . . . . . 8 ⊢ ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∈ V
12	11, 6	unex 7763	. . . . . . 7 ⊢ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∈ V
13	12	a1i 11	. . . . . 6 ⊢ (𝑥 ∈ V → (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∈ V)
14		ssun2 4189	. . . . . . 7 ⊢ 𝑥 ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥)
15		dmun 5924	. . . . . . . . . . . 12 ⊢ dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) = (dom ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ dom 𝑥)
16		dmresi 6072	. . . . . . . . . . . . 13 ⊢ dom ( I ↾ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
17	16	uneq1i 4174	. . . . . . . . . . . 12 ⊢ (dom ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ dom 𝑥) = ((dom 𝑥 ∪ ran 𝑥) ∪ dom 𝑥)
18		un23 4184	. . . . . . . . . . . . 13 ⊢ ((dom 𝑥 ∪ ran 𝑥) ∪ dom 𝑥) = ((dom 𝑥 ∪ dom 𝑥) ∪ ran 𝑥)
19		unidm 4167	. . . . . . . . . . . . . 14 ⊢ (dom 𝑥 ∪ dom 𝑥) = dom 𝑥
20	19	uneq1i 4174	. . . . . . . . . . . . 13 ⊢ ((dom 𝑥 ∪ dom 𝑥) ∪ ran 𝑥) = (dom 𝑥 ∪ ran 𝑥)
21	18, 20	eqtri 2763	. . . . . . . . . . . 12 ⊢ ((dom 𝑥 ∪ ran 𝑥) ∪ dom 𝑥) = (dom 𝑥 ∪ ran 𝑥)
22	15, 17, 21	3eqtri 2767	. . . . . . . . . . 11 ⊢ dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) = (dom 𝑥 ∪ ran 𝑥)
23		rnun 6168	. . . . . . . . . . . 12 ⊢ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) = (ran ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ ran 𝑥)
24		rnresi 6095	. . . . . . . . . . . . 13 ⊢ ran ( I ↾ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
25	24	uneq1i 4174	. . . . . . . . . . . 12 ⊢ (ran ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ ran 𝑥) = ((dom 𝑥 ∪ ran 𝑥) ∪ ran 𝑥)
26		unass 4182	. . . . . . . . . . . . 13 ⊢ ((dom 𝑥 ∪ ran 𝑥) ∪ ran 𝑥) = (dom 𝑥 ∪ (ran 𝑥 ∪ ran 𝑥))
27		unidm 4167	. . . . . . . . . . . . . 14 ⊢ (ran 𝑥 ∪ ran 𝑥) = ran 𝑥
28	27	uneq2i 4175	. . . . . . . . . . . . 13 ⊢ (dom 𝑥 ∪ (ran 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
29	26, 28	eqtri 2763	. . . . . . . . . . . 12 ⊢ ((dom 𝑥 ∪ ran 𝑥) ∪ ran 𝑥) = (dom 𝑥 ∪ ran 𝑥)
30	23, 25, 29	3eqtri 2767	. . . . . . . . . . 11 ⊢ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) = (dom 𝑥 ∪ ran 𝑥)
31	22, 30	uneq12i 4176	. . . . . . . . . 10 ⊢ (dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∪ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥)) = ((dom 𝑥 ∪ ran 𝑥) ∪ (dom 𝑥 ∪ ran 𝑥))
32		unidm 4167	. . . . . . . . . 10 ⊢ ((dom 𝑥 ∪ ran 𝑥) ∪ (dom 𝑥 ∪ ran 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
33	31, 32	eqtri 2763	. . . . . . . . 9 ⊢ (dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∪ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥)) = (dom 𝑥 ∪ ran 𝑥)
34	33	reseq2i 5997	. . . . . . . 8 ⊢ ( I ↾ (dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∪ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))) = ( I ↾ (dom 𝑥 ∪ ran 𝑥))
35		ssun1 4188	. . . . . . . 8 ⊢ ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥)
36	34, 35	eqsstri 4030	. . . . . . 7 ⊢ ( I ↾ (dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∪ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))) ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥)
37	14, 36	pm3.2i 470	. . . . . 6 ⊢ (𝑥 ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∧ ( I ↾ (dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∪ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))) ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))
38		dmeq 5917	. . . . . . . . . . 11 ⊢ (𝑧 = (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) → dom 𝑧 = dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))
39		rneq 5950	. . . . . . . . . . 11 ⊢ (𝑧 = (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) → ran 𝑧 = ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))
40	38, 39	uneq12d 4179	. . . . . . . . . 10 ⊢ (𝑧 = (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) → (dom 𝑧 ∪ ran 𝑧) = (dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∪ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥)))
41	40	reseq2d 6000	. . . . . . . . 9 ⊢ (𝑧 = (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) → ( I ↾ (dom 𝑧 ∪ ran 𝑧)) = ( I ↾ (dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∪ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))))
42		id 22	. . . . . . . . 9 ⊢ (𝑧 = (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) → 𝑧 = (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))
43	41, 42	sseq12d 4029	. . . . . . . 8 ⊢ (𝑧 = (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) → (( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧 ↔ ( I ↾ (dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∪ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))) ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥)))
44	43	cleq2lem 43598	. . . . . . 7 ⊢ (𝑧 = (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) → ((𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧) ↔ (𝑥 ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∧ ( I ↾ (dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∪ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))) ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))))
45	44	intminss 4979	. . . . . 6 ⊢ (((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∈ V ∧ (𝑥 ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∧ ( I ↾ (dom (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ∪ ran (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))) ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))) → ∩ {𝑧 ∈ V ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)} ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))
46	13, 37, 45	sylancl 586	. . . . 5 ⊢ (𝑥 ∈ V → ∩ {𝑧 ∈ V ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)} ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))
47	5, 46	eqsstrd 4034	. . . 4 ⊢ (𝑥 ∈ V → ∩ {𝑧 ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)} ⊆ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))
48		dmss 5916	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ⊆ 𝑧 → dom 𝑥 ⊆ dom 𝑧)
49		rnss 5953	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ⊆ 𝑧 → ran 𝑥 ⊆ ran 𝑧)
50		unss12 4198	. . . . . . . . . . . . . . . 16 ⊢ ((dom 𝑥 ⊆ dom 𝑧 ∧ ran 𝑥 ⊆ ran 𝑧) → (dom 𝑥 ∪ ran 𝑥) ⊆ (dom 𝑧 ∪ ran 𝑧))
51	48, 49, 50	syl2anc 584	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ⊆ 𝑧 → (dom 𝑥 ∪ ran 𝑥) ⊆ (dom 𝑧 ∪ ran 𝑧))
52		dfss 3982	. . . . . . . . . . . . . . 15 ⊢ ((dom 𝑥 ∪ ran 𝑥) ⊆ (dom 𝑧 ∪ ran 𝑧) ↔ (dom 𝑥 ∪ ran 𝑥) = ((dom 𝑥 ∪ ran 𝑥) ∩ (dom 𝑧 ∪ ran 𝑧)))
53	51, 52	sylib 218	. . . . . . . . . . . . . 14 ⊢ (𝑥 ⊆ 𝑧 → (dom 𝑥 ∪ ran 𝑥) = ((dom 𝑥 ∪ ran 𝑥) ∩ (dom 𝑧 ∪ ran 𝑧)))
54		incom 4217	. . . . . . . . . . . . . 14 ⊢ ((dom 𝑥 ∪ ran 𝑥) ∩ (dom 𝑧 ∪ ran 𝑧)) = ((dom 𝑧 ∪ ran 𝑧) ∩ (dom 𝑥 ∪ ran 𝑥))
55	53, 54	eqtrdi 2791	. . . . . . . . . . . . 13 ⊢ (𝑥 ⊆ 𝑧 → (dom 𝑥 ∪ ran 𝑥) = ((dom 𝑧 ∪ ran 𝑧) ∩ (dom 𝑥 ∪ ran 𝑥)))
56	55	reseq2d 6000	. . . . . . . . . . . 12 ⊢ (𝑥 ⊆ 𝑧 → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) = ( I ↾ ((dom 𝑧 ∪ ran 𝑧) ∩ (dom 𝑥 ∪ ran 𝑥))))
57		resres 6013	. . . . . . . . . . . 12 ⊢ (( I ↾ (dom 𝑧 ∪ ran 𝑧)) ↾ (dom 𝑥 ∪ ran 𝑥)) = ( I ↾ ((dom 𝑧 ∪ ran 𝑧) ∩ (dom 𝑥 ∪ ran 𝑥)))
58	56, 57	eqtr4di 2793	. . . . . . . . . . 11 ⊢ (𝑥 ⊆ 𝑧 → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) = (( I ↾ (dom 𝑧 ∪ ran 𝑧)) ↾ (dom 𝑥 ∪ ran 𝑥)))
59		resss 6022	. . . . . . . . . . . 12 ⊢ (( I ↾ (dom 𝑧 ∪ ran 𝑧)) ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ ( I ↾ (dom 𝑧 ∪ ran 𝑧))
60	59	a1i 11	. . . . . . . . . . 11 ⊢ (𝑥 ⊆ 𝑧 → (( I ↾ (dom 𝑧 ∪ ran 𝑧)) ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ ( I ↾ (dom 𝑧 ∪ ran 𝑧)))
61	58, 60	eqsstrd 4034	. . . . . . . . . 10 ⊢ (𝑥 ⊆ 𝑧 → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ ( I ↾ (dom 𝑧 ∪ ran 𝑧)))
62	61	adantr 480	. . . . . . . . 9 ⊢ ((𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧) → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ ( I ↾ (dom 𝑧 ∪ ran 𝑧)))
63		simpr 484	. . . . . . . . 9 ⊢ ((𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧) → ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)
64	62, 63	sstrd 4006	. . . . . . . 8 ⊢ ((𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧) → ( I ↾ (dom 𝑥 ∪ ran 𝑥)) ⊆ 𝑧)
65		simpl 482	. . . . . . . 8 ⊢ ((𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧) → 𝑥 ⊆ 𝑧)
66	64, 65	unssd 4202	. . . . . . 7 ⊢ ((𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧) → (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ⊆ 𝑧)
67	66	ax-gen 1792	. . . . . 6 ⊢ ∀𝑧((𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧) → (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ⊆ 𝑧)
68	67	a1i 11	. . . . 5 ⊢ (𝑥 ∈ V → ∀𝑧((𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧) → (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ⊆ 𝑧))
69		ssintab 4970	. . . . 5 ⊢ ((( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ⊆ ∩ {𝑧 ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)} ↔ ∀𝑧((𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧) → (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ⊆ 𝑧))
70	68, 69	sylibr 234	. . . 4 ⊢ (𝑥 ∈ V → (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥) ⊆ ∩ {𝑧 ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)})
71	47, 70	eqssd 4013	. . 3 ⊢ (𝑥 ∈ V → ∩ {𝑧 ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)} = (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))
72	71	mpteq2ia 5251	. 2 ⊢ (𝑥 ∈ V ↦ ∩ {𝑧 ∣ (𝑥 ⊆ 𝑧 ∧ ( I ↾ (dom 𝑧 ∪ ran 𝑧)) ⊆ 𝑧)}) = (𝑥 ∈ V ↦ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))
73	1, 72	eqtri 2763	1 ⊢ r* = (𝑥 ∈ V ↦ (( I ↾ (dom 𝑥 ∪ ran 𝑥)) ∪ 𝑥))

Syntax hints:   → wi 4   ∧ wa 395  ∀wal 1535   = wceq 1537   ∈ wcel 2106  {cab 2712  {crab 3433  Vcvv 3478   ∪ cun 3961   ∩ cin 3962   ⊆ wss 3963  ∩ cint 4951   ↦ cmpt 5231   I cid 5582  dom cdm 5689  ran crn 5690   ↾ cres 5691  r*crcl 43662

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-sep 5302  ax-nul 5312  ax-pow 5371  ax-pr 5438  ax-un 7754

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-clab 2713  df-cleq 2727  df-clel 2814  df-ral 3060  df-rex 3069  df-rab 3434  df-v 3480  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-nul 4340  df-if 4532  df-pw 4607  df-sn 4632  df-pr 4634  df-op 4638  df-uni 4913  df-int 4952  df-br 5149  df-opab 5211  df-mpt 5232  df-id 5583  df-xp 5695  df-rel 5696  df-cnv 5697  df-dm 5699  df-rn 5700  df-res 5701  df-ima 5702  df-rcl 43663

This theorem is referenced by:  dfrcl3  43665