wpinv {jacobi}

Inverse of Weierstrass elliptic function

Description

Evaluation of the inverse of the Weierstrass elliptic function.

Usage

wpinv(w, g = NULL, omega = NULL, tau = NULL)

Arguments

w

complex number

g

the elliptic invariants, a vector of two complex numbers; only one of g, omega and tau must be given

omega

the half-periods, a vector of two complex numbers; only one of g, omega and tau must be given

tau

the half-periods ratio; supplying tau is equivalent to supply omega = c(1/2, tau/2)

Value

A complex number.

Examples

library(jacobi)
omega <- c(1.4 - 1i, 1.6 + 0.5i)
w <- 1 + 1i
z <- wpinv(w, omega = omega)
wp(z, omega = omega) # should be w