From bffa2d34ba01e71ff5d1e004792abfaccba8de38 Mon Sep 17 00:00:00 2001
From: KlausC <klausC@users.noreply.github.com>
Date: Sat, 7 Oct 2023 21:51:18 +0200
Subject: [PATCH] fixed precisiosn  of subtraction

---
 src/powerseries.jl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/powerseries.jl b/src/powerseries.jl
index ff845c6..8741a91 100644
--- a/src/powerseries.jl
+++ b/src/powerseries.jl
@@ -102,7 +102,7 @@ function +(p::S, q::S) where {S<:PowerSeries}
 end
 function -(p::S, q::S) where {S<:PowerSeries}
     s = -(p.poly, q.poly)
-    rt = min(absprecision(p), absprecision(q)) - ord(s)
+    rt = pdiff(min(absprecision(p), absprecision(q)), ord(s))
     s, rt = ps_from_poly!(s, precision(S), rt)
     S(s, rt)
 end