Theorem fsuppcor 9374

Description: The composition of a function which maps the zero of the range of a finitely supported function to the zero of its range with this finitely supported function is finitely supported. (Contributed by AV, 6-Jun-2019.)

Hypotheses

Ref	Expression
fsuppcor.0	⊢ (𝜑 → 0 ∈ 𝑊)
fsuppcor.z	⊢ (𝜑 → 𝑍 ∈ 𝐵)
fsuppcor.f	⊢ (𝜑 → 𝐹:𝐴⟶𝐶)
fsuppcor.g	⊢ (𝜑 → 𝐺:𝐵⟶𝐷)
fsuppcor.s	⊢ (𝜑 → 𝐶 ⊆ 𝐵)
fsuppcor.a	⊢ (𝜑 → 𝐴 ∈ 𝑈)
fsuppcor.b	⊢ (𝜑 → 𝐵 ∈ 𝑉)
fsuppcor.n	⊢ (𝜑 → 𝐹 finSupp 𝑍)
fsuppcor.i	⊢ (𝜑 → (𝐺‘𝑍) = 0 )

Assertion

Ref	Expression
fsuppcor	⊢ (𝜑 → (𝐺 ∘ 𝐹) finSupp 0 )

Proof of Theorem fsuppcor

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		fsuppcor.g	. . . 4 ⊢ (𝜑 → 𝐺:𝐵⟶𝐷)
2	1	ffund 6702	. . 3 ⊢ (𝜑 → Fun 𝐺)
3		fsuppcor.f	. . . 4 ⊢ (𝜑 → 𝐹:𝐴⟶𝐶)
4	3	ffund 6702	. . 3 ⊢ (𝜑 → Fun 𝐹)
5		funco 6568	. . 3 ⊢ ((Fun 𝐺 ∧ Fun 𝐹) → Fun (𝐺 ∘ 𝐹))
6	2, 4, 5	syl2anc 596	. 2 ⊢ (𝜑 → Fun (𝐺 ∘ 𝐹))
7		fsuppcor.n	. . . 4 ⊢ (𝜑 → 𝐹 finSupp 𝑍)
8	7	fsuppimpd 9339	. . 3 ⊢ (𝜑 → (𝐹 supp 𝑍) ∈ Fin)
9		fsuppcor.s	. . . . . 6 ⊢ (𝜑 → 𝐶 ⊆ 𝐵)
10	1, 9	fssresd 6737	. . . . 5 ⊢ (𝜑 → (𝐺 ↾ 𝐶):𝐶⟶𝐷)
11		fco2 6724	. . . . 5 ⊢ (((𝐺 ↾ 𝐶):𝐶⟶𝐷 ∧ 𝐹:𝐴⟶𝐶) → (𝐺 ∘ 𝐹):𝐴⟶𝐷)
12	10, 3, 11	syl2anc 596	. . . 4 ⊢ (𝜑 → (𝐺 ∘ 𝐹):𝐴⟶𝐷)
13		eldifi 4077	. . . . . 6 ⊢ (𝑥 ∈ (𝐴 ∖ (𝐹 supp 𝑍)) → 𝑥 ∈ 𝐴)
14		fvco3 6973	. . . . . 6 ⊢ ((𝐹:𝐴⟶𝐶 ∧ 𝑥 ∈ 𝐴) → ((𝐺 ∘ 𝐹)‘𝑥) = (𝐺‘(𝐹‘𝑥)))
15	3, 13, 14	syl2an 608	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐹 supp 𝑍))) → ((𝐺 ∘ 𝐹)‘𝑥) = (𝐺‘(𝐹‘𝑥)))
16		ssidd 3953	. . . . . . 7 ⊢ (𝜑 → (𝐹 supp 𝑍) ⊆ (𝐹 supp 𝑍))
17		fsuppcor.a	. . . . . . 7 ⊢ (𝜑 → 𝐴 ∈ 𝑈)
18		fsuppcor.z	. . . . . . 7 ⊢ (𝜑 → 𝑍 ∈ 𝐵)
19	3, 16, 17, 18	suppssr 8190	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐹 supp 𝑍))) → (𝐹‘𝑥) = 𝑍)
20	19	fveq2d 6877	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐹 supp 𝑍))) → (𝐺‘(𝐹‘𝑥)) = (𝐺‘𝑍))
21		fsuppcor.i	. . . . . 6 ⊢ (𝜑 → (𝐺‘𝑍) = 0 )
22	21	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐹 supp 𝑍))) → (𝐺‘𝑍) = 0 )
23	15, 20, 22	3eqtrd 2799	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐹 supp 𝑍))) → ((𝐺 ∘ 𝐹)‘𝑥) = 0 )
24	12, 23	suppss 8189	. . 3 ⊢ (𝜑 → ((𝐺 ∘ 𝐹) supp 0 ) ⊆ (𝐹 supp 𝑍))
25	8, 24	ssfid 9238	. 2 ⊢ (𝜑 → ((𝐺 ∘ 𝐹) supp 0 ) ∈ Fin)
26		fsuppcor.b	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ 𝑉)
27	1, 26	fexd 7221	. . . 4 ⊢ (𝜑 → 𝐺 ∈ V)
28	3, 17	fexd 7221	. . . 4 ⊢ (𝜑 → 𝐹 ∈ V)
29		coexg 7924	. . . 4 ⊢ ((𝐺 ∈ V ∧ 𝐹 ∈ V) → (𝐺 ∘ 𝐹) ∈ V)
30	27, 28, 29	syl2anc 596	. . 3 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ∈ V)
31		fsuppcor.0	. . 3 ⊢ (𝜑 → 0 ∈ 𝑊)
32		isfsupp 9335	. . 3 ⊢ (((𝐺 ∘ 𝐹) ∈ V ∧ 0 ∈ 𝑊) → ((𝐺 ∘ 𝐹) finSupp 0 ↔ (Fun (𝐺 ∘ 𝐹) ∧ ((𝐺 ∘ 𝐹) supp 0 ) ∈ Fin)))
33	30, 31, 32	syl2anc 596	. 2 ⊢ (𝜑 → ((𝐺 ∘ 𝐹) finSupp 0 ↔ (Fun (𝐺 ∘ 𝐹) ∧ ((𝐺 ∘ 𝐹) supp 0 ) ∈ Fin)))
34	6, 25, 33	mpbir2and 726	1 ⊢ (𝜑 → (𝐺 ∘ 𝐹) finSupp 0 )

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570   ∈ wcel 2145  Vcvv 3450   ∖ cdif 3895   ⊆ wss 3898   class class class wbr 5102   ↾ cres 5649   ∘ ccom 5651  Fun wfun 6521  ⟶wf 6523  ‘cfv 6527  (class class class)co 7408   supp csupp 8155  Fincfn 8951   finSupp cfsupp 9331

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7734

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3918  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-ord 6354  df-on 6355  df-lim 6356  df-suc 6357  df-iota 6483  df-fun 6529  df-fn 6530  df-f 6531  df-f1 6532  df-fo 6533  df-f1o 6534  df-fv 6535  df-ov 7411  df-oprab 7412  df-mpo 7413  df-om 7861  df-supp 8156  df-1o 8454  df-en 8952  df-fin 8955  df-fsupp 9332

This theorem is used by:  mapfienlem1  9375  mapfienlem2  9376  mhmcompl  22392  selvvvval  22413  cpmadumatpolylem2  23162  esplympl  34133