program s2_ylm
! Uses
use s2_types_mod
use s2_error_mod
use s2_sky_mod
use s2_ylm_mod
! Calls
call parse_options
call s2_error
call s2_sky_free
call s2_sky_io_fits_write
call s2_sky_write_map_file
! Variables
character (len=*), parameter :: MAP_FILE = 'map'
character (len=*), parameter :: SKY_FILE = 'sky'
integer :: file_type = S2_SKY_FILE_TYPE_MAP
character (len=S2_STRING_LEN) :: file_type_str = MAP_FILE
character (len=*), parameter :: METHOD_LEG = 'leg'
character (len=*), parameter :: METHOD_WIG = 'wig'
character (len=S2_STRING_LEN) :: method_str = METHOD_LEG
integer :: method = S2_YLM_EVAL_METHOD_LEG
character (len=S2_STRING_LEN) :: filename_in
character (len=S2_STRING_LEN) :: filename_out
character (len=*), parameter :: REALITY_REAL = 'real'
character (len=*), parameter :: REALITY_IMAG = 'imag'
character (len=*), parameter :: REALITY_ABS = 'abs'
character (len=S2_STRING_LEN) :: reality_str = REALITY_ABS
integer :: reality = S2_YLM_REALITY_ABS
integer :: nside
integer :: el
integer :: m
type (s2_sky) :: ylm
! Subroutines and functions
subroutine parse_options ()
end program s2_ylm
Compute spherical harmonic function on full sky.
Usage:
Author: J. D. McEwen (mcewen@mrao.cam.ac.uk)
Version: 0.1 - February 2008
character (len=*), parameter :: MAP_FILE = 'map'
character (len=*), parameter :: SKY_FILE = 'sky'
integer :: file_type = S2_SKY_FILE_TYPE_MAP
character (len=S2_STRING_LEN) :: file_type_str = MAP_FILE
character (len=*), parameter :: METHOD_LEG = 'leg'
character (len=*), parameter :: METHOD_WIG = 'wig'
character (len=S2_STRING_LEN) :: method_str = METHOD_LEG
integer :: method = S2_YLM_EVAL_METHOD_LEG
character (len=S2_STRING_LEN) :: filename_in
character (len=S2_STRING_LEN) :: filename_out
character (len=*), parameter :: REALITY_REAL = 'real'
character (len=*), parameter :: REALITY_IMAG = 'imag'
character (len=*), parameter :: REALITY_ABS = 'abs'
character (len=S2_STRING_LEN) :: reality_str = REALITY_ABS
integer :: reality = S2_YLM_REALITY_ABS
integer :: nside
integer :: el
integer :: m
type (s2_sky) :: ylm
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