The leading homogeneous part along a shear direction
DefinitionLeanFormalizations_PachDeZeeuw_CrossingLemma_ShearPartialYalgebraic-geometrygeometry
This defines the univariate polynomial obtained from the top-degree homogeneous part of a plane polynomial by substituting .
Definition code
-- Extracted dependency interfaces and their necessary proofs.
import Definitions.Def_LeanFormalizations_PachDeZeeuw_AlgebraicPrelim
import Definitions.Def_LeanFormalizations_PachDeZeeuw_CrossingLemma_Shear
import Mathlib
set_option autoImplicit true
/-
Copyright (c) 2026 Adam McKenna. All rights reserved.
Released under Apache 2.0 license as described in the file LICENSE.
Authors: Adam McKenna
-/
namespace PachDeZeeuw.Algebraic
open MvPolynomial
noncomputable def shearTopPoly (h : PlanePoly) : Polynomial ℝ :=
∑ m ∈ h.support, (if m 0 + m 1 = h.totalDegree then
Polynomial.C (coeff m h) * Polynomial.X ^ (m 0) else 0)
end PachDeZeeuw.Algebraic