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

Hlambda_sub() Sub Hlambda_sub ( Ret As  Double, Phi As  Double, K As  Double, Optional Info As  Long  ) Heuman lambda function Λ0(φ, k) (Subroutine version) Purpose Computes the Heuman lambda function Λ0(φ, k). Λ0(φ, k) = F(φ, √(1 - k^2))/K(√(1 - k^2)) + (2/π) K(k) Z(φ, √(1 - k^2)) where F is the incomplete elliptic integral of the first kind, K is the complete elliptic integral of the first kind, and Z is the Jacobi zeta function. Parameters [out] Ret Heuman lambda function Λ0(φ, k). [in] Phi Argument φ. [in] K Argument k. (-1 < K < 1) [out] Info (Optional) = 0: Successful exit. = -2: The argument K had an illegal value. (K <= -1 or K >= 1) = 1: Floating point range error. Reference boost/math/special_functions