program s2_cl2ascii ! Uses use s2_types_mod use s2_pl_mod ! Calls call parse_options call s2_pl_free call s2_pl_io_ascii_write ! Variables character (len=S2_STRING_LEN) :: filename_in character (len=S2_STRING_LEN) :: filename_out type (s2_pl) :: cl logical :: dl_status = .false. ! Subroutines and functions subroutine parse_options () end program s2_cl2asciiRead a fits cl file and write out an ascii file (spectrum may be scaled to dls depending on dl_status flag).
Usage:
Author: J. D. McEwen (mcewen@mrao.cam.ac.uk)
Version: 0.1 - June 2005
character (len=S2_STRING_LEN) :: filename_in
character (len=S2_STRING_LEN) :: filename_out
type (s2_pl) :: cl
logical :: dl_status = .false.
subroutine parse_options () ! Calls: getArgument end subroutine parse_optionsParse the options passed when program called.
Author: J. D. McEwen (mcewen@mrao.cam.ac.uk)
Version: 0.1 - November 2004