Update ComplexElliptic.jl

tinatorabi · Feb 22, 2024 · f821656 · f821656
1 parent fc185ab
commit f821656
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/ComplexElliptic.jl b/src/ComplexElliptic.jl
@@ -83,7 +83,7 @@ function ellipjc(u, L, flag=false)
     u = complex(u)
     if !flag
 	L_= exp(-2 * π * L)
-        K, Kp = ellipke(L_)[1], ellipke(1-L_)[1]
+        K, Kp = ellipkkp(L_)[1], ellipkkp(1-L_)[1]
         high = imag(u) > Kp / 2
         if high
             u = im * Kp - u