Theorem undmrnresiss 38867

Description: Two ways of saying the identity relation restricted to the union of the domain and range of a relation is a subset of a relation. Generalization of reflexg 38868. (Contributed by RP, 26-Sep-2020.)

Assertion

Ref	Expression
undmrnresiss	⊢ (( I ↾ (dom 𝐴 ∪ ran 𝐴)) ⊆ 𝐵 ↔ ∀𝑥∀𝑦(𝑥𝐴𝑦 → (𝑥𝐵𝑥 ∧ 𝑦𝐵𝑦)))

Distinct variable groups:   𝑥,𝑦,𝐴   𝑥,𝐵,𝑦

Proof of Theorem undmrnresiss

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		resundi 5660	. . 3 ⊢ ( I ↾ (dom 𝐴 ∪ ran 𝐴)) = (( I ↾ dom 𝐴) ∪ ( I ↾ ran 𝐴))
2	1	sseq1i 3848	. 2 ⊢ (( I ↾ (dom 𝐴 ∪ ran 𝐴)) ⊆ 𝐵 ↔ (( I ↾ dom 𝐴) ∪ ( I ↾ ran 𝐴)) ⊆ 𝐵)
3		unss 4010	. 2 ⊢ ((( I ↾ dom 𝐴) ⊆ 𝐵 ∧ ( I ↾ ran 𝐴) ⊆ 𝐵) ↔ (( I ↾ dom 𝐴) ∪ ( I ↾ ran 𝐴)) ⊆ 𝐵)
4		relres 5675	. . . . . 6 ⊢ Rel ( I ↾ dom 𝐴)
5		ssrel 5455	. . . . . 6 ⊢ (Rel ( I ↾ dom 𝐴) → (( I ↾ dom 𝐴) ⊆ 𝐵 ↔ ∀𝑥∀𝑧(⟨𝑥, 𝑧⟩ ∈ ( I ↾ dom 𝐴) → ⟨𝑥, 𝑧⟩ ∈ 𝐵)))
6	4, 5	ax-mp 5	. . . . 5 ⊢ (( I ↾ dom 𝐴) ⊆ 𝐵 ↔ ∀𝑥∀𝑧(⟨𝑥, 𝑧⟩ ∈ ( I ↾ dom 𝐴) → ⟨𝑥, 𝑧⟩ ∈ 𝐵))
7		vex 3401	. . . . . . . . . 10 ⊢ 𝑥 ∈ V
8	7	eldm 5566	. . . . . . . . 9 ⊢ (𝑥 ∈ dom 𝐴 ↔ ∃𝑦 𝑥𝐴𝑦)
9		df-br 4887	. . . . . . . . . 10 ⊢ (𝑥 I 𝑧 ↔ ⟨𝑥, 𝑧⟩ ∈ I )
10		vex 3401	. . . . . . . . . . 11 ⊢ 𝑧 ∈ V
11	10	ideq 5520	. . . . . . . . . 10 ⊢ (𝑥 I 𝑧 ↔ 𝑥 = 𝑧)
12	9, 11	bitr3i 269	. . . . . . . . 9 ⊢ (⟨𝑥, 𝑧⟩ ∈ I ↔ 𝑥 = 𝑧)
13	8, 12	anbi12ci 621	. . . . . . . 8 ⊢ ((𝑥 ∈ dom 𝐴 ∧ ⟨𝑥, 𝑧⟩ ∈ I ) ↔ (𝑥 = 𝑧 ∧ ∃𝑦 𝑥𝐴𝑦))
14	10	opelresi 5650	. . . . . . . 8 ⊢ (⟨𝑥, 𝑧⟩ ∈ ( I ↾ dom 𝐴) ↔ (𝑥 ∈ dom 𝐴 ∧ ⟨𝑥, 𝑧⟩ ∈ I ))
15		19.42v 1996	. . . . . . . 8 ⊢ (∃𝑦(𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) ↔ (𝑥 = 𝑧 ∧ ∃𝑦 𝑥𝐴𝑦))
16	13, 14, 15	3bitr4i 295	. . . . . . 7 ⊢ (⟨𝑥, 𝑧⟩ ∈ ( I ↾ dom 𝐴) ↔ ∃𝑦(𝑥 = 𝑧 ∧ 𝑥𝐴𝑦))
17		df-br 4887	. . . . . . . 8 ⊢ (𝑥𝐵𝑧 ↔ ⟨𝑥, 𝑧⟩ ∈ 𝐵)
18	17	bicomi 216	. . . . . . 7 ⊢ (⟨𝑥, 𝑧⟩ ∈ 𝐵 ↔ 𝑥𝐵𝑧)
19	16, 18	imbi12i 342	. . . . . 6 ⊢ ((⟨𝑥, 𝑧⟩ ∈ ( I ↾ dom 𝐴) → ⟨𝑥, 𝑧⟩ ∈ 𝐵) ↔ (∃𝑦(𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧))
20	19	2albii 1864	. . . . 5 ⊢ (∀𝑥∀𝑧(⟨𝑥, 𝑧⟩ ∈ ( I ↾ dom 𝐴) → ⟨𝑥, 𝑧⟩ ∈ 𝐵) ↔ ∀𝑥∀𝑧(∃𝑦(𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧))
21		19.23v 1985	. . . . . . . 8 ⊢ (∀𝑦((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ (∃𝑦(𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧))
22	21	bicomi 216	. . . . . . 7 ⊢ ((∃𝑦(𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ ∀𝑦((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧))
23	22	2albii 1864	. . . . . 6 ⊢ (∀𝑥∀𝑧(∃𝑦(𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ ∀𝑥∀𝑧∀𝑦((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧))
24		alcom 2152	. . . . . . . 8 ⊢ (∀𝑧∀𝑦((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ ∀𝑦∀𝑧((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧))
25		ancomst 458	. . . . . . . . . . . 12 ⊢ (((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ ((𝑥𝐴𝑦 ∧ 𝑥 = 𝑧) → 𝑥𝐵𝑧))
26		impexp 443	. . . . . . . . . . . 12 ⊢ (((𝑥𝐴𝑦 ∧ 𝑥 = 𝑧) → 𝑥𝐵𝑧) ↔ (𝑥𝐴𝑦 → (𝑥 = 𝑧 → 𝑥𝐵𝑧)))
27	25, 26	bitri 267	. . . . . . . . . . 11 ⊢ (((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ (𝑥𝐴𝑦 → (𝑥 = 𝑧 → 𝑥𝐵𝑧)))
28	27	albii 1863	. . . . . . . . . 10 ⊢ (∀𝑧((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ ∀𝑧(𝑥𝐴𝑦 → (𝑥 = 𝑧 → 𝑥𝐵𝑧)))
29		19.21v 1982	. . . . . . . . . 10 ⊢ (∀𝑧(𝑥𝐴𝑦 → (𝑥 = 𝑧 → 𝑥𝐵𝑧)) ↔ (𝑥𝐴𝑦 → ∀𝑧(𝑥 = 𝑧 → 𝑥𝐵𝑧)))
30		equcom 2065	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑧 ↔ 𝑧 = 𝑥)
31	30	imbi1i 341	. . . . . . . . . . . . 13 ⊢ ((𝑥 = 𝑧 → 𝑥𝐵𝑧) ↔ (𝑧 = 𝑥 → 𝑥𝐵𝑧))
32	31	albii 1863	. . . . . . . . . . . 12 ⊢ (∀𝑧(𝑥 = 𝑧 → 𝑥𝐵𝑧) ↔ ∀𝑧(𝑧 = 𝑥 → 𝑥𝐵𝑧))
33		breq2 4890	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑥 → (𝑥𝐵𝑧 ↔ 𝑥𝐵𝑥))
34	33	equsalvw 2051	. . . . . . . . . . . 12 ⊢ (∀𝑧(𝑧 = 𝑥 → 𝑥𝐵𝑧) ↔ 𝑥𝐵𝑥)
35	32, 34	bitri 267	. . . . . . . . . . 11 ⊢ (∀𝑧(𝑥 = 𝑧 → 𝑥𝐵𝑧) ↔ 𝑥𝐵𝑥)
36	35	imbi2i 328	. . . . . . . . . 10 ⊢ ((𝑥𝐴𝑦 → ∀𝑧(𝑥 = 𝑧 → 𝑥𝐵𝑧)) ↔ (𝑥𝐴𝑦 → 𝑥𝐵𝑥))
37	28, 29, 36	3bitri 289	. . . . . . . . 9 ⊢ (∀𝑧((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ (𝑥𝐴𝑦 → 𝑥𝐵𝑥))
38	37	albii 1863	. . . . . . . 8 ⊢ (∀𝑦∀𝑧((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ ∀𝑦(𝑥𝐴𝑦 → 𝑥𝐵𝑥))
39	24, 38	bitri 267	. . . . . . 7 ⊢ (∀𝑧∀𝑦((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ ∀𝑦(𝑥𝐴𝑦 → 𝑥𝐵𝑥))
40	39	albii 1863	. . . . . 6 ⊢ (∀𝑥∀𝑧∀𝑦((𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ ∀𝑥∀𝑦(𝑥𝐴𝑦 → 𝑥𝐵𝑥))
41	23, 40	bitri 267	. . . . 5 ⊢ (∀𝑥∀𝑧(∃𝑦(𝑥 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑥𝐵𝑧) ↔ ∀𝑥∀𝑦(𝑥𝐴𝑦 → 𝑥𝐵𝑥))
42	6, 20, 41	3bitri 289	. . . 4 ⊢ (( I ↾ dom 𝐴) ⊆ 𝐵 ↔ ∀𝑥∀𝑦(𝑥𝐴𝑦 → 𝑥𝐵𝑥))
43		relres 5675	. . . . . 6 ⊢ Rel ( I ↾ ran 𝐴)
44		ssrel 5455	. . . . . 6 ⊢ (Rel ( I ↾ ran 𝐴) → (( I ↾ ran 𝐴) ⊆ 𝐵 ↔ ∀𝑦∀𝑧(⟨𝑦, 𝑧⟩ ∈ ( I ↾ ran 𝐴) → ⟨𝑦, 𝑧⟩ ∈ 𝐵)))
45	43, 44	ax-mp 5	. . . . 5 ⊢ (( I ↾ ran 𝐴) ⊆ 𝐵 ↔ ∀𝑦∀𝑧(⟨𝑦, 𝑧⟩ ∈ ( I ↾ ran 𝐴) → ⟨𝑦, 𝑧⟩ ∈ 𝐵))
46		vex 3401	. . . . . . . . . 10 ⊢ 𝑦 ∈ V
47	46	elrn 5612	. . . . . . . . 9 ⊢ (𝑦 ∈ ran 𝐴 ↔ ∃𝑥 𝑥𝐴𝑦)
48		df-br 4887	. . . . . . . . . 10 ⊢ (𝑦 I 𝑧 ↔ ⟨𝑦, 𝑧⟩ ∈ I )
49	10	ideq 5520	. . . . . . . . . 10 ⊢ (𝑦 I 𝑧 ↔ 𝑦 = 𝑧)
50	48, 49	bitr3i 269	. . . . . . . . 9 ⊢ (⟨𝑦, 𝑧⟩ ∈ I ↔ 𝑦 = 𝑧)
51	47, 50	anbi12ci 621	. . . . . . . 8 ⊢ ((𝑦 ∈ ran 𝐴 ∧ ⟨𝑦, 𝑧⟩ ∈ I ) ↔ (𝑦 = 𝑧 ∧ ∃𝑥 𝑥𝐴𝑦))
52	10	opelresi 5650	. . . . . . . 8 ⊢ (⟨𝑦, 𝑧⟩ ∈ ( I ↾ ran 𝐴) ↔ (𝑦 ∈ ran 𝐴 ∧ ⟨𝑦, 𝑧⟩ ∈ I ))
53		19.42v 1996	. . . . . . . 8 ⊢ (∃𝑥(𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) ↔ (𝑦 = 𝑧 ∧ ∃𝑥 𝑥𝐴𝑦))
54	51, 52, 53	3bitr4i 295	. . . . . . 7 ⊢ (⟨𝑦, 𝑧⟩ ∈ ( I ↾ ran 𝐴) ↔ ∃𝑥(𝑦 = 𝑧 ∧ 𝑥𝐴𝑦))
55		df-br 4887	. . . . . . . 8 ⊢ (𝑦𝐵𝑧 ↔ ⟨𝑦, 𝑧⟩ ∈ 𝐵)
56	55	bicomi 216	. . . . . . 7 ⊢ (⟨𝑦, 𝑧⟩ ∈ 𝐵 ↔ 𝑦𝐵𝑧)
57	54, 56	imbi12i 342	. . . . . 6 ⊢ ((⟨𝑦, 𝑧⟩ ∈ ( I ↾ ran 𝐴) → ⟨𝑦, 𝑧⟩ ∈ 𝐵) ↔ (∃𝑥(𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧))
58	57	2albii 1864	. . . . 5 ⊢ (∀𝑦∀𝑧(⟨𝑦, 𝑧⟩ ∈ ( I ↾ ran 𝐴) → ⟨𝑦, 𝑧⟩ ∈ 𝐵) ↔ ∀𝑦∀𝑧(∃𝑥(𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧))
59		19.23v 1985	. . . . . . . 8 ⊢ (∀𝑥((𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧) ↔ (∃𝑥(𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧))
60	59	bicomi 216	. . . . . . 7 ⊢ ((∃𝑥(𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧) ↔ ∀𝑥((𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧))
61	60	2albii 1864	. . . . . 6 ⊢ (∀𝑦∀𝑧(∃𝑥(𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧) ↔ ∀𝑦∀𝑧∀𝑥((𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧))
62		alrot3 2153	. . . . . 6 ⊢ (∀𝑥∀𝑦∀𝑧((𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧) ↔ ∀𝑦∀𝑧∀𝑥((𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧))
63		ancomst 458	. . . . . . . . . 10 ⊢ (((𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧) ↔ ((𝑥𝐴𝑦 ∧ 𝑦 = 𝑧) → 𝑦𝐵𝑧))
64		impexp 443	. . . . . . . . . 10 ⊢ (((𝑥𝐴𝑦 ∧ 𝑦 = 𝑧) → 𝑦𝐵𝑧) ↔ (𝑥𝐴𝑦 → (𝑦 = 𝑧 → 𝑦𝐵𝑧)))
65	63, 64	bitri 267	. . . . . . . . 9 ⊢ (((𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧) ↔ (𝑥𝐴𝑦 → (𝑦 = 𝑧 → 𝑦𝐵𝑧)))
66	65	albii 1863	. . . . . . . 8 ⊢ (∀𝑧((𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧) ↔ ∀𝑧(𝑥𝐴𝑦 → (𝑦 = 𝑧 → 𝑦𝐵𝑧)))
67		19.21v 1982	. . . . . . . 8 ⊢ (∀𝑧(𝑥𝐴𝑦 → (𝑦 = 𝑧 → 𝑦𝐵𝑧)) ↔ (𝑥𝐴𝑦 → ∀𝑧(𝑦 = 𝑧 → 𝑦𝐵𝑧)))
68		equcom 2065	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑧 ↔ 𝑧 = 𝑦)
69	68	imbi1i 341	. . . . . . . . . . 11 ⊢ ((𝑦 = 𝑧 → 𝑦𝐵𝑧) ↔ (𝑧 = 𝑦 → 𝑦𝐵𝑧))
70	69	albii 1863	. . . . . . . . . 10 ⊢ (∀𝑧(𝑦 = 𝑧 → 𝑦𝐵𝑧) ↔ ∀𝑧(𝑧 = 𝑦 → 𝑦𝐵𝑧))
71		breq2 4890	. . . . . . . . . . 11 ⊢ (𝑧 = 𝑦 → (𝑦𝐵𝑧 ↔ 𝑦𝐵𝑦))
72	71	equsalvw 2051	. . . . . . . . . 10 ⊢ (∀𝑧(𝑧 = 𝑦 → 𝑦𝐵𝑧) ↔ 𝑦𝐵𝑦)
73	70, 72	bitri 267	. . . . . . . . 9 ⊢ (∀𝑧(𝑦 = 𝑧 → 𝑦𝐵𝑧) ↔ 𝑦𝐵𝑦)
74	73	imbi2i 328	. . . . . . . 8 ⊢ ((𝑥𝐴𝑦 → ∀𝑧(𝑦 = 𝑧 → 𝑦𝐵𝑧)) ↔ (𝑥𝐴𝑦 → 𝑦𝐵𝑦))
75	66, 67, 74	3bitri 289	. . . . . . 7 ⊢ (∀𝑧((𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧) ↔ (𝑥𝐴𝑦 → 𝑦𝐵𝑦))
76	75	2albii 1864	. . . . . 6 ⊢ (∀𝑥∀𝑦∀𝑧((𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧) ↔ ∀𝑥∀𝑦(𝑥𝐴𝑦 → 𝑦𝐵𝑦))
77	61, 62, 76	3bitr2i 291	. . . . 5 ⊢ (∀𝑦∀𝑧(∃𝑥(𝑦 = 𝑧 ∧ 𝑥𝐴𝑦) → 𝑦𝐵𝑧) ↔ ∀𝑥∀𝑦(𝑥𝐴𝑦 → 𝑦𝐵𝑦))
78	45, 58, 77	3bitri 289	. . . 4 ⊢ (( I ↾ ran 𝐴) ⊆ 𝐵 ↔ ∀𝑥∀𝑦(𝑥𝐴𝑦 → 𝑦𝐵𝑦))
79	42, 78	anbi12i 620	. . 3 ⊢ ((( I ↾ dom 𝐴) ⊆ 𝐵 ∧ ( I ↾ ran 𝐴) ⊆ 𝐵) ↔ (∀𝑥∀𝑦(𝑥𝐴𝑦 → 𝑥𝐵𝑥) ∧ ∀𝑥∀𝑦(𝑥𝐴𝑦 → 𝑦𝐵𝑦)))
80		19.26-2 1917	. . 3 ⊢ (∀𝑥∀𝑦((𝑥𝐴𝑦 → 𝑥𝐵𝑥) ∧ (𝑥𝐴𝑦 → 𝑦𝐵𝑦)) ↔ (∀𝑥∀𝑦(𝑥𝐴𝑦 → 𝑥𝐵𝑥) ∧ ∀𝑥∀𝑦(𝑥𝐴𝑦 → 𝑦𝐵𝑦)))
81		pm4.76 514	. . . 4 ⊢ (((𝑥𝐴𝑦 → 𝑥𝐵𝑥) ∧ (𝑥𝐴𝑦 → 𝑦𝐵𝑦)) ↔ (𝑥𝐴𝑦 → (𝑥𝐵𝑥 ∧ 𝑦𝐵𝑦)))
82	81	2albii 1864	. . 3 ⊢ (∀𝑥∀𝑦((𝑥𝐴𝑦 → 𝑥𝐵𝑥) ∧ (𝑥𝐴𝑦 → 𝑦𝐵𝑦)) ↔ ∀𝑥∀𝑦(𝑥𝐴𝑦 → (𝑥𝐵𝑥 ∧ 𝑦𝐵𝑦)))
83	79, 80, 82	3bitr2i 291	. 2 ⊢ ((( I ↾ dom 𝐴) ⊆ 𝐵 ∧ ( I ↾ ran 𝐴) ⊆ 𝐵) ↔ ∀𝑥∀𝑦(𝑥𝐴𝑦 → (𝑥𝐵𝑥 ∧ 𝑦𝐵𝑦)))
84	2, 3, 83	3bitr2i 291	1 ⊢ (( I ↾ (dom 𝐴 ∪ ran 𝐴)) ⊆ 𝐵 ↔ ∀𝑥∀𝑦(𝑥𝐴𝑦 → (𝑥𝐵𝑥 ∧ 𝑦𝐵𝑦)))

Syntax hints:   → wi 4   ↔ wb 198   ∧ wa 386  ∀wal 1599   = wceq 1601  ∃wex 1823   ∈ wcel 2107   ∪ cun 3790   ⊆ wss 3792  ⟨cop 4404   class class class wbr 4886   I cid 5260  dom cdm 5355  ran crn 5356   ↾ cres 5357  Rel wrel 5360

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1839  ax-4 1853  ax-5 1953  ax-6 2021  ax-7 2055  ax-9 2116  ax-10 2135  ax-11 2150  ax-12 2163  ax-13 2334  ax-ext 2754  ax-sep 5017  ax-nul 5025  ax-pr 5138

This theorem depends on definitions:  df-bi 199  df-an 387  df-or 837  df-3an 1073  df-tru 1605  df-ex 1824  df-nf 1828  df-sb 2012  df-mo 2551  df-eu 2587  df-clab 2764  df-cleq 2770  df-clel 2774  df-nfc 2921  df-ral 3095  df-rex 3096  df-rab 3099  df-v 3400  df-dif 3795  df-un 3797  df-in 3799  df-ss 3806  df-nul 4142  df-if 4308  df-sn 4399  df-pr 4401  df-op 4405  df-br 4887  df-opab 4949  df-id 5261  df-xp 5361  df-rel 5362  df-cnv 5363  df-dm 5365  df-rn 5366  df-res 5367

This theorem is referenced by:  reflexg  38868