pro ptim, a,b,c,d,e,f,g,h,i,j, help=help, _extra=_extra

on_error, 2

n = n_params()

if keyword_set(help) or n eq 0 then begin
    doc_library,'ptim'
    return
endif

; see if any of the ascii format options was already passed in by seeing if anytim
; returns a string.  If not, default ascii format will be vms - put it in _extra structure.
test = anytim(a, _extra=_extra)
if datatype(test) ne 'STR' then begin
    if exist(_extra) then _extra = add_tag(_extra, 1, 'vms') else _extra = {vms: 1}
endif

if n ge 1 then print, anytim(a, _extra=_extra)
if n ge 2 then print, anytim(b, _extra=_extra)
if n ge 3 then print, anytim(c, _extra=_extra)
if n ge 4 then print, anytim(d, _extra=_extra)
if n ge 5 then print, anytim(e, _extra=_extra)
if n ge 6 then print, anytim(f, _extra=_extra)
if n ge 7 then print, anytim(g, _extra=_extra)
if n ge 8 then print, anytim(h, _extra=_extra)
if n ge 9 then print, anytim(i, _extra=_extra)
if n ge 10 then print, anytim(j, _extra=_extra)

en