LegendreAlpha

Recurrence coeff for Legendre polynomial.

INTERFACE
  MODULE PURE FUNCTION LegendreAlpha(n) RESULT(ans)
    INTEGER(I4B), INTENT(IN) :: n
    !! order of Legendre polynomial
    REAL(DFP) :: ans
    !! answer
  END FUNCTION LegendreAlpha
END INTERFACE

️܀ See example

program main
use easifembase
implicit none
CALL Display(LegendreAlpha(n=5), "ans:" )
CALL Display(LegendreBeta(n=5), "ans:" )
end program main

results

ans:0.00000
ans:0.252525

↢