Theorem relcoi1 5214

Description: Composition with the identity relation restricted to a relation's field. (Contributed by FL, 8-May-2011.)

Assertion

Ref	Expression
relcoi1	⊢ (Rel 𝑅 → (𝑅 ∘ ( I ↾ ∪ ∪ 𝑅)) = 𝑅)

Proof of Theorem relcoi1

Step	Hyp	Ref	Expression
1		relfld 5211	. . 3 ⊢ (Rel 𝑅 → ∪ ∪ 𝑅 = (dom 𝑅 ∪ ran 𝑅))
2		resundi 4972	. . . . 5 ⊢ ( I ↾ (dom 𝑅 ∪ ran 𝑅)) = (( I ↾ dom 𝑅) ∪ ( I ↾ ran 𝑅))
3		coeq2 4836	. . . . 5 ⊢ (( I ↾ (dom 𝑅 ∪ ran 𝑅)) = (( I ↾ dom 𝑅) ∪ ( I ↾ ran 𝑅)) → (𝑅 ∘ ( I ↾ (dom 𝑅 ∪ ran 𝑅))) = (𝑅 ∘ (( I ↾ dom 𝑅) ∪ ( I ↾ ran 𝑅))))
4		coundi 5184	. . . . . . 7 ⊢ (𝑅 ∘ (( I ↾ dom 𝑅) ∪ ( I ↾ ran 𝑅))) = ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅)))
5		resco 5187	. . . . . . . 8 ⊢ ((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ∘ ( I ↾ dom 𝑅))
6		coi1 5198	. . . . . . . . 9 ⊢ (Rel 𝑅 → (𝑅 ∘ I ) = 𝑅)
7		reseq1 4953	. . . . . . . . . 10 ⊢ ((𝑅 ∘ I ) = 𝑅 → ((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ↾ dom 𝑅))
8		resdm 4998	. . . . . . . . . . 11 ⊢ (Rel 𝑅 → (𝑅 ↾ dom 𝑅) = 𝑅)
9		eqtr 2223	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ↾ dom 𝑅) ∧ (𝑅 ↾ dom 𝑅) = 𝑅) → ((𝑅 ∘ I ) ↾ dom 𝑅) = 𝑅)
10		eqtr 2223	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑅 ∘ ( I ↾ dom 𝑅)) = ((𝑅 ∘ I ) ↾ dom 𝑅) ∧ ((𝑅 ∘ I ) ↾ dom 𝑅) = 𝑅) → (𝑅 ∘ ( I ↾ dom 𝑅)) = 𝑅)
11		resco 5187	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ∘ ( I ↾ ran 𝑅))
12		uneq1 3320	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑅 ∘ ( I ↾ dom 𝑅)) = 𝑅 → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))))
13		reseq1 4953	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑅 ∘ I ) = 𝑅 → ((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ↾ ran 𝑅))
14		eqtr 2223	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑅 ∘ ( I ↾ ran 𝑅)) = ((𝑅 ∘ I ) ↾ ran 𝑅) ∧ ((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ↾ ran 𝑅)) → (𝑅 ∘ ( I ↾ ran 𝑅)) = (𝑅 ↾ ran 𝑅))
15	14	uneq2d 3327	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝑅 ∘ ( I ↾ ran 𝑅)) = ((𝑅 ∘ I ) ↾ ran 𝑅) ∧ ((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ↾ ran 𝑅)) → (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ↾ ran 𝑅)))
16		eqtr 2223	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) ∧ (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ↾ ran 𝑅))) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ↾ ran 𝑅)))
17		resss 4983	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (𝑅 ↾ ran 𝑅) ⊆ 𝑅
18		ssequn2 3346	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((𝑅 ↾ ran 𝑅) ⊆ 𝑅 ↔ (𝑅 ∪ (𝑅 ↾ ran 𝑅)) = 𝑅)
19	17, 18	mpbi 145	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (𝑅 ∪ (𝑅 ↾ ran 𝑅)) = 𝑅
20	19, 6	eqtr4id 2257	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (Rel 𝑅 → (𝑅 ∪ (𝑅 ↾ ran 𝑅)) = (𝑅 ∘ I ))
21		eqeq1 2212	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ↾ ran 𝑅)) → (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ) ↔ (𝑅 ∪ (𝑅 ↾ ran 𝑅)) = (𝑅 ∘ I )))
22	20, 21	imbitrrid 156	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ↾ ran 𝑅)) → (Rel 𝑅 → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))
23	16, 22	syl 14	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) ∧ (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ↾ ran 𝑅))) → (Rel 𝑅 → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))
24	23	ex 115	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) → ((𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ↾ ran 𝑅)) → (Rel 𝑅 → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
25	24	com3l 81	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ↾ ran 𝑅)) → (Rel 𝑅 → (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
26	15, 25	syl 14	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝑅 ∘ ( I ↾ ran 𝑅)) = ((𝑅 ∘ I ) ↾ ran 𝑅) ∧ ((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ↾ ran 𝑅)) → (Rel 𝑅 → (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
27	26	ex 115	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑅 ∘ ( I ↾ ran 𝑅)) = ((𝑅 ∘ I ) ↾ ran 𝑅) → (((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ↾ ran 𝑅) → (Rel 𝑅 → (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))))
28	27	eqcoms 2208	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ∘ ( I ↾ ran 𝑅)) → (((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ↾ ran 𝑅) → (Rel 𝑅 → (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))))
29	28	com3l 81	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ↾ ran 𝑅) → (Rel 𝑅 → (((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ∘ ( I ↾ ran 𝑅)) → (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))))
30	13, 29	syl 14	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑅 ∘ I ) = 𝑅 → (Rel 𝑅 → (((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ∘ ( I ↾ ran 𝑅)) → (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))))
31	6, 30	mpcom 36	. . . . . . . . . . . . . . . . . . . 20 ⊢ (Rel 𝑅 → (((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ∘ ( I ↾ ran 𝑅)) → (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
32	31	com3l 81	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑅 ∘ I ) ↾ ran 𝑅) = (𝑅 ∘ ( I ↾ ran 𝑅)) → (((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) → (Rel 𝑅 → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
33	11, 12, 32	mpsyl 65	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑅 ∘ ( I ↾ dom 𝑅)) = 𝑅 → (Rel 𝑅 → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))
34	10, 33	syl 14	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑅 ∘ ( I ↾ dom 𝑅)) = ((𝑅 ∘ I ) ↾ dom 𝑅) ∧ ((𝑅 ∘ I ) ↾ dom 𝑅) = 𝑅) → (Rel 𝑅 → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))
35	34	ex 115	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∘ ( I ↾ dom 𝑅)) = ((𝑅 ∘ I ) ↾ dom 𝑅) → (((𝑅 ∘ I ) ↾ dom 𝑅) = 𝑅 → (Rel 𝑅 → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
36	35	eqcoms 2208	. . . . . . . . . . . . . . 15 ⊢ (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ∘ ( I ↾ dom 𝑅)) → (((𝑅 ∘ I ) ↾ dom 𝑅) = 𝑅 → (Rel 𝑅 → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
37	36	com3l 81	. . . . . . . . . . . . . 14 ⊢ (((𝑅 ∘ I ) ↾ dom 𝑅) = 𝑅 → (Rel 𝑅 → (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ∘ ( I ↾ dom 𝑅)) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
38	9, 37	syl 14	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ↾ dom 𝑅) ∧ (𝑅 ↾ dom 𝑅) = 𝑅) → (Rel 𝑅 → (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ∘ ( I ↾ dom 𝑅)) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
39	38	ex 115	. . . . . . . . . . . 12 ⊢ (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ↾ dom 𝑅) → ((𝑅 ↾ dom 𝑅) = 𝑅 → (Rel 𝑅 → (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ∘ ( I ↾ dom 𝑅)) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))))
40	39	com3l 81	. . . . . . . . . . 11 ⊢ ((𝑅 ↾ dom 𝑅) = 𝑅 → (Rel 𝑅 → (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ↾ dom 𝑅) → (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ∘ ( I ↾ dom 𝑅)) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))))
41	8, 40	mpcom 36	. . . . . . . . . 10 ⊢ (Rel 𝑅 → (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ↾ dom 𝑅) → (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ∘ ( I ↾ dom 𝑅)) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
42	7, 41	syl5com 29	. . . . . . . . 9 ⊢ ((𝑅 ∘ I ) = 𝑅 → (Rel 𝑅 → (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ∘ ( I ↾ dom 𝑅)) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))))
43	6, 42	mpcom 36	. . . . . . . 8 ⊢ (Rel 𝑅 → (((𝑅 ∘ I ) ↾ dom 𝑅) = (𝑅 ∘ ( I ↾ dom 𝑅)) → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))
44	5, 43	mpi 15	. . . . . . 7 ⊢ (Rel 𝑅 → ((𝑅 ∘ ( I ↾ dom 𝑅)) ∪ (𝑅 ∘ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))
45	4, 44	eqtrid 2250	. . . . . 6 ⊢ (Rel 𝑅 → (𝑅 ∘ (( I ↾ dom 𝑅) ∪ ( I ↾ ran 𝑅))) = (𝑅 ∘ I ))
46		eqeq1 2212	. . . . . 6 ⊢ ((𝑅 ∘ ( I ↾ (dom 𝑅 ∪ ran 𝑅))) = (𝑅 ∘ (( I ↾ dom 𝑅) ∪ ( I ↾ ran 𝑅))) → ((𝑅 ∘ ( I ↾ (dom 𝑅 ∪ ran 𝑅))) = (𝑅 ∘ I ) ↔ (𝑅 ∘ (( I ↾ dom 𝑅) ∪ ( I ↾ ran 𝑅))) = (𝑅 ∘ I )))
47	45, 46	imbitrrid 156	. . . . 5 ⊢ ((𝑅 ∘ ( I ↾ (dom 𝑅 ∪ ran 𝑅))) = (𝑅 ∘ (( I ↾ dom 𝑅) ∪ ( I ↾ ran 𝑅))) → (Rel 𝑅 → (𝑅 ∘ ( I ↾ (dom 𝑅 ∪ ran 𝑅))) = (𝑅 ∘ I )))
48	2, 3, 47	mp2b 8	. . . 4 ⊢ (Rel 𝑅 → (𝑅 ∘ ( I ↾ (dom 𝑅 ∪ ran 𝑅))) = (𝑅 ∘ I ))
49		reseq2 4954	. . . . . 6 ⊢ (∪ ∪ 𝑅 = (dom 𝑅 ∪ ran 𝑅) → ( I ↾ ∪ ∪ 𝑅) = ( I ↾ (dom 𝑅 ∪ ran 𝑅)))
50	49	coeq2d 4840	. . . . 5 ⊢ (∪ ∪ 𝑅 = (dom 𝑅 ∪ ran 𝑅) → (𝑅 ∘ ( I ↾ ∪ ∪ 𝑅)) = (𝑅 ∘ ( I ↾ (dom 𝑅 ∪ ran 𝑅))))
51	50	eqeq1d 2214	. . . 4 ⊢ (∪ ∪ 𝑅 = (dom 𝑅 ∪ ran 𝑅) → ((𝑅 ∘ ( I ↾ ∪ ∪ 𝑅)) = (𝑅 ∘ I ) ↔ (𝑅 ∘ ( I ↾ (dom 𝑅 ∪ ran 𝑅))) = (𝑅 ∘ I )))
52	48, 51	imbitrrid 156	. . 3 ⊢ (∪ ∪ 𝑅 = (dom 𝑅 ∪ ran 𝑅) → (Rel 𝑅 → (𝑅 ∘ ( I ↾ ∪ ∪ 𝑅)) = (𝑅 ∘ I )))
53	1, 52	mpcom 36	. 2 ⊢ (Rel 𝑅 → (𝑅 ∘ ( I ↾ ∪ ∪ 𝑅)) = (𝑅 ∘ I ))
54	53, 6	eqtrd 2238	1 ⊢ (Rel 𝑅 → (𝑅 ∘ ( I ↾ ∪ ∪ 𝑅)) = 𝑅)

Syntax hints:   → wi 4   ∧ wa 104   = wceq 1373   ∪ cun 3164   ⊆ wss 3166  ∪ cuni 3850   I cid 4335  dom cdm 4675  ran crn 4676   ↾ cres 4677   ∘ ccom 4679  Rel wrel 4680

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 711  ax-5 1470  ax-7 1471  ax-gen 1472  ax-ie1 1516  ax-ie2 1517  ax-8 1527  ax-10 1528  ax-11 1529  ax-i12 1530  ax-bndl 1532  ax-4 1533  ax-17 1549  ax-i9 1553  ax-ial 1557  ax-i5r 1558  ax-14 2179  ax-ext 2187  ax-sep 4162  ax-pow 4218  ax-pr 4253

This theorem depends on definitions:  df-bi 117  df-3an 983  df-tru 1376  df-nf 1484  df-sb 1786  df-eu 2057  df-mo 2058  df-clab 2192  df-cleq 2198  df-clel 2201  df-nfc 2337  df-ral 2489  df-rex 2490  df-v 2774  df-un 3170  df-in 3172  df-ss 3179  df-pw 3618  df-sn 3639  df-pr 3640  df-op 3642  df-uni 3851  df-br 4045  df-opab 4106  df-id 4340  df-xp 4681  df-rel 4682  df-cnv 4683  df-co 4684  df-dm 4685  df-rn 4686  df-res 4687

This theorem is referenced by: (None)