Theorem ismhp2

Description: Deduce a homogeneous polynomial from its properties. (Contributed by SN, 25-May-2024)

	Ref	Expression
Hypotheses	mhpfval.h	|- H = ( I mHomP R )
	mhpfval.p	|- P = ( I mPoly R )
	mhpfval.b	|- B = ( Base ` P )
	mhpfval.0	|- .0. = ( 0g ` R )
	mhpfval.d	|- D = { h e. ( NN0 ^m I ) | ( `' h " NN ) e. Fin }
	mhpfval.i	|- ( ph -> I e. V )
	mhpfval.r	|- ( ph -> R e. W )
	mhpval.n	|- ( ph -> N e. NN0 )
	ismhp2.1	|- ( ph -> X e. B )
	ismhp2.2	|- ( ph -> ( X supp .0. ) C_ { g e. D | ( ( CCfld |`s NN0 ) gsum g ) = N } )
Assertion	ismhp2	|- ( ph -> X e. ( H ` N ) )

Proof

Step	Hyp	Ref	Expression
1		mhpfval.h	|- H = ( I mHomP R )
2		mhpfval.p	|- P = ( I mPoly R )
3		mhpfval.b	|- B = ( Base ` P )
4		mhpfval.0	|- .0. = ( 0g ` R )
5		mhpfval.d	|- D = { h e. ( NN0 ^m I ) | ( `' h " NN ) e. Fin }
6		mhpfval.i	|- ( ph -> I e. V )
7		mhpfval.r	|- ( ph -> R e. W )
8		mhpval.n	|- ( ph -> N e. NN0 )
9		ismhp2.1	|- ( ph -> X e. B )
10		ismhp2.2	|- ( ph -> ( X supp .0. ) C_ { g e. D | ( ( CCfld |`s NN0 ) gsum g ) = N } )
11	1 2 3 4 5 6 7 8	ismhp	|- ( ph -> ( X e. ( H ` N ) <-> ( X e. B /\ ( X supp .0. ) C_ { g e. D | ( ( CCfld |`s NN0 ) gsum g ) = N } ) ) )
12	9 10 11	mpbir2and	|- ( ph -> X e. ( H ` N ) )