SUPOL Subroutine

public subroutine SUPOL(KNSMAX, DDMU, DDPOL, DDA, DDB, DDC, DDD, DDE, DDF, DDG, DDH, DDI)

*** *SUPOL * - Routine to compute the Legendre polynomials

• Interface. ---------- CALL *SUPOL(KNSMAX,DDMU,DDPOL,DDA,DDB,DDC,DDD,DDE ,DDF,DDG,DDH,DDI)

  1. Diagonal (the terms 0,0 and 1,1 have already been computed) -----------------------------------------------------------

  2. General recurrence. -------------------

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=JPIM),	intent(in)			::	KNSMAX
real(kind=JPRH),	intent(in)			::	DDMU
real(kind=JPRH),	intent(out)			::	DDPOL(0:KNSMAX,0:KNSMAX)
real(kind=JPRH),	intent(in)			::	DDA(0:KNSMAX)
real(kind=JPRH),	intent(in)			::	DDB(0:KNSMAX)
real(kind=JPRH),	intent(in)			::	DDC(0:KNSMAX,0:KNSMAX)
real(kind=JPRH),	intent(in)			::	DDD(0:KNSMAX,0:KNSMAX)
real(kind=JPRH),	intent(in)			::	DDE(0:KNSMAX,0:KNSMAX)
real(kind=JPRH),	intent(in)			::	DDF(0:KNSMAX)
real(kind=JPRH),	intent(in)			::	DDG(0:KNSMAX)
real(kind=JPRH),	intent(in)			::	DDH(0:KNSMAX)
real(kind=JPRH),	intent(in)			::	DDI(0:KNSMAX)

Contents