program s2dw_analysis
        ! Uses
    use s2dw_types_mod
    use s2dw_error_mod
    use s2dw_fileio_mod
    use s2dw_core_mod
    use s2_sky_mod
        ! Calls
    call parse_options
    call s2_sky_compute_alm
    call s2_sky_free
    call s2_sky_get_alm
    call s2dw_core_analysis_flm2wav_dynamic
    call s2dw_core_free_wavdyn
    call s2dw_core_init_directionality
    call s2dw_core_init_kernels
    call s2dw_error
    call s2dw_fileio_fits_wav_write
    call s2dw_fileio_matlab_wav_write
        ! Variables
    complex (kind=dpc), allocatable, dimension (:,:) :: flm
    complex (kind=spc), allocatable, dimension (:,:) :: flm_temp
    real (kind=dp), allocatable, dimension (:,:) :: K_gamma
    real (kind=dp), allocatable, dimension (:) :: Phi2
    complex (kind=dpc), allocatable, dimension (:,:) :: Slm
    real (kind=dp), allocatable, dimension (:) :: admiss
    type (s2dw_wav_abg), allocatable, dimension (:) :: wavdyn
    complex (kind=dpc), allocatable, dimension (:,:) :: scoeff
    integer :: J
    integer :: J_max
    integer :: B
    logical :: B_in = .false.
    integer :: N
    integer :: bl_scoeff
    real (kind=dp) :: alpha
    integer :: nside
    logical :: admiss_pass
    type (s2_sky) :: sky
    integer :: fail = 0
    logical :: use_Jmax
    character (len=STRING_LEN) :: filename_in
    character (len=STRING_LEN) :: filename_out
    integer :: file_extension = 1
    character (len=*), parameter :: FILE_TYPE_FITS = 'fits'
    character (len=*), parameter :: FILE_TYPE_MAT = 'm'
    character (len=STRING_LEN) :: file_type = FILE_TYPE_FITS
    character (len=STRING_LEN) :: error_string
        ! Subroutines and functions
    subroutine parse_options ()
end program s2dw_analysis
 Computes the S2DW wavelet and scaling coefficients of a Healpix sky map.
Notes:
Author: J. D. McEwen (mcewen@mrao.cam.ac.uk)
Version: 0.1 - November 2007
complex (kind=dpc), allocatable, dimension (:,:) :: flm
complex (kind=spc), allocatable, dimension (:,:) :: flm_temp
real (kind=dp), allocatable, dimension (:,:) :: K_gamma
real (kind=dp), allocatable, dimension (:) :: Phi2
complex (kind=dpc), allocatable, dimension (:,:) :: Slm
real (kind=dp), allocatable, dimension (:) :: admiss
type (s2dw_wav_abg), allocatable, dimension (:) :: wavdyn
complex (kind=dpc), allocatable, dimension (:,:) :: scoeff
integer :: J
integer :: J_max
integer :: B
logical :: B_in = .false.
integer :: N
integer :: bl_scoeff
real (kind=dp) :: alpha
integer :: nside
logical :: admiss_pass
type (s2_sky) :: sky
integer :: fail = 0
logical :: use_Jmax
character (len=STRING_LEN) :: filename_in
character (len=STRING_LEN) :: filename_out
integer :: file_extension = 1
character (len=*), parameter :: FILE_TYPE_FITS = 'fits'
character (len=*), parameter :: FILE_TYPE_MAT = 'm'
character (len=STRING_LEN) :: file_type = FILE_TYPE_FITS
character (len=STRING_LEN) :: error_string
subroutine parse_options ()
    ! Calls: getArgument
end subroutine parse_options
 Parses the options passed when program called.
! @author J. D. McEwen (mcewen@mrao.cam.ac.uk)
Version: 0.1 - November 2007