Theorem tgjustf 28451

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		relopabv 5760	. . 3 ⊢ Rel {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}
2		ancom 460	. . . . . 6 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ↔ (𝑦 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴))
3		eqcom 2738	. . . . . 6 ⊢ ((𝐹‘𝑥) = (𝐹‘𝑦) ↔ (𝐹‘𝑦) = (𝐹‘𝑥))
4	2, 3	anbi12i 628	. . . . 5 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ↔ ((𝑦 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑥)))
5		simpl 482	. . . . . . . 8 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑦) → 𝑢 = 𝑥)
6	5	fveq2d 6826	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑦) → (𝐹‘𝑢) = (𝐹‘𝑥))
7		simpr 484	. . . . . . . 8 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑦) → 𝑣 = 𝑦)
8	7	fveq2d 6826	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑦) → (𝐹‘𝑣) = (𝐹‘𝑦))
9	6, 8	eqeq12d 2747	. . . . . 6 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑦) → ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑥) = (𝐹‘𝑦)))
10		eqid 2731	. . . . . 6 ⊢ {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}
11	9, 10	brab2a 5707	. . . . 5 ⊢ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)))
12		simpl 482	. . . . . . . 8 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑥) → 𝑢 = 𝑦)
13	12	fveq2d 6826	. . . . . . 7 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑥) → (𝐹‘𝑢) = (𝐹‘𝑦))
14		simpr 484	. . . . . . . 8 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑥) → 𝑣 = 𝑥)
15	14	fveq2d 6826	. . . . . . 7 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑥) → (𝐹‘𝑣) = (𝐹‘𝑥))
16	13, 15	eqeq12d 2747	. . . . . 6 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑥) → ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑦) = (𝐹‘𝑥)))
17	16, 10	brab2a 5707	. . . . 5 ⊢ (𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑥 ↔ ((𝑦 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑥)))
18	4, 11, 17	3bitr4i 303	. . . 4 ⊢ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ 𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑥)
19	18	biimpi 216	. . 3 ⊢ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 → 𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑥)
20		simplll 774	. . . . 5 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → 𝑥 ∈ 𝐴)
21		simprlr 779	. . . . 5 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → 𝑧 ∈ 𝐴)
22		simplr 768	. . . . . 6 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → (𝐹‘𝑥) = (𝐹‘𝑦))
23		simprr 772	. . . . . 6 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → (𝐹‘𝑦) = (𝐹‘𝑧))
24	22, 23	eqtrd 2766	. . . . 5 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → (𝐹‘𝑥) = (𝐹‘𝑧))
25	20, 21, 24	jca31 514	. . . 4 ⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))) → ((𝑥 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑧)))
26		simpl 482	. . . . . . . 8 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → 𝑢 = 𝑦)
27	26	fveq2d 6826	. . . . . . 7 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → (𝐹‘𝑢) = (𝐹‘𝑦))
28		simpr 484	. . . . . . . 8 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → 𝑣 = 𝑧)
29	28	fveq2d 6826	. . . . . . 7 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → (𝐹‘𝑣) = (𝐹‘𝑧))
30	27, 29	eqeq12d 2747	. . . . . 6 ⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑦) = (𝐹‘𝑧)))
31	30, 10	brab2a 5707	. . . . 5 ⊢ (𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑧 ↔ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧)))
32	11, 31	anbi12i 628	. . . 4 ⊢ ((𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ∧ 𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑧) ↔ (((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑦)) ∧ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑦) = (𝐹‘𝑧))))
33		simpl 482	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑧) → 𝑢 = 𝑥)
34	33	fveq2d 6826	. . . . . 6 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑧) → (𝐹‘𝑢) = (𝐹‘𝑥))
35		simpr 484	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑧) → 𝑣 = 𝑧)
36	35	fveq2d 6826	. . . . . 6 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑧) → (𝐹‘𝑣) = (𝐹‘𝑧))
37	34, 36	eqeq12d 2747	. . . . 5 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑧) → ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑥) = (𝐹‘𝑧)))
38	37, 10	brab2a 5707	. . . 4 ⊢ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑧 ↔ ((𝑥 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑧)))
39	25, 32, 38	3imtr4i 292	. . 3 ⊢ ((𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ∧ 𝑦{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑧) → 𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑧)
40		eqid 2731	. . . . 5 ⊢ (𝐹‘𝑥) = (𝐹‘𝑥)
41	40	biantru 529	. . . 4 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ↔ ((𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑥)))
42		pm4.24 563	. . . 4 ⊢ (𝑥 ∈ 𝐴 ↔ (𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴))
43		simpl 482	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑥) → 𝑢 = 𝑥)
44	43	fveq2d 6826	. . . . . 6 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑥) → (𝐹‘𝑢) = (𝐹‘𝑥))
45		simpr 484	. . . . . . 7 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑥) → 𝑣 = 𝑥)
46	45	fveq2d 6826	. . . . . 6 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑥) → (𝐹‘𝑣) = (𝐹‘𝑥))
47	44, 46	eqeq12d 2747	. . . . 5 ⊢ ((𝑢 = 𝑥 ∧ 𝑣 = 𝑥) → ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑥) = (𝐹‘𝑥)))
48	47, 10	brab2a 5707	. . . 4 ⊢ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑥 ↔ ((𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) ∧ (𝐹‘𝑥) = (𝐹‘𝑥)))
49	41, 42, 48	3bitr4i 303	. . 3 ⊢ (𝑥 ∈ 𝐴 ↔ 𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑥)
50	1, 19, 39, 49	iseri 8649	. 2 ⊢ {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} Er 𝐴
51	11	baib 535	. . 3 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)))
52	51	rgen2 3172	. 2 ⊢ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))
53		id 22	. . . 4 ⊢ (𝐴 ∈ 𝑉 → 𝐴 ∈ 𝑉)
54		simprll 778	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))) → 𝑢 ∈ 𝐴)
55		simprlr 779	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))) → 𝑣 ∈ 𝐴)
56	53, 53, 54, 55	opabex2 7989	. . 3 ⊢ (𝐴 ∈ 𝑉 → {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} ∈ V)
57		ereq1 8629	. . . . 5 ⊢ (𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} → (𝑟 Er 𝐴 ↔ {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} Er 𝐴))
58		simpl 482	. . . . . . . 8 ⊢ ((𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴)) → 𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))})
59	58	breqd 5100	. . . . . . 7 ⊢ ((𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴)) → (𝑥𝑟𝑦 ↔ 𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦))
60	59	bibi1d 343	. . . . . 6 ⊢ ((𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴)) → ((𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)) ↔ (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))))
61	60	2ralbidva 3194	. . . . 5 ⊢ (𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} → (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)) ↔ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))))
62	57, 61	anbi12d 632	. . . 4 ⊢ (𝑟 = {⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} → ((𝑟 Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))) ↔ ({⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)))))
63	62	spcegv 3547	. . 3 ⊢ ({⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} ∈ V → (({⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))) → ∃𝑟(𝑟 Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)))))
64	56, 63	syl 17	. 2 ⊢ (𝐴 ∈ 𝑉 → (({⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))} Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥{⟨𝑢, 𝑣⟩ ∣ ((𝑢 ∈ 𝐴 ∧ 𝑣 ∈ 𝐴) ∧ (𝐹‘𝑢) = (𝐹‘𝑣))}𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))) → ∃𝑟(𝑟 Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦)))))
65	50, 52, 64	mp2ani 698	1 ⊢ (𝐴 ∈ 𝑉 → ∃𝑟(𝑟 Er 𝐴 ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥𝑟𝑦 ↔ (𝐹‘𝑥) = (𝐹‘𝑦))))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1541  ∃wex 1780   ∈ wcel 2111  ∀wral 3047  Vcvv 3436   class class class wbr 5089  {copab 5151  ‘cfv 6481   Er wer 8619

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 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-ext 2703  ax-sep 5232  ax-nul 5242  ax-pow 5301  ax-pr 5368  ax-un 7668

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-sb 2068  df-clab 2710  df-cleq 2723  df-clel 2806  df-ral 3048  df-rex 3057  df-rab 3396  df-v 3438  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-nul 4281  df-if 4473  df-pw 4549  df-sn 4574  df-pr 4576  df-op 4580  df-uni 4857  df-br 5090  df-opab 5152  df-xp 5620  df-rel 5621  df-cnv 5622  df-co 5623  df-dm 5624  df-iota 6437  df-fv 6489  df-er 8622

This theorem is referenced by:  tgjustc1  28453