Program s2_dlwrite 

program s2_dlwrite

        ! Uses
    use s2_types_mod
    use s2_error_mod
    use s2_dl_mod, only: s2_dl_beta_operator

        ! Calls
    call parse_options
    call s2_dl_beta_operator
    call s2_error

        ! Variables
    real (kind=s2_dp) :: PION2 = 1.570796326794896619231321691639751442099d0
    real (kind=s2_dp), pointer, dimension (:, :) :: dl => null ()
    integer :: lmax = 12
    integer :: l
    integer :: m
    integer :: mm
    integer :: fail = 0

        ! Subroutines and functions
    subroutine parse_options ()

end program s2_dlwrite
Write out Wigner d function values for theta=pi/2.

Usage:

Author: J. D. McEwen (mcewen@mrao.cam.ac.uk)

Version: 0.1 - April 2007

Description of Variables

PION2

 
real (kind=s2_dp) :: PION2 = 1.570796326794896619231321691639751442099d0

dl

 
real (kind=s2_dp), pointer, dimension (:, :) :: dl => null ()

lmax

 
integer :: lmax = 12

l

 
integer :: l

m

 
integer :: m

mm

 
integer :: mm

fail

 
integer :: fail = 0

Description of Subroutines and Functions

parse_options

 
subroutine parse_options ()
    ! Calls: getArgument
end subroutine parse_options
Parse the options passed when program called.

Author: J. D. McEwen (mcewen@mrao.cam.ac.uk)

Version: 0.1 - November 2004