Theorem mhpmpl

Description: A homogeneous polynomial is a polynomial. (Contributed by Steven Nguyen, 25-Aug-2023)

	Ref	Expression
Hypotheses	mhpmpl.h	$$⊢H=I\mathrm{mHomP}R$$
	mhpmpl.p	$$⊢P=I\mathrm{mPoly}R$$
	mhpmpl.b	$$⊢B={\mathrm{Base}}_P$$
	mhpmpl.x	$$⊢\phi \to X\in H\left(N\right)$$
Assertion	mhpmpl	$$⊢\phi \to X\in B$$

Proof

Step	Hyp	Ref	Expression
1		mhpmpl.h	$$⊢H=I\mathrm{mHomP}R$$
2		mhpmpl.p	$$⊢P=I\mathrm{mPoly}R$$
3		mhpmpl.b	$$⊢B={\mathrm{Base}}_P$$
4		mhpmpl.x	$$⊢\phi \to X\in H\left(N\right)$$
5		eqid	$$⊢0_R=0_R$$
6		eqid	$$⊢\left\{h\in \left({{\mathbb{N}}_0}^I\right)|h^{-1}\left[\mathbb{N}\right]\in \mathrm{Fin}\right\}=\left\{h\in \left({{\mathbb{N}}_0}^I\right)|h^{-1}\left[\mathbb{N}\right]\in \mathrm{Fin}\right\}$$
7	1 4	mhprcl	$$⊢\phi \to N\in {\mathbb{N}}_0$$
8	1 2 3 5 6 7	ismhp	$$⊢\phi \to \left(X\in H\left(N\right)\leftrightarrow \left(X\in B\wedge X\mathrm{supp}{0}_R\subseteq \left\{g\in \left\{h\in \left({{\mathbb{N}}_0}^I\right)|h^{-1}\left[\mathbb{N}\right]\in \mathrm{Fin}\right\}|{\sum }_{{ℂ}_{\mathrm{fld}}{\upharpoonright }_{𝑠}{\mathbb{N}}_0}g=N\right\}\right)\right)$$
9	8	simprbda	$$⊢\left(\phi \wedge X\in H\left(N\right)\right)\to X\in B$$
10	4 9	mpdan	$$⊢\phi \to X\in B$$