function [ fast_noise ] = make_ttfss_fast_noise(ff_NB,ff_noise,noise,ttfsspath, varargin)
%local function for FSS noise budget
%%
%make servo
addpath(ttfsspath);
ss_ttfss = TTFSS_ss('/Users/Masayuki/Dropbox/share ioo/document/circuit/TTFSS',...
    'CG',1000,'FG',1000,'RL','Local','RT','Off','AO','Off',...
    'Exc','Off','Servo','Inv','FastExc','Off','FastSign','-');

inter_noise = interp1(ff_noise,noise/10,ff_NB);%10 is the compensation factor of SR560 for measurement
[abs_ttfss,~] = mnbode_list(ss_ttfss(2),ff_NB);

fast_noise = inter_noise./abs_ttfss;

if isempty(varargin)
    plotflag = false;
else
    plotflag = varargin{1};
end
if plotflag
    loglog(ff_NB,inter_noise);
    grid on
    title('Input noise of fast servo')
    xlabel('frequency[Hz]');
    ylabel('noise[V/rtHz]');
end
end