pro dsn_show, dsn_num, dsn_select, index=index

if dsn_num eq 0 then print,' No DSN stations requested' else begin
        print,' '
        print,'  Requested DSN Station times: ' & print,' ' 
        for i=0,dsn_num-1 do begin
        if keyword_set( index ) then begin
        indd = '     '
        strput,indd,'['+strtrim(i+1,2)+']'
        endif else indd = ''
        print,indd+dsn_select(i).station,           $
              dsn_select(i).doy,                $
          fmt_tim(dsn_select(i).timarr),                $
            format='(x,a,i4,2x,a)'
    endfor
endelse

return
end