Theorem fgreu 32732

Description: Exactly one point of a function's graph has a given first element. (Contributed by Thierry Arnoux, 1-Apr-2018.)

Assertion

Ref	Expression
fgreu	⊢ ((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) → ∃!𝑝 ∈ 𝐹 𝑋 = (1st ‘𝑝))

Distinct variable groups:   𝐹,𝑝   𝑋,𝑝

Proof of Theorem fgreu

Dummy variable 𝑞 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		funfvop 6991	. . 3 ⊢ ((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) → ⟨𝑋, (𝐹‘𝑋)⟩ ∈ 𝐹)
2		simplll 775	. . . . . . . 8 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → Fun 𝐹)
3		funrel 6504	. . . . . . . 8 ⊢ (Fun 𝐹 → Rel 𝐹)
4	2, 3	syl 17	. . . . . . 7 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → Rel 𝐹)
5		simplr 769	. . . . . . 7 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → 𝑝 ∈ 𝐹)
6		1st2nd 7981	. . . . . . 7 ⊢ ((Rel 𝐹 ∧ 𝑝 ∈ 𝐹) → 𝑝 = ⟨(1st ‘𝑝), (2nd ‘𝑝)⟩)
7	4, 5, 6	syl2anc 585	. . . . . 6 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → 𝑝 = ⟨(1st ‘𝑝), (2nd ‘𝑝)⟩)
8		simpr 484	. . . . . . 7 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → 𝑋 = (1st ‘𝑝))
9		simpllr 776	. . . . . . . 8 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → 𝑋 ∈ dom 𝐹)
10	8	opeq1d 4812	. . . . . . . . . 10 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → ⟨𝑋, (2nd ‘𝑝)⟩ = ⟨(1st ‘𝑝), (2nd ‘𝑝)⟩)
11	7, 10	eqtr4d 2773	. . . . . . . . 9 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → 𝑝 = ⟨𝑋, (2nd ‘𝑝)⟩)
12	11, 5	eqeltrrd 2836	. . . . . . . 8 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → ⟨𝑋, (2nd ‘𝑝)⟩ ∈ 𝐹)
13		funopfvb 6883	. . . . . . . . 9 ⊢ ((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) → ((𝐹‘𝑋) = (2nd ‘𝑝) ↔ ⟨𝑋, (2nd ‘𝑝)⟩ ∈ 𝐹))
14	13	biimpar 477	. . . . . . . 8 ⊢ (((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ ⟨𝑋, (2nd ‘𝑝)⟩ ∈ 𝐹) → (𝐹‘𝑋) = (2nd ‘𝑝))
15	2, 9, 12, 14	syl21anc 838	. . . . . . 7 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → (𝐹‘𝑋) = (2nd ‘𝑝))
16	8, 15	opeq12d 4814	. . . . . 6 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → ⟨𝑋, (𝐹‘𝑋)⟩ = ⟨(1st ‘𝑝), (2nd ‘𝑝)⟩)
17	7, 16	eqtr4d 2773	. . . . 5 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑋 = (1st ‘𝑝)) → 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩)
18		simpr 484	. . . . . . 7 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩) → 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩)
19	18	fveq2d 6833	. . . . . 6 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩) → (1st ‘𝑝) = (1st ‘⟨𝑋, (𝐹‘𝑋)⟩))
20		fvex 6842	. . . . . . . 8 ⊢ (𝐹‘𝑋) ∈ V
21		op1stg 7943	. . . . . . . 8 ⊢ ((𝑋 ∈ dom 𝐹 ∧ (𝐹‘𝑋) ∈ V) → (1st ‘⟨𝑋, (𝐹‘𝑋)⟩) = 𝑋)
22	20, 21	mpan2 692	. . . . . . 7 ⊢ (𝑋 ∈ dom 𝐹 → (1st ‘⟨𝑋, (𝐹‘𝑋)⟩) = 𝑋)
23	22	ad3antlr 732	. . . . . 6 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩) → (1st ‘⟨𝑋, (𝐹‘𝑋)⟩) = 𝑋)
24	19, 23	eqtr2d 2771	. . . . 5 ⊢ ((((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) ∧ 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩) → 𝑋 = (1st ‘𝑝))
25	17, 24	impbida 801	. . . 4 ⊢ (((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) ∧ 𝑝 ∈ 𝐹) → (𝑋 = (1st ‘𝑝) ↔ 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩))
26	25	ralrimiva 3127	. . 3 ⊢ ((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) → ∀𝑝 ∈ 𝐹 (𝑋 = (1st ‘𝑝) ↔ 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩))
27		eqeq2 2747	. . . . . 6 ⊢ (𝑞 = ⟨𝑋, (𝐹‘𝑋)⟩ → (𝑝 = 𝑞 ↔ 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩))
28	27	bibi2d 342	. . . . 5 ⊢ (𝑞 = ⟨𝑋, (𝐹‘𝑋)⟩ → ((𝑋 = (1st ‘𝑝) ↔ 𝑝 = 𝑞) ↔ (𝑋 = (1st ‘𝑝) ↔ 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩)))
29	28	ralbidv 3158	. . . 4 ⊢ (𝑞 = ⟨𝑋, (𝐹‘𝑋)⟩ → (∀𝑝 ∈ 𝐹 (𝑋 = (1st ‘𝑝) ↔ 𝑝 = 𝑞) ↔ ∀𝑝 ∈ 𝐹 (𝑋 = (1st ‘𝑝) ↔ 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩)))
30	29	rspcev 3562	. . 3 ⊢ ((⟨𝑋, (𝐹‘𝑋)⟩ ∈ 𝐹 ∧ ∀𝑝 ∈ 𝐹 (𝑋 = (1st ‘𝑝) ↔ 𝑝 = ⟨𝑋, (𝐹‘𝑋)⟩)) → ∃𝑞 ∈ 𝐹 ∀𝑝 ∈ 𝐹 (𝑋 = (1st ‘𝑝) ↔ 𝑝 = 𝑞))
31	1, 26, 30	syl2anc 585	. 2 ⊢ ((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) → ∃𝑞 ∈ 𝐹 ∀𝑝 ∈ 𝐹 (𝑋 = (1st ‘𝑝) ↔ 𝑝 = 𝑞))
32		reu6 3669	. 2 ⊢ (∃!𝑝 ∈ 𝐹 𝑋 = (1st ‘𝑝) ↔ ∃𝑞 ∈ 𝐹 ∀𝑝 ∈ 𝐹 (𝑋 = (1st ‘𝑝) ↔ 𝑝 = 𝑞))
33	31, 32	sylibr 234	1 ⊢ ((Fun 𝐹 ∧ 𝑋 ∈ dom 𝐹) → ∃!𝑝 ∈ 𝐹 𝑋 = (1st ‘𝑝))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1542   ∈ wcel 2114  ∀wral 3049  ∃wrex 3059  ∃!wreu 3338  Vcvv 3427  ⟨cop 4563  dom cdm 5620  Rel wrel 5625  Fun wfun 6481  ‘cfv 6487  1^st c1st 7929  2^nd c2nd 7930

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2184  ax-ext 2707  ax-sep 5220  ax-nul 5230  ax-pr 5364  ax-un 7678

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2931  df-ral 3050  df-rex 3060  df-reu 3341  df-rab 3388  df-v 3429  df-dif 3888  df-un 3890  df-in 3892  df-ss 3902  df-nul 4264  df-if 4457  df-sn 4558  df-pr 4560  df-op 4564  df-uni 4841  df-br 5075  df-opab 5137  df-mpt 5156  df-id 5515  df-xp 5626  df-rel 5627  df-cnv 5628  df-co 5629  df-dm 5630  df-rn 5631  df-iota 6443  df-fun 6489  df-fn 6490  df-fv 6495  df-1st 7931  df-2nd 7932

This theorem is referenced by:  fcnvgreu  32733