Celli1 Celli1_sub Celli2 Celli2_sub Celli3 Celli3_sub Elli1 Elli1_sub Elli2 Elli2_sub Elli3 Elli3_sub Hlambda Hlambda_sub Jzeta Jzeta_sub Rc Rc_sub Rd Rd_sub Rf Rf_sub Rg Rg_sub Rj Rj_sub

Jzeta_sub() Sub Jzeta_sub ( Ret As  Double, Phi As  Double, K As  Double, Optional Info As  Long  ) Jacobi zeta function Z(φ, k) (Subroutine version) Purpose Computes the Jacobi zeta function Z(φ, k). Jacobi zeta function is defined by using elliptic integrals as follows. Z(φ, k) = E(φ, k) - E(k) * F(φ, k) / K(k) The function is often defined as Z(φ, m) with m = k^2. Parameters [out] Ret Jacobi zeta function Z(φ, k). [in] Phi Argument φ [rad]. [in] K Argument k. (|K| <= 1) [out] Info (Optional) = 0: Successful exit. = -2: The argument K had an illegal value. (|K| > 1) = 1: Floating point range error. Reference boost/math/special_functions