function plt_fin(tfin,afin,ibaz)

dumm=size(tfin);
N_trace=dumm(3);

clf
for i=1:N_trace
   
   tmp_amp=afin(:,ibaz,i);
   tmp_amp=tmp_amp./(max(abs(tmp_amp)));
   dy=i;
    
   plot(tfin(:,ibaz,i),tmp_amp+dy,'b.-')
   hold on
end
