function [ zero_cross_freq ] = mncrospoint( xlist, ylist, cross_point )
%UNTITLED4 この関数の概要をここに記述
%   詳細説明をここに記述
zero_cross_freq = [];
for ii = 1:length(xlist)-1
    if (ylist(ii)-cross_point)*(ylist(ii+1)-cross_point)<=0
        temp_zero_cros_freq = xlist(ii)+...
            (xlist(ii+1)-xlist(ii))*(ylist(ii)-cross_point)/(ylist(ii)-ylist(ii+1));
        zero_cross_freq = [zero_cross_freq temp_zero_cros_freq];
    end
end

end