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_analysisComputes 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_optionsParses the options passed when program called. ! @author J. D. McEwen (mcewen@mrao.cam.ac.uk)
Version: 0.1 - November 2007