;$Id: fxyavert.pro,v 1.3 2020/07/20 19:59:21 brandenb Exp $
;
;  find good time indices
;
t1=1e-4
t2=1e4
t=xya.t
nt=n_elements(t)
;
;  3 per decade
;
nperdecade=10
nj=fix(nperdecade*alog10(t2/t1)+1.)
t_=t1*10.^(findgen(nj)/nperdecade)
print,t_
;
openw,1,'itgood.txt'
fo="(i6,e9.1,e11.2)"
for j=0,nj-1 do begin
  it=findex(t_[j],t)
  if it ne (nt-1) then printf,1,it,t[it],t[it],fo=fo
endfor
close,1
;
spawn,"cat itgood.txt"
spawn,"cvs add itgood.txt"
spawn,"cvs add -kb xyaver.sav"
END