nat1st2nd - Metamath Proof Explorer

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

Theorem nat1st2nd 17213

Description: Rewrite the natural transformation predicate with separated functor parts. (Contributed by Mario Carneiro, 6-Jan-2017.)

**Hypotheses**
Ref	Expression
natrcl.1	⊢ 𝑁 = (𝐶 Nat 𝐷)
nat1st2nd.2	⊢ (𝜑 → 𝐴 ∈ (𝐹𝑁𝐺))

**Assertion**
Ref	Expression
nat1st2nd	⊢ (𝜑 → 𝐴 ∈ (⟨(1^st ‘𝐹), (2^nd ‘𝐹)⟩𝑁⟨(1^st ‘𝐺), (2^nd ‘𝐺)⟩))

**Proof of Theorem nat1st2nd**
Step	Hyp	Ref	Expression
1		nat1st2nd.2	. 2 ⊢ (𝜑 → 𝐴 ∈ (𝐹𝑁𝐺))
2		relfunc 17124	. . . 4 ⊢ Rel (𝐶 Func 𝐷)
3		natrcl.1	. . . . . . 7 ⊢ 𝑁 = (𝐶 Nat 𝐷)
4	3	natrcl 17212	. . . . . 6 ⊢ (𝐴 ∈ (𝐹𝑁𝐺) → (𝐹 ∈ (𝐶 Func 𝐷) ∧ 𝐺 ∈ (𝐶 Func 𝐷)))
5	1, 4	syl 17	. . . . 5 ⊢ (𝜑 → (𝐹 ∈ (𝐶 Func 𝐷) ∧ 𝐺 ∈ (𝐶 Func 𝐷)))
6	5	simpld 497	. . . 4 ⊢ (𝜑 → 𝐹 ∈ (𝐶 Func 𝐷))
7		1st2nd 7730	. . . 4 ⊢ ((Rel (𝐶 Func 𝐷) ∧ 𝐹 ∈ (𝐶 Func 𝐷)) → 𝐹 = ⟨(1^st ‘𝐹), (2^nd ‘𝐹)⟩)
8	2, 6, 7	sylancr 589	. . 3 ⊢ (𝜑 → 𝐹 = ⟨(1^st ‘𝐹), (2^nd ‘𝐹)⟩)
9	5	simprd 498	. . . 4 ⊢ (𝜑 → 𝐺 ∈ (𝐶 Func 𝐷))
10		1st2nd 7730	. . . 4 ⊢ ((Rel (𝐶 Func 𝐷) ∧ 𝐺 ∈ (𝐶 Func 𝐷)) → 𝐺 = ⟨(1^st ‘𝐺), (2^nd ‘𝐺)⟩)
11	2, 9, 10	sylancr 589	. . 3 ⊢ (𝜑 → 𝐺 = ⟨(1^st ‘𝐺), (2^nd ‘𝐺)⟩)
12	8, 11	oveq12d 7166	. 2 ⊢ (𝜑 → (𝐹𝑁𝐺) = (⟨(1^st ‘𝐹), (2^nd ‘𝐹)⟩𝑁⟨(1^st ‘𝐺), (2^nd ‘𝐺)⟩))
13	1, 12	eleqtrd 2913	1 ⊢ (𝜑 → 𝐴 ∈ (⟨(1^st ‘𝐹), (2^nd ‘𝐹)⟩𝑁⟨(1^st ‘𝐺), (2^nd ‘𝐺)⟩))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 398 = wceq 1531 ∈ wcel 2108 ⟨cop 4565 Rel wrel 5553 ‘cfv 6348 (class class class)co 7148 1^st c1st 7679 2^nd c2nd 7680 Func cfunc 17116 Nat cnat 17203

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1790 ax-4 1804 ax-5 1905 ax-6 1964 ax-7 2009 ax-8 2110 ax-9 2118 ax-10 2139 ax-11 2154 ax-12 2170 ax-ext 2791 ax-rep 5181 ax-sep 5194 ax-nul 5201 ax-pow 5257 ax-pr 5320 ax-un 7453

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3an 1084 df-tru 1534 df-ex 1775 df-nf 1779 df-sb 2064 df-mo 2616 df-eu 2648 df-clab 2798 df-cleq 2812 df-clel 2891 df-nfc 2961 df-ne 3015 df-ral 3141 df-rex 3142 df-reu 3143 df-rab 3145 df-v 3495 df-sbc 3771 df-csb 3882 df-dif 3937 df-un 3939 df-in 3941 df-ss 3950 df-nul 4290 df-if 4466 df-pw 4539 df-sn 4560 df-pr 4562 df-op 4566 df-uni 4831 df-iun 4912 df-br 5058 df-opab 5120 df-mpt 5138 df-id 5453 df-xp 5554 df-rel 5555 df-cnv 5556 df-co 5557 df-dm 5558 df-rn 5559 df-res 5560 df-ima 5561 df-iota 6307 df-fun 6350 df-fn 6351 df-f 6352 df-f1 6353 df-fo 6354 df-f1o 6355 df-fv 6356 df-ov 7151 df-oprab 7152 df-mpo 7153 df-1st 7681 df-2nd 7682 df-ixp 8454 df-func 17120 df-nat 17205

This theorem is referenced by: fuccocl 17226 fuclid 17228 fucrid 17229 fucass 17230 fucsect 17234 invfuc 17236 fucpropd 17239 evlfcllem 17463 evlfcl 17464 curfuncf 17480 yonedalem3a 17516 yonedalem3b 17521 yonedainv 17523 yonffthlem 17524

W3C validator