comelp Subroutine

public subroutine comelp(Hk, Ck, Ce)

Compute complete elliptic integrals K(k) and E(k)

Arguments

Type IntentOptional Attributes Name
real(kind=wp) :: Hk
real(kind=wp) :: Ck
real(kind=wp) :: Ce