Celli1 Celli2 Celli3

Celli3() Function Celli3 ( N As  Double, K As  Double, Optional Info As  Long  ) Complete elliptic integral of the third kind P(n, k) Purpose This routine computes the Legendre form of complete elliptic integral of the third kind P(n, k). P(n, k) = P(π/2, n, k)\n where P(φ, n, k) is the incomplete elliptic integral of the third kind defined as follows. P(φ, n, k) = ∫ 1/((1 - n(sin(t))^2)sqrt(1 - k^2(sin(t))^2)) dt [0, φ] Returns Double Complete elliptic integral of the third kind P(n, k). Parameters [in] N Argument n. (N < 1) [in] K Argument k. (-1 < K < 1) [out] Info (Optional) = 0: Successful exit. = -1: The argument N had an illegal value. (N >= 1) = -2: The argument K had an illegal value. (K <= -1 or K >= 1) = 1: Floating point range error. Reference boost/math/special_functions