jacobi-theta 0.1.1.0 → 0.1.1.1

raw patch · 3 files changed

+21/−16 lines, 3 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Math.JacobiTheta: jtheta1 :: Cplx -> Cplx -> Cplx

+ Math.JacobiTheta: jtheta1 :: Complex Double -> Complex Double -> Complex Double

- Math.JacobiTheta: jtheta1Dash :: Cplx -> Cplx -> Cplx

+ Math.JacobiTheta: jtheta1Dash :: Complex Double -> Complex Double -> Complex Double

- Math.JacobiTheta: jtheta2 :: Cplx -> Cplx -> Cplx

+ Math.JacobiTheta: jtheta2 :: Complex Double -> Complex Double -> Complex Double

- Math.JacobiTheta: jtheta3 :: Cplx -> Cplx -> Cplx

+ Math.JacobiTheta: jtheta3 :: Complex Double -> Complex Double -> Complex Double

- Math.JacobiTheta: jtheta4 :: Cplx -> Cplx -> Cplx

+ Math.JacobiTheta: jtheta4 :: Complex Double -> Complex Double -> Complex Double

Files

CHANGELOG.md +5/−0
jacobi-theta.cabal +1/−1
src/Math/JacobiTheta.hs +15/−15

CHANGELOG.md view

@@ -1,3 +1,8 @@+## 0.1.1.1 - 2023-03-01++Removed a useless type alias.++ ## 0.1.1.0 - 2023-02-25  Some values of the Jacobi theta functions were wrong.

jacobi-theta.cabal view

@@ -1,5 +1,5 @@ name:                jacobi-theta-version:             0.1.1.0+version:             0.1.1.1 synopsis:            Jacobi Theta Functions description:         Evaluation of the Jacobi theta functions. homepage:            https://github.com/stla/jacobi-theta#readme

src/Math/JacobiTheta.hs view

@@ -96,39 +96,39 @@  -- | First Jacobi theta function jtheta1 :: -     Cplx -- ^ z-  -> Cplx -- ^ q, the nome-  -> Cplx+     Complex Double -- ^ z+  -> Complex Double -- ^ q, the nome+  -> Complex Double jtheta1 z q = jtheta1Alt z (getTauFromQ q)  -- | Second Jacobi theta function jtheta2 :: -     Cplx -- ^ z-  -> Cplx -- ^ q, the nome-  -> Cplx+     Complex Double -- ^ z+  -> Complex Double -- ^ q, the nome+  -> Complex Double jtheta2 z = jtheta1 (z + pi/2)  -- | Third Jacobi theta function jtheta3 :: -     Cplx -- ^ z-  -> Cplx -- ^ q, the nome-  -> Cplx+     Complex Double -- ^ z+  -> Complex Double -- ^ q, the nome+  -> Complex Double jtheta3 z q = jtheta2 (z - pi/2 * tau) q * expM (-z) tau   where     tau = tauFromQ q  -- | Fourth Jacobi theta function jtheta4 :: -     Cplx -- ^ z-  -> Cplx -- ^ q, the nome-  -> Cplx+     Complex Double -- ^ z+  -> Complex Double -- ^ q, the nome+  -> Complex Double jtheta4 z = jtheta3 (z + pi/2)  -- | Derivative of the first Jacobi theta function jtheta1Dash :: -     Cplx -- ^ z-  -> Cplx -- ^ q, the nome-  -> Cplx+     Complex Double -- ^ z+  -> Complex Double -- ^ q, the nome+  -> Complex Double jtheta1Dash z q =    go 0 (0.0 :+ 0.0) 1.0 (1.0 / qsq) 1.0   where