For the curve has no orientation-reversing Euclidean symmetry
ProvedCurveSymmetry.family_no_oppositecurve-symmetry-leanpolynomialsreal-algebraic-geometry
Identify the Euclidean plane with and use the complex coordinates , . Let be an integer and let be nonreal, ; the condition of the note is not required. Let be the real locus of , that is, the curve . Then has no orientation-reversing Euclidean symmetry: there are no with such that
For , that is in degree , this gives the Euclidean clause of Theorem 2: together with the count of orientation-preserving symmetries, consists exactly of the rotations with .
Preamble
import Definitions.Def_CurveSymmetry_01_RealLoci import Definitions.Def_CurveSymmetry_02_FamilyBasics import Mathlib.Algebra.MvPolynomial.Nilpotent import Mathlib.Algebra.MvPolynomial.NoZeroDivisors import Mathlib.Algebra.Polynomial.FieldDivision import Mathlib.Algebra.Polynomial.Reverse import Mathlib.Analysis.Complex.Polynomial.Basic import Mathlib.Data.Complex.Basic import Mathlib.RingTheory.MvPolynomial.Homogeneous import Mathlib.RingTheory.MvPolynomial.IrreducibleQuadratic import Mathlib.RingTheory.Polynomial.Eisenstein.Criterion import Mathlib.RingTheory.Polynomial.GaussLemma import Mathlib.RingTheory.RootsOfUnity.Complex import Mathlib.RingTheory.RootsOfUnity.PrimitiveRoots import Mathlib.Tactic open CurveSymmetry set_option autoImplicit false open MvPolynomial
Formal statement
theorem CurveSymmetry.family_no_opposite {m : ℕ} (hm : 3 ≤ m) {α : ℂ} (ha : α ≠ star α) :
IsEmpty (OppositeSymmetries (familyPolynomial m α)) := by sorrySource
C. Perassi, Sharp symmetry bounds for real algebraic curves (note): lemma of the formalization, for Theorem 2, p. 2, https://github.com/carlok/curve-symmetry-lean/blob/d99bc17a1c397956c05d7417de50f9beed56580f/sharp_symmetry_bounds.pdf. Lean: https://github.com/carlok/curve-symmetry-lean/blob/d99bc17a1c397956c05d7417de50f9beed56580f/lean/FamilyRotations.lean (C. Perassi)