pro plot_time,x,range=range,start_time=start_time,Dt=Dt, $
xticks=xticks,model=model,xstyle=xstyle,ystyle=ystyle,yrange=yrange, $
ynozero=ynozero,noclip=noclip,clip=clip,xrange=xrange, $
color=color,linestyle=linestyle,thick=thick,title=title, $
subtitle=subtitle,font=font,xmargin=xmargin,ymargin=ymargin, $
xminor=xminor,yminor=yminor, $
yticks=yticks,xtitle=xtitle,ytitle=ytitle, $
ytickv=ytickv,ytickn=ytickn, noerase=noerase, $
xtickn=xtickn, $
position=position, normal=normal, data=data, device=device, $
psym=psym,symsize=symsize,charsize=charsize,nsum=nsum,nodata=nodata,	$
xticklen=xticklen, yticklen=yticklen,background=background

;	Plots a temporal series versus absolute time.

common time,Tstart,Delta_t,Model_string

if n_elements(xtickn) le 0 then xtickformat='ut_ticks' $
	else xtickformat=''


if n_elements(start_time) le 0 then start_time=0.0d0
if n_elements(Dt) le 0 then Delta_t=1.0d0 else Delta_t=Dt
if n_elements(model) le 0 then Model_string='hh:mm:ss.ms' else Model_string=model
if n_elements(xticks) le 0 then xticks=4
if n_elements(range) le 0 then range=[0,n_elements(x)-1]
if n_elements(xstyle) le 0 then xstyle=0
if n_elements(xticklen) le 0 then xticklen=0
if n_elements(ystyle) le 0 then ystyle=0
if n_elements(xrange) le 0 then xrange=!x.range
if n_elements(yrange) le 0 then yrange=!y.range
if n_elements(ynozero) le 0 then ynozero=0

if n_elements(linestyle) le 0 then linestyle=0
if n_elements(color) le 0 then color=!p.color
if n_elements(background) le 0 then background=!p.background

if n_elements(noclip) le 0 then noclip=0
if n_elements(title) le 0 then title=' '
if n_elements(subtitle) le 0 then subtitle=' '
if n_elements(font) le 0 then font=!P.font
if n_elements(xminor) le 0 then xminor=0
if n_elements(yminor) le 0 then yminor=0

if n_elements(yticks) le 0 then yticks=0
if n_elements(xtitle) le 0 then xtitle=''
if n_elements(ytitle) le 0 then ytitle=''
if n_elements(ytickv) le 0 then ytickv=0
if n_elements(yticklen) le 0 then yticklen=0
if n_elements(xtickn) le 0 then xtickn=''
if n_elements(ytickn) le 0 then ytickn=''
if n_elements(normal) le 0 then normal=0
if n_elements(data) le 0 then data=1
if n_elements(device) le 0 then device=0
if n_elements(thick) le 0 then thick=!P.thick
if n_elements(clip) le 0 then clip=!P.clip

if n_elements(psym) le 0 then psym=0
if n_elements(symsize) le 0 then symsize=!P.symsize
if n_elements(charsize) le 0 then charsize=!P.charsize
if n_elements(nsum) le 0 then nsum=1

if n_elements(xmargin) le 0 then xmargin=!x.margin
if n_elements(ymargin) le 0 then ymargin=!y.margin
if n_elements(nodata) le 0 then nodata=0


Tstart=start_time+range(0)*Delta_t

tick=AXIS_DIV(Range,xticks,Minor,/Time,Dt=Delta_t)

Tshift=(60d0-((Tstart) mod 60 mod 60))/Delta_t

xtickv=Tshift mod tick + dindgen(xticks+1)*tick

	if xtickv(xticks) gt n_elements(x) then begin
xticks=xticks-1
xtickv=xtickv(0:xticks)
	endif


if n_elements(position) le 0 then	$

plot,x(range(0):range(1)),xtickf=xtickformat, $
	xtickv=xtickv, xticks=xticks,xminor=Minor, $
	xstyle=xstyle,ystyle=ystyle,yrange=yrange,ynozero=ynozero, $
	title=title,subtitle=subtitle,font=font,xrange=xrange, $
	xmargin=xmargin,ymargin=ymargin,yminor=yminor, $
	yticks=yticks,xtitle=xtitle,ytitle=ytitle, ytickv=ytickv, $
	xtickn=xtickn,  $
	ytickn=ytickn,  nodata=nodata,  noerase=noerase, 	$
	normal=normal, data=data, device=device, color=color, $
	xticklen=xticklen, yticklen=yticklen, background=background,	$
	psym=psym,symsize=symsize,charsize=charsize,nsum=nsum	else	$

plot,x(range(0):range(1)),xtickf=xtickformat, $
	xtickv=xtickv, xticks=xticks,xminor=Minor, $
	xstyle=xstyle,ystyle=ystyle,yrange=yrange,ynozero=ynozero, $
	title=title,subtitle=subtitle,font=font,xrange=xrange, $
	xmargin=xmargin,ymargin=ymargin,yminor=yminor, $
	yticks=yticks,xtitle=xtitle,ytitle=ytitle, ytickv=ytickv, $
	xtickn=xtickn,  $
	ytickn=ytickn,position=position, nodata=nodata,	color=color, $
	normal=normal, data=data, device=device, noerase=noerase,  $
	xticklen=xticklen, yticklen=yticklen, background=background,	$
	psym=psym,symsize=symsize,charsize=charsize,nsum=nsum


empty


end