Program s2fil_draw_dots_only

program s2fil_draw_dots_only

        ! Uses
    use s2_types_mod
    use s2_error_mod
    use s2_sky_mod
    use s2fil_field_mod, only: s2fil_field_io_txt_dots_read

        ! Calls
    call parse_options
    call s2_sky_draw_dot
    call s2_sky_free
    call s2_sky_write_map_file
    call s2fil_field_io_txt_dots_read

        ! Variables
    character (len=S2_STRING_LEN) :: filename_out
    character (len=S2_STRING_LEN) :: filename_dots
    integer :: nside
    type (s2_sky) :: sky
    real (kind=s2_sp), allocatable, dimension (:) :: alpha
    real (kind=s2_sp), allocatable, dimension (:) :: beta
    logical :: large = .true.

        ! Interfaces
    interface func

        ! Subroutines and functions
    subroutine parse_options ()

end program s2fil_draw_dots_only

Draw dots at specified positions on constant value map.

Usage:

[-help]: Display usage information.
[-nside nside]: Healpix nside of map to produce.
[-out filename_out]: Name of map HEALPix fits file to write. Map contains dots drawn at specified positions.
[-dots filename_dots]: Name of text file containing dot alpha and beta positions.
[-large large (optional)]: Logical to indicate whether to draw large dots.

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

Version: 0.1 - November 2005

Description of Variables

filename_out

character (len=S2_STRING_LEN) :: filename_out

filename_dots

character (len=S2_STRING_LEN) :: filename_dots

nside

integer :: nside

sky

type (s2_sky) :: sky

alpha

real (kind=s2_sp), allocatable, dimension (:) :: alpha

beta

real (kind=s2_sp), allocatable, dimension (:) :: beta

large

logical :: large = .true.

Description of Interfaces

func

interface func
    function func (theta, phi, param) result (val)
        real (kind=s2_sp), intent(in) :: theta
        real (kind=s2_sp), intent(in) :: phi
        real (kind=s2_sp), optional, intent(in), dimension (:) :: param
        real (kind=s2_sp) :: val
    end function func
end interface func

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