lpmn Subroutine

public subroutine lpmn(mm, m, n, x, pm, pd)

************80

! LPMN computes associated Legendre functions Pmn(X) and derivatives P'mn(x).

Licensing:

This routine is copyrighted by Shanjie Zhang and Jianming Jin.  However, 
they give permission to incorporate this routine into a user program 
provided that the copyright is acknowledged.

Modified:

19 July 2012

Author:

Shanjie Zhang, Jianming Jin

Reference:

Shanjie Zhang, Jianming Jin,
Computation of Special Functions,
Wiley, 1996,
ISBN: 0-471-11963-6,
LC: QA351.C45.

Parameters:

Input, integer ( kind = 4 ) MM, the leading dimension of PM and PD.

Input, integer ( kind = 4 ) M, the order of Pmn(x).

Input, integer ( kind = 4 ) N, the degree of Pmn(x).

Input, real ( kind = 8 ) X, the argument of Pmn(x).

Output, real ( kind = 8 ) PM(0:MM,0:N), PD(0:MM,0:N), the
values of Pmn(x) and Pmn'(x).

Arguments

Type IntentOptional Attributes Name
integer(kind=4) :: mm
integer(kind=4) :: m
integer(kind=4) :: n
real(kind=8) :: x
real(kind=8) :: pm(0:mm,0:n)
real(kind=8) :: pd(0:mm,0:n)