From 4e7207e040b1c434915554ba17fc690ca709d98f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Lars=20G=C3=B6ttgens?= <lars.goettgens@rwth-aachen.de>
Date: Mon, 7 Oct 2024 18:01:46 +0200
Subject: [PATCH] Add `neg!`, `one!` for Poly

---
 src/generic/Poly.jl | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

diff --git a/src/generic/Poly.jl b/src/generic/Poly.jl
index af747c598..cb7538341 100644
--- a/src/generic/Poly.jl
+++ b/src/generic/Poly.jl
@@ -198,6 +198,29 @@ function zero!(c::Poly{T}) where T <: RingElement
    return c
 end
 
+function one!(c::Poly{T}) where T <: RingElement
+   fit!(c, 1)
+   c = set_length!(c, 1)
+   c.coeffs[1] = one(base_ring(c))
+   return c
+end
+
+function neg!(a::Poly{T}) where T <: RingElement
+   for i in 1:length(a)
+      a.coeffs[i] = neg!(a.coeffs[i])
+   end
+   return a
+end
+
+function neg!(z::Poly{T}, a::Poly{T}) where T <: RingElement
+   fit!(z, length(a))
+   z = set_length!(z, length(a))
+   for i in 1:length(a)
+      z.coeffs[i] = neg!(z.coeffs[i], a.coeffs[i])
+   end
+   return z
+end
+
 function mul!(c::Poly{T}, a::Poly{T}, b::Poly{T}) where T <: RingElement
    lena = length(a)
    lenb = length(b)