mpolynomials 0.1.0.1 → 0.1.1.0

raw patch · 3 files changed

+6/−2 lines, 3 files

Files

CHANGELOG.md +4/−0
mpolynomials.cabal +1/−1
src/Math/Algebra/MultiPol.hs +1/−1

CHANGELOG.md view

@@ -1,3 +1,7 @@+0.1.1.0+-------+* `poly ^**^ 0` did not work+ 0.1.0.1 ------- * removed the upper bounds of the dependencies

mpolynomials.cabal view

@@ -1,6 +1,6 @@ cabal-version:      >=1.10 name:               mpolynomials-version:            0.1.0.1+version:            0.1.1.0 license:            GPL-3 license-file:       LICENSE copyright:          2022 Stéphane Laurent

src/Math/Algebra/MultiPol.hs view

@@ -92,7 +92,7 @@  -- | Power of a polynomial (^**^) :: (AlgRing.C a, Eq a) => Polynomial a -> Int -> Polynomial a-(^**^) p n = foldl1 (^*^) (replicate n p) +(^**^) p n = AlgRing.product (replicate n p)   scalePol :: (AlgRing.C a, Eq a) => a -> Polynomial a -> Polynomial a scalePol lambda pol = if lambda == AlgAdd.zero