att_struct
cba_struct
gen_struct
bcs_struct
hxt_struct
sxt_struct
wbs_struct
;
    infil = filnam_fix('refdata:ada*')
    ff = findfile(infil)
    n = n_elements(ff)
    ;
    tickname = strarr(n)
    for i=0,n-1 do begin
	break_file, ff(i), dlog, dir, filnam, ext
	tickname(i) = filnam + ext
    end
    ;
    for ifil=0,n_elements(ff)-1 do begin
	if (ifil eq 0) then begin
	    plot, [0,0], [0,0], xrange=[0,4], xtitle='Days past 30-Aug-91', $
		yrange=[0,n], yticks=n, ytickname=tickname, ytickv=indgen(n), xmargin=[15,3]
	end

	infil = ff(ifil)
	print, 'Now processing ', infil
	;
	rd_pointer, infil, pointer, recsiz
	rd_fheader, infil, fheader, ndset
	rd_roadmap, infil, roadmap
	;
	if (ifil eq 0) then day0=roadmap(0).day
	tim = (roadmap.day-day0)*86400000 + roadmap.time
	tim = tim/1000./60/60/24.	;convert to days
	;
	ss = sort(tim)
	tim = tim(ss)
	dx = deriv_arr(tim)
	;
	plot_gaps, tim, intarr(n_elements(tim))+ifil+0.5, gaps=dx*60*60*24
    end
;
end