program s2fil_draw_dots
! 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_in
character (len=S2_STRING_LEN) :: filename_out
character (len=S2_STRING_LEN) :: filename_dots
type (s2_sky) :: sky
integer :: ext = 1
real (kind=s2_sp), allocatable, dimension (:) :: alpha
real (kind=s2_sp), allocatable, dimension (:) :: beta
logical :: large = .true.
! Subroutines and functions
subroutine parse_options ()
end program s2fil_draw_dots
Draw dots on sky map at specified positions.
Usage:
Author: J. D. McEwen (mcewen@mrao.cam.ac.uk)
Version: 0.1 - April 2005
character (len=S2_STRING_LEN) :: filename_in
character (len=S2_STRING_LEN) :: filename_out
character (len=S2_STRING_LEN) :: filename_dots
type (s2_sky) :: sky
integer :: ext = 1
real (kind=s2_sp), allocatable, dimension (:) :: alpha
real (kind=s2_sp), allocatable, dimension (:) :: beta
logical :: large = .true.
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