homadm - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > homadm		Structured version Visualization version GIF version

Theorem homadm 18053

Description: The domain of an arrow with known domain and codomain. (Contributed by Mario Carneiro, 11-Jan-2017.)

**Hypothesis**
Ref	Expression
homahom.h	⊢ 𝐻 = (Hom_a‘𝐶)

**Assertion**
Ref	Expression
homadm	⊢ (𝐹 ∈ (𝑋𝐻𝑌) → (dom_a‘𝐹) = 𝑋)

**Proof of Theorem homadm**
Step	Hyp	Ref	Expression
1		df-doma 18037	. . . 4 ⊢ dom_a = (1^st ∘ 1^st )
2	1	fveq1i 6877	. . 3 ⊢ (dom_a‘𝐹) = ((1^st ∘ 1^st )‘𝐹)
3		fo1st 8008	. . . . 5 ⊢ 1^st :V–onto→V
4		fof 6790	. . . . 5 ⊢ (1^st :V–onto→V → 1^st :V⟶V)
5	3, 4	ax-mp 5	. . . 4 ⊢ 1^st :V⟶V
6		elex 3480	. . . 4 ⊢ (𝐹 ∈ (𝑋𝐻𝑌) → 𝐹 ∈ V)
7		fvco3 6978	. . . 4 ⊢ ((1^st :V⟶V ∧ 𝐹 ∈ V) → ((1^st ∘ 1^st )‘𝐹) = (1^st ‘(1^st ‘𝐹)))
8	5, 6, 7	sylancr 587	. . 3 ⊢ (𝐹 ∈ (𝑋𝐻𝑌) → ((1^st ∘ 1^st )‘𝐹) = (1^st ‘(1^st ‘𝐹)))
9	2, 8	eqtrid 2782	. 2 ⊢ (𝐹 ∈ (𝑋𝐻𝑌) → (dom_a‘𝐹) = (1^st ‘(1^st ‘𝐹)))
10		homahom.h	. . . . . 6 ⊢ 𝐻 = (Hom_a‘𝐶)
11	10	homarel 18049	. . . . 5 ⊢ Rel (𝑋𝐻𝑌)
12		1st2ndbr 8041	. . . . 5 ⊢ ((Rel (𝑋𝐻𝑌) ∧ 𝐹 ∈ (𝑋𝐻𝑌)) → (1^st ‘𝐹)(𝑋𝐻𝑌)(2^nd ‘𝐹))
13	11, 12	mpan 690	. . . 4 ⊢ (𝐹 ∈ (𝑋𝐻𝑌) → (1^st ‘𝐹)(𝑋𝐻𝑌)(2^nd ‘𝐹))
14	10	homa1 18050	. . . 4 ⊢ ((1^st ‘𝐹)(𝑋𝐻𝑌)(2^nd ‘𝐹) → (1^st ‘𝐹) = ⟨𝑋, 𝑌⟩)
15	13, 14	syl 17	. . 3 ⊢ (𝐹 ∈ (𝑋𝐻𝑌) → (1^st ‘𝐹) = ⟨𝑋, 𝑌⟩)
16	15	fveq2d 6880	. 2 ⊢ (𝐹 ∈ (𝑋𝐻𝑌) → (1^st ‘(1^st ‘𝐹)) = (1^st ‘⟨𝑋, 𝑌⟩))
17		eqid 2735	. . . 4 ⊢ (Base‘𝐶) = (Base‘𝐶)
18	10, 17	homarcl2 18048	. . 3 ⊢ (𝐹 ∈ (𝑋𝐻𝑌) → (𝑋 ∈ (Base‘𝐶) ∧ 𝑌 ∈ (Base‘𝐶)))
19		op1stg 8000	. . 3 ⊢ ((𝑋 ∈ (Base‘𝐶) ∧ 𝑌 ∈ (Base‘𝐶)) → (1^st ‘⟨𝑋, 𝑌⟩) = 𝑋)
20	18, 19	syl 17	. 2 ⊢ (𝐹 ∈ (𝑋𝐻𝑌) → (1^st ‘⟨𝑋, 𝑌⟩) = 𝑋)
21	9, 16, 20	3eqtrd 2774	1 ⊢ (𝐹 ∈ (𝑋𝐻𝑌) → (dom_a‘𝐹) = 𝑋)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1540 ∈ wcel 2108 Vcvv 3459 ⟨cop 4607 class class class wbr 5119 ∘ ccom 5658 Rel wrel 5659 ⟶wf 6527 –onto→wfo 6529 ‘cfv 6531 (class class class)co 7405 1^st c1st 7986 2^nd c2nd 7987 Basecbs 17228 dom_acdoma 18033 Hom_achoma 18036

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2157 ax-12 2177 ax-ext 2707 ax-rep 5249 ax-sep 5266 ax-nul 5276 ax-pow 5335 ax-pr 5402 ax-un 7729

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2065 df-mo 2539 df-eu 2568 df-clab 2714 df-cleq 2727 df-clel 2809 df-nfc 2885 df-ne 2933 df-ral 3052 df-rex 3061 df-reu 3360 df-rab 3416 df-v 3461 df-sbc 3766 df-csb 3875 df-dif 3929 df-un 3931 df-in 3933 df-ss 3943 df-nul 4309 df-if 4501 df-pw 4577 df-sn 4602 df-pr 4604 df-op 4608 df-uni 4884 df-iun 4969 df-br 5120 df-opab 5182 df-mpt 5202 df-id 5548 df-xp 5660 df-rel 5661 df-cnv 5662 df-co 5663 df-dm 5664 df-rn 5665 df-res 5666 df-ima 5667 df-iota 6484 df-fun 6533 df-fn 6534 df-f 6535 df-f1 6536 df-fo 6537 df-f1o 6538 df-fv 6539 df-ov 7408 df-1st 7988 df-2nd 7989 df-doma 18037 df-homa 18039

This theorem is referenced by: arwhoma 18058 idadm 18074 homdmcoa 18080 coaval 18081

W3C validator