Theorem funcres2 17912

Description: A functor into a restricted category is also a functor into the whole category. (Contributed by Mario Carneiro, 6-Jan-2017.)

Assertion

Ref	Expression
funcres2	⊢ (𝑅 ∈ (Subcat‘𝐷) → (𝐶 Func (𝐷 ↾cat 𝑅)) ⊆ (𝐶 Func 𝐷))

Proof of Theorem funcres2

Dummy variables 𝑓 𝑔 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		relfunc 17876	. . 3 ⊢ Rel (𝐶 Func (𝐷 ↾cat 𝑅))
2	1	a1i 11	. 2 ⊢ (𝑅 ∈ (Subcat‘𝐷) → Rel (𝐶 Func (𝐷 ↾cat 𝑅)))
3		simpr 483	. . . . 5 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔)
4		eqid 2725	. . . . . 6 ⊢ (Base‘𝐶) = (Base‘𝐶)
5		eqid 2725	. . . . . 6 ⊢ (Hom ‘𝐶) = (Hom ‘𝐶)
6		simpl 481	. . . . . 6 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → 𝑅 ∈ (Subcat‘𝐷))
7		eqidd 2726	. . . . . . 7 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → dom dom 𝑅 = dom dom 𝑅)
8	6, 7	subcfn 17855	. . . . . 6 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → 𝑅 Fn (dom dom 𝑅 × dom dom 𝑅))
9		eqid 2725	. . . . . . . 8 ⊢ (Base‘(𝐷 ↾cat 𝑅)) = (Base‘(𝐷 ↾cat 𝑅))
10	4, 9, 3	funcf1 17880	. . . . . . 7 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → 𝑓:(Base‘𝐶)⟶(Base‘(𝐷 ↾cat 𝑅)))
11		eqid 2725	. . . . . . . . 9 ⊢ (𝐷 ↾cat 𝑅) = (𝐷 ↾cat 𝑅)
12		eqid 2725	. . . . . . . . 9 ⊢ (Base‘𝐷) = (Base‘𝐷)
13		subcrcl 17827	. . . . . . . . . 10 ⊢ (𝑅 ∈ (Subcat‘𝐷) → 𝐷 ∈ Cat)
14	13	adantr 479	. . . . . . . . 9 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → 𝐷 ∈ Cat)
15	6, 8, 12	subcss1 17856	. . . . . . . . 9 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → dom dom 𝑅 ⊆ (Base‘𝐷))
16	11, 12, 14, 8, 15	rescbas 17840	. . . . . . . 8 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → dom dom 𝑅 = (Base‘(𝐷 ↾cat 𝑅)))
17	16	feq3d 6714	. . . . . . 7 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → (𝑓:(Base‘𝐶)⟶dom dom 𝑅 ↔ 𝑓:(Base‘𝐶)⟶(Base‘(𝐷 ↾cat 𝑅))))
18	10, 17	mpbird 256	. . . . . 6 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → 𝑓:(Base‘𝐶)⟶dom dom 𝑅)
19		eqid 2725	. . . . . . . 8 ⊢ (Hom ‘(𝐷 ↾cat 𝑅)) = (Hom ‘(𝐷 ↾cat 𝑅))
20		simplr 767	. . . . . . . 8 ⊢ (((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔)
21		simprl 769	. . . . . . . 8 ⊢ (((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → 𝑥 ∈ (Base‘𝐶))
22		simprr 771	. . . . . . . 8 ⊢ (((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → 𝑦 ∈ (Base‘𝐶))
23	4, 5, 19, 20, 21, 22	funcf2 17882	. . . . . . 7 ⊢ (((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝑥𝑔𝑦):(𝑥(Hom ‘𝐶)𝑦)⟶((𝑓‘𝑥)(Hom ‘(𝐷 ↾cat 𝑅))(𝑓‘𝑦)))
24	11, 12, 14, 8, 15	reschom 17842	. . . . . . . . . 10 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → 𝑅 = (Hom ‘(𝐷 ↾cat 𝑅)))
25	24	adantr 479	. . . . . . . . 9 ⊢ (((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → 𝑅 = (Hom ‘(𝐷 ↾cat 𝑅)))
26	25	oveqd 7440	. . . . . . . 8 ⊢ (((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → ((𝑓‘𝑥)𝑅(𝑓‘𝑦)) = ((𝑓‘𝑥)(Hom ‘(𝐷 ↾cat 𝑅))(𝑓‘𝑦)))
27	26	feq3d 6714	. . . . . . 7 ⊢ (((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → ((𝑥𝑔𝑦):(𝑥(Hom ‘𝐶)𝑦)⟶((𝑓‘𝑥)𝑅(𝑓‘𝑦)) ↔ (𝑥𝑔𝑦):(𝑥(Hom ‘𝐶)𝑦)⟶((𝑓‘𝑥)(Hom ‘(𝐷 ↾cat 𝑅))(𝑓‘𝑦))))
28	23, 27	mpbird 256	. . . . . 6 ⊢ (((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝑥𝑔𝑦):(𝑥(Hom ‘𝐶)𝑦)⟶((𝑓‘𝑥)𝑅(𝑓‘𝑦)))
29	4, 5, 6, 8, 18, 28	funcres2b 17911	. . . . 5 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → (𝑓(𝐶 Func 𝐷)𝑔 ↔ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔))
30	3, 29	mpbird 256	. . . 4 ⊢ ((𝑅 ∈ (Subcat‘𝐷) ∧ 𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔) → 𝑓(𝐶 Func 𝐷)𝑔)
31	30	ex 411	. . 3 ⊢ (𝑅 ∈ (Subcat‘𝐷) → (𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔 → 𝑓(𝐶 Func 𝐷)𝑔))
32		df-br 5153	. . 3 ⊢ (𝑓(𝐶 Func (𝐷 ↾cat 𝑅))𝑔 ↔ ⟨𝑓, 𝑔⟩ ∈ (𝐶 Func (𝐷 ↾cat 𝑅)))
33		df-br 5153	. . 3 ⊢ (𝑓(𝐶 Func 𝐷)𝑔 ↔ ⟨𝑓, 𝑔⟩ ∈ (𝐶 Func 𝐷))
34	31, 32, 33	3imtr3g 294	. 2 ⊢ (𝑅 ∈ (Subcat‘𝐷) → (⟨𝑓, 𝑔⟩ ∈ (𝐶 Func (𝐷 ↾cat 𝑅)) → ⟨𝑓, 𝑔⟩ ∈ (𝐶 Func 𝐷)))
35	2, 34	relssdv 5793	1 ⊢ (𝑅 ∈ (Subcat‘𝐷) → (𝐶 Func (𝐷 ↾cat 𝑅)) ⊆ (𝐶 Func 𝐷))

Syntax hints:   → wi 4   ∧ wa 394   = wceq 1533   ∈ wcel 2098   ⊆ wss 3946  ⟨cop 4638   class class class wbr 5152  dom cdm 5681  Rel wrel 5686  ⟶wf 6549  ‘cfv 6553  (class class class)co 7423  Basecbs 17208  Hom chom 17272  Catccat 17672   ↾_cat cresc 17819  Subcatcsubc 17820   Func cfunc 17868

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2696  ax-rep 5289  ax-sep 5303  ax-nul 5310  ax-pow 5368  ax-pr 5432  ax-un 7745  ax-cnex 11210  ax-resscn 11211  ax-1cn 11212  ax-icn 11213  ax-addcl 11214  ax-addrcl 11215  ax-mulcl 11216  ax-mulrcl 11217  ax-mulcom 11218  ax-addass 11219  ax-mulass 11220  ax-distr 11221  ax-i2m1 11222  ax-1ne0 11223  ax-1rid 11224  ax-rnegex 11225  ax-rrecex 11226  ax-cnre 11227  ax-pre-lttri 11228  ax-pre-lttrn 11229  ax-pre-ltadd 11230  ax-pre-mulgt0 11231

This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2930  df-nel 3036  df-ral 3051  df-rex 3060  df-rmo 3363  df-reu 3364  df-rab 3419  df-v 3463  df-sbc 3776  df-csb 3892  df-dif 3949  df-un 3951  df-in 3953  df-ss 3963  df-pss 3966  df-nul 4325  df-if 4533  df-pw 4608  df-sn 4633  df-pr 4635  df-op 4639  df-uni 4913  df-iun 5002  df-br 5153  df-opab 5215  df-mpt 5236  df-tr 5270  df-id 5579  df-eprel 5585  df-po 5593  df-so 5594  df-fr 5636  df-we 5638  df-xp 5687  df-rel 5688  df-cnv 5689  df-co 5690  df-dm 5691  df-rn 5692  df-res 5693  df-ima 5694  df-pred 6311  df-ord 6378  df-on 6379  df-lim 6380  df-suc 6381  df-iota 6505  df-fun 6555  df-fn 6556  df-f 6557  df-f1 6558  df-fo 6559  df-f1o 6560  df-fv 6561  df-riota 7379  df-ov 7426  df-oprab 7427  df-mpo 7428  df-om 7876  df-1st 8002  df-2nd 8003  df-frecs 8295  df-wrecs 8326  df-recs 8400  df-rdg 8439  df-er 8733  df-map 8856  df-pm 8857  df-ixp 8926  df-en 8974  df-dom 8975  df-sdom 8976  df-pnf 11296  df-mnf 11297  df-xr 11298  df-ltxr 11299  df-le 11300  df-sub 11492  df-neg 11493  df-nn 12260  df-2 12322  df-3 12323  df-4 12324  df-5 12325  df-6 12326  df-7 12327  df-8 12328  df-9 12329  df-n0 12520  df-z 12606  df-dec 12725  df-sets 17161  df-slot 17179  df-ndx 17191  df-base 17209  df-ress 17238  df-hom 17285  df-cco 17286  df-cat 17676  df-cid 17677  df-homf 17678  df-ssc 17821  df-resc 17822  df-subc 17823  df-func 17872

This theorem is referenced by:  fthres2  17949  ressffth  17955  funcsetcres2  18110