Theorem tgjustf 26259

Description: Given any function 𝐹, equality of the image by 𝐹 is an equivalence relation. (Contributed by Thierry Arnoux, 25-Jan-2023.)

Assertion

Ref	Expression
tgjustf	⊢ (𝐴 ∈ 𝑉 → ∃𝑟(𝑟 Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))))

Distinct variable groups:   𝐴,𝑟,𝑥,𝑦   𝐹,𝑟,𝑥,𝑦

Allowed substitution hints:   𝑉(𝑥,𝑦,𝑟)

Proof of Theorem tgjustf

Dummy variables 𝑢 𝑣 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		relopab 5696	. . 3 ⊢ Rel {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}
2		ancom 463	. . . . . 6 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ↔ (𝑦 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴))
3		eqcom 2828	. . . . . 6 ⊢ ((𝐹‘𝑥) = (𝐹‘𝑦) ↔ (𝐹‘𝑦) = (𝐹‘𝑥))
4	2, 3	anbi12i 628	. . . . 5 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ↔ ((𝑦 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑥)))
5		simpl 485	. . . . . . . 8 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑦) → 𝑢 = 𝑥)
6	5	fveq2d 6674	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑦) → (𝐹‘𝑢) = (𝐹‘𝑥))
7		simpr 487	. . . . . . . 8 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑦) → 𝑣 = 𝑦)
8	7	fveq2d 6674	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑦) → (𝐹‘𝑣) = (𝐹‘𝑦))
9	6, 8	eqeq12d 2837	. . . . . 6 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑦) → ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑥) = (𝐹‘𝑦)))
10		eqid 2821	. . . . . 6 ⊢ {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}
11	9, 10	brab2a 5644	. . . . 5 ⊢ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)))
12		simpl 485	. . . . . . . 8 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑥) → 𝑢 = 𝑦)
13	12	fveq2d 6674	. . . . . . 7 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑥) → (𝐹‘𝑢) = (𝐹‘𝑦))
14		simpr 487	. . . . . . . 8 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑥) → 𝑣 = 𝑥)
15	14	fveq2d 6674	. . . . . . 7 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑥) → (𝐹‘𝑣) = (𝐹‘𝑥))
16	13, 15	eqeq12d 2837	. . . . . 6 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑥) → ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑦) = (𝐹‘𝑥)))
17	16, 10	brab2a 5644	. . . . 5 ⊢ (𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑥 ↔ ((𝑦 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑥)))
18	4, 11, 17	3bitr4i 305	. . . 4 ⊢ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ 𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑥)
19	18	biimpi 218	. . 3 ⊢ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 → 𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑥)
20		simplll 773	. . . . 5 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → 𝑥 ∈ 𝐴)
21		simprlr 778	. . . . 5 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → 𝑧 ∈ 𝐴)
22		simplr 767	. . . . . 6 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → (𝐹‘𝑥) = (𝐹‘𝑦))
23		simprr 771	. . . . . 6 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → (𝐹‘𝑦) = (𝐹‘𝑧))
24	22, 23	eqtrd 2856	. . . . 5 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → (𝐹‘𝑥) = (𝐹‘𝑧))
25	20, 21, 24	jca31 517	. . . 4 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → ((𝑥 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑧)))
26		simpl 485	. . . . . . . 8 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → 𝑢 = 𝑦)
27	26	fveq2d 6674	. . . . . . 7 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → (𝐹‘𝑢) = (𝐹‘𝑦))
28		simpr 487	. . . . . . . 8 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → 𝑣 = 𝑧)
29	28	fveq2d 6674	. . . . . . 7 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → (𝐹‘𝑣) = (𝐹‘𝑧))
30	27, 29	eqeq12d 2837	. . . . . 6 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑦) = (𝐹‘𝑧)))
31	30, 10	brab2a 5644	. . . . 5 ⊢ (𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑧 ↔ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧)))
32	11, 31	anbi12i 628	. . . 4 ⊢ ((𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ∧ 𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑧) ↔ (((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))))
33		simpl 485	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑧) → 𝑢 = 𝑥)
34	33	fveq2d 6674	. . . . . 6 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑧) → (𝐹‘𝑢) = (𝐹‘𝑥))
35		simpr 487	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑧) → 𝑣 = 𝑧)
36	35	fveq2d 6674	. . . . . 6 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑧) → (𝐹‘𝑣) = (𝐹‘𝑧))
37	34, 36	eqeq12d 2837	. . . . 5 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑧) → ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑥) = (𝐹‘𝑧)))
38	37, 10	brab2a 5644	. . . 4 ⊢ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑧 ↔ ((𝑥 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑧)))
39	25, 32, 38	3imtr4i 294	. . 3 ⊢ ((𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ∧ 𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑧) → 𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑧)
40		eqid 2821	. . . . 5 ⊢ (𝐹‘𝑥) = (𝐹‘𝑥)
41	40	biantru 532	. . . 4 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ↔ ((𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑥)))
42		pm4.24 566	. . . 4 ⊢ (𝑥 ∈ 𝐴 ↔ (𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴))
43		simpl 485	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑥) → 𝑢 = 𝑥)
44	43	fveq2d 6674	. . . . . 6 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑥) → (𝐹‘𝑢) = (𝐹‘𝑥))
45		simpr 487	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑥) → 𝑣 = 𝑥)
46	45	fveq2d 6674	. . . . . 6 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑥) → (𝐹‘𝑣) = (𝐹‘𝑥))
47	44, 46	eqeq12d 2837	. . . . 5 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑥) → ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑥) = (𝐹‘𝑥)))
48	47, 10	brab2a 5644	. . . 4 ⊢ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑥 ↔ ((𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑥)))
49	41, 42, 48	3bitr4i 305	. . 3 ⊢ (𝑥 ∈ 𝐴 ↔ 𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑥)
50	1, 19, 39, 49	iseri 8316	. 2 ⊢ {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} Er 𝐴
51	11	baib 538	. . 3 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)))
52	51	rgen2 3203	. 2 ⊢ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))
53		id 22	. . . 4 ⊢ (𝐴 ∈ 𝑉 → 𝐴 ∈ 𝑉)
54		simprll 777	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))) → 𝑢 ∈ 𝐴)
55		simprlr 778	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))) → 𝑣 ∈ 𝐴)
56	53, 53, 54, 55	opabex2 7755	. . 3 ⊢ (𝐴 ∈ 𝑉 → {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} ∈ V)
57		ereq1 8296	. . . . 5 ⊢ (𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} → (𝑟 Er 𝐴 ↔ {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} Er 𝐴))
58		simpl 485	. . . . . . . 8 ⊢ ((𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴)) → 𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))})
59	58	breqd 5077	. . . . . . 7 ⊢ ((𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴)) → (𝑥𝑟𝑦 ↔ 𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦))
60	59	bibi1d 346	. . . . . 6 ⊢ ((𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴)) → ((𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)) ↔ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))))
61	60	2ralbidva 3198	. . . . 5 ⊢ (𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} → (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)) ↔ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))))
62	57, 61	anbi12d 632	. . . 4 ⊢ (𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} → ((𝑟 Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))) ↔ ({⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)))))
63	62	spcegv 3597	. . 3 ⊢ ({⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} ∈ V → (({⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))) → ∃𝑟(𝑟 Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)))))
64	56, 63	syl 17	. 2 ⊢ (𝐴 ∈ 𝑉 → (({⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))) → ∃𝑟(𝑟 Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)))))
65	50, 52, 64	mp2ani 696	1 ⊢ (𝐴 ∈ 𝑉 → ∃𝑟(𝑟 Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1537  ∃wex 1780   ∈ wcel 2114  ∀wral 3138  Vcvv 3494   class class class wbr 5066  {copab 5128  ‘cfv 6355   Er wer 8286

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ral 3143  df-rex 3144  df-rab 3147  df-v 3496  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4839  df-br 5067  df-opab 5129  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-iota 6314  df-fv 6363  df-er 8289

This theorem is referenced by:  tgjustc1  26261