Theorem fcnvgreu 30412

Description: If the converse of a relation 𝐴 is a function, exactly one point of its graph has a given second element (that is, function value). (Contributed by Thierry Arnoux, 1-Apr-2018.)

Assertion

Ref	Expression
fcnvgreu	⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑌 ∈ ran 𝐴) → ∃!𝑝 ∈ 𝐴 𝑌 = (2nd ‘𝑝))

Distinct variable groups:   𝐴,𝑝   𝑌,𝑝

Proof of Theorem fcnvgreu

Dummy variables 𝑞 𝑟 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-rn 5560	. . . 4 ⊢ ran 𝐴 = dom ◡𝐴
2	1	eleq2i 2904	. . 3 ⊢ (𝑌 ∈ ran 𝐴 ↔ 𝑌 ∈ dom ◡𝐴)
3		fgreu 30411	. . . 4 ⊢ ((Fun ◡𝐴 ∧ 𝑌 ∈ dom ◡𝐴) → ∃!𝑞 ∈ ◡ 𝐴𝑌 = (1st ‘𝑞))
4	3	adantll 712	. . 3 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑌 ∈ dom ◡𝐴) → ∃!𝑞 ∈ ◡ 𝐴𝑌 = (1st ‘𝑞))
5	2, 4	sylan2b 595	. 2 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑌 ∈ ran 𝐴) → ∃!𝑞 ∈ ◡ 𝐴𝑌 = (1st ‘𝑞))
6		cnvcnvss 6045	. . . . . 6 ⊢ ◡◡𝐴 ⊆ 𝐴
7		cnvssrndm 6116	. . . . . . . . . . 11 ⊢ ◡𝐴 ⊆ (ran 𝐴 × dom 𝐴)
8	7	sseli 3962	. . . . . . . . . 10 ⊢ (𝑞 ∈ ◡𝐴 → 𝑞 ∈ (ran 𝐴 × dom 𝐴))
9		dfdm4 5758	. . . . . . . . . . 11 ⊢ dom 𝐴 = ran ◡𝐴
10	1, 9	xpeq12i 5577	. . . . . . . . . 10 ⊢ (ran 𝐴 × dom 𝐴) = (dom ◡𝐴 × ran ◡𝐴)
11	8, 10	eleqtrdi 2923	. . . . . . . . 9 ⊢ (𝑞 ∈ ◡𝐴 → 𝑞 ∈ (dom ◡𝐴 × ran ◡𝐴))
12		2nd1st 7731	. . . . . . . . 9 ⊢ (𝑞 ∈ (dom ◡𝐴 × ran ◡𝐴) → ∪ ◡{𝑞} = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩)
13	11, 12	syl 17	. . . . . . . 8 ⊢ (𝑞 ∈ ◡𝐴 → ∪ ◡{𝑞} = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩)
14	13	eqcomd 2827	. . . . . . 7 ⊢ (𝑞 ∈ ◡𝐴 → ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ = ∪ ◡{𝑞})
15		relcnv 5961	. . . . . . . 8 ⊢ Rel ◡𝐴
16		cnvf1olem 7799	. . . . . . . . 9 ⊢ ((Rel ◡𝐴 ∧ (𝑞 ∈ ◡𝐴 ∧ ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ = ∪ ◡{𝑞})) → (⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ∈ ◡◡𝐴 ∧ 𝑞 = ∪ ◡{⟨(2nd ‘𝑞), (1st ‘𝑞)⟩}))
17	16	simpld 497	. . . . . . . 8 ⊢ ((Rel ◡𝐴 ∧ (𝑞 ∈ ◡𝐴 ∧ ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ = ∪ ◡{𝑞})) → ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ∈ ◡◡𝐴)
18	15, 17	mpan 688	. . . . . . 7 ⊢ ((𝑞 ∈ ◡𝐴 ∧ ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ = ∪ ◡{𝑞}) → ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ∈ ◡◡𝐴)
19	14, 18	mpdan 685	. . . . . 6 ⊢ (𝑞 ∈ ◡𝐴 → ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ∈ ◡◡𝐴)
20	6, 19	sseldi 3964	. . . . 5 ⊢ (𝑞 ∈ ◡𝐴 → ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ∈ 𝐴)
21	20	adantl 484	. . . 4 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑞 ∈ ◡𝐴) → ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ∈ 𝐴)
22		simpll 765	. . . . . . 7 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) → Rel 𝐴)
23		simpr 487	. . . . . . 7 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) → 𝑝 ∈ 𝐴)
24		relssdmrn 6115	. . . . . . . . . . 11 ⊢ (Rel 𝐴 → 𝐴 ⊆ (dom 𝐴 × ran 𝐴))
25	24	adantr 483	. . . . . . . . . 10 ⊢ ((Rel 𝐴 ∧ Fun ◡𝐴) → 𝐴 ⊆ (dom 𝐴 × ran 𝐴))
26	25	sselda 3966	. . . . . . . . 9 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) → 𝑝 ∈ (dom 𝐴 × ran 𝐴))
27		2nd1st 7731	. . . . . . . . 9 ⊢ (𝑝 ∈ (dom 𝐴 × ran 𝐴) → ∪ ◡{𝑝} = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩)
28	26, 27	syl 17	. . . . . . . 8 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) → ∪ ◡{𝑝} = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩)
29	28	eqcomd 2827	. . . . . . 7 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) → ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ = ∪ ◡{𝑝})
30		cnvf1olem 7799	. . . . . . . 8 ⊢ ((Rel 𝐴 ∧ (𝑝 ∈ 𝐴 ∧ ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ = ∪ ◡{𝑝})) → (⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ ∈ ◡𝐴 ∧ 𝑝 = ∪ ◡{⟨(2nd ‘𝑝), (1st ‘𝑝)⟩}))
31	30	simpld 497	. . . . . . 7 ⊢ ((Rel 𝐴 ∧ (𝑝 ∈ 𝐴 ∧ ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ = ∪ ◡{𝑝})) → ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ ∈ ◡𝐴)
32	22, 23, 29, 31	syl12anc 834	. . . . . 6 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) → ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ ∈ ◡𝐴)
33	15	a1i 11	. . . . . . . . . 10 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → Rel ◡𝐴)
34		simplr 767	. . . . . . . . . 10 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → 𝑞 ∈ ◡𝐴)
35	14	ad2antlr 725	. . . . . . . . . 10 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ = ∪ ◡{𝑞})
36	16	simprd 498	. . . . . . . . . 10 ⊢ ((Rel ◡𝐴 ∧ (𝑞 ∈ ◡𝐴 ∧ ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ = ∪ ◡{𝑞})) → 𝑞 = ∪ ◡{⟨(2nd ‘𝑞), (1st ‘𝑞)⟩})
37	33, 34, 35, 36	syl12anc 834	. . . . . . . . 9 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → 𝑞 = ∪ ◡{⟨(2nd ‘𝑞), (1st ‘𝑞)⟩})
38		simpr 487	. . . . . . . . . . . 12 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩)
39	38	sneqd 4572	. . . . . . . . . . 11 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → {𝑝} = {⟨(2nd ‘𝑞), (1st ‘𝑞)⟩})
40	39	cnveqd 5740	. . . . . . . . . 10 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → ◡{𝑝} = ◡{⟨(2nd ‘𝑞), (1st ‘𝑞)⟩})
41	40	unieqd 4841	. . . . . . . . 9 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → ∪ ◡{𝑝} = ∪ ◡{⟨(2nd ‘𝑞), (1st ‘𝑞)⟩})
42	28	ad2antrr 724	. . . . . . . . 9 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → ∪ ◡{𝑝} = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩)
43	37, 41, 42	3eqtr2d 2862	. . . . . . . 8 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩)
44	30	simprd 498	. . . . . . . . . . 11 ⊢ ((Rel 𝐴 ∧ (𝑝 ∈ 𝐴 ∧ ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ = ∪ ◡{𝑝})) → 𝑝 = ∪ ◡{⟨(2nd ‘𝑝), (1st ‘𝑝)⟩})
45	22, 23, 29, 44	syl12anc 834	. . . . . . . . . 10 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) → 𝑝 = ∪ ◡{⟨(2nd ‘𝑝), (1st ‘𝑝)⟩})
46	45	ad2antrr 724	. . . . . . . . 9 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩) → 𝑝 = ∪ ◡{⟨(2nd ‘𝑝), (1st ‘𝑝)⟩})
47		simpr 487	. . . . . . . . . . . 12 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩) → 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩)
48	47	sneqd 4572	. . . . . . . . . . 11 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩) → {𝑞} = {⟨(2nd ‘𝑝), (1st ‘𝑝)⟩})
49	48	cnveqd 5740	. . . . . . . . . 10 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩) → ◡{𝑞} = ◡{⟨(2nd ‘𝑝), (1st ‘𝑝)⟩})
50	49	unieqd 4841	. . . . . . . . 9 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩) → ∪ ◡{𝑞} = ∪ ◡{⟨(2nd ‘𝑝), (1st ‘𝑝)⟩})
51	13	ad2antlr 725	. . . . . . . . 9 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩) → ∪ ◡{𝑞} = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩)
52	46, 50, 51	3eqtr2d 2862	. . . . . . . 8 ⊢ (((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) ∧ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩) → 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩)
53	43, 52	impbida 799	. . . . . . 7 ⊢ ((((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) ∧ 𝑞 ∈ ◡𝐴) → (𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩))
54	53	ralrimiva 3182	. . . . . 6 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) → ∀𝑞 ∈ ◡ 𝐴(𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩))
55		eqeq2 2833	. . . . . . . . 9 ⊢ (𝑟 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ → (𝑞 = 𝑟 ↔ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩))
56	55	bibi2d 345	. . . . . . . 8 ⊢ (𝑟 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ → ((𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ 𝑞 = 𝑟) ↔ (𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩)))
57	56	ralbidv 3197	. . . . . . 7 ⊢ (𝑟 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ → (∀𝑞 ∈ ◡ 𝐴(𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ 𝑞 = 𝑟) ↔ ∀𝑞 ∈ ◡ 𝐴(𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩)))
58	57	rspcev 3622	. . . . . 6 ⊢ ((⟨(2nd ‘𝑝), (1st ‘𝑝)⟩ ∈ ◡𝐴 ∧ ∀𝑞 ∈ ◡ 𝐴(𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ 𝑞 = ⟨(2nd ‘𝑝), (1st ‘𝑝)⟩)) → ∃𝑟 ∈ ◡ 𝐴∀𝑞 ∈ ◡ 𝐴(𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ 𝑞 = 𝑟))
59	32, 54, 58	syl2anc 586	. . . . 5 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) → ∃𝑟 ∈ ◡ 𝐴∀𝑞 ∈ ◡ 𝐴(𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ 𝑞 = 𝑟))
60		reu6 3716	. . . . 5 ⊢ (∃!𝑞 ∈ ◡ 𝐴𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ ∃𝑟 ∈ ◡ 𝐴∀𝑞 ∈ ◡ 𝐴(𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ ↔ 𝑞 = 𝑟))
61	59, 60	sylibr 236	. . . 4 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 ∈ 𝐴) → ∃!𝑞 ∈ ◡ 𝐴𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩)
62		fvex 6677	. . . . . . 7 ⊢ (2nd ‘𝑞) ∈ V
63		fvex 6677	. . . . . . 7 ⊢ (1st ‘𝑞) ∈ V
64	62, 63	op2ndd 7694	. . . . . 6 ⊢ (𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ → (2nd ‘𝑝) = (1st ‘𝑞))
65	64	eqeq2d 2832	. . . . 5 ⊢ (𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩ → (𝑌 = (2nd ‘𝑝) ↔ 𝑌 = (1st ‘𝑞)))
66	65	adantl 484	. . . 4 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑝 = ⟨(2nd ‘𝑞), (1st ‘𝑞)⟩) → (𝑌 = (2nd ‘𝑝) ↔ 𝑌 = (1st ‘𝑞)))
67	21, 61, 66	reuxfr1d 3740	. . 3 ⊢ ((Rel 𝐴 ∧ Fun ◡𝐴) → (∃!𝑝 ∈ 𝐴 𝑌 = (2nd ‘𝑝) ↔ ∃!𝑞 ∈ ◡ 𝐴𝑌 = (1st ‘𝑞)))
68	67	adantr 483	. 2 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑌 ∈ ran 𝐴) → (∃!𝑝 ∈ 𝐴 𝑌 = (2nd ‘𝑝) ↔ ∃!𝑞 ∈ ◡ 𝐴𝑌 = (1st ‘𝑞)))
69	5, 68	mpbird 259	1 ⊢ (((Rel 𝐴 ∧ Fun ◡𝐴) ∧ 𝑌 ∈ ran 𝐴) → ∃!𝑝 ∈ 𝐴 𝑌 = (2nd ‘𝑝))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1533   ∈ wcel 2110  ∀wral 3138  ∃wrex 3139  ∃!wreu 3140   ⊆ wss 3935  {csn 4560  ⟨cop 4566  ∪ cuni 4831   × cxp 5547  ^◡ccnv 5548  dom cdm 5549  ran crn 5550  Rel wrel 5554  Fun wfun 6343  ‘cfv 6349  1^st c1st 7681  2^nd c2nd 7682

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 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  ax-un 7455

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3772  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-nul 4291  df-if 4467  df-sn 4561  df-pr 4563  df-op 4567  df-uni 4832  df-br 5059  df-opab 5121  df-mpt 5139  df-id 5454  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-iota 6308  df-fun 6351  df-fn 6352  df-fv 6357  df-1st 7683  df-2nd 7684

This theorem is referenced by:  gsummpt2co  30681