|
@@ -83,7 +83,7 @@ function [FIR] = sphear_fir_design(F, A2BF, n, maxboost, Fs, Fl, W, XYZ)
|
|
|
fh = (F(dlast-1)/(Fs/2):200/(Fs/2):1)';
|
|
fh = (F(dlast-1)/(Fs/2):200/(Fs/2):1)';
|
|
|
%% make the end really 1.0
|
|
%% make the end really 1.0
|
|
|
fh(end) = 1;
|
|
fh(end) = 1;
|
|
|
- rh = spline(F(dlast-1:end)/(Fs/2), A2BF(dlast-1:end,c,b)', fh);
|
|
|
|
|
|
|
+ rh = interp1(F(dlast-1:end)/(Fs/2), A2BF(dlast-1:end,c,b)', fh, "cubic", "extrap");
|
|
|
|
|
|
|
|
%% we design the spline taking into account one additional point
|
|
%% we design the spline taking into account one additional point
|
|
|
%% on the bottom edge so that it will fit better with the existing
|
|
%% on the bottom edge so that it will fit better with the existing
|
|
@@ -94,7 +94,6 @@ function [FIR] = sphear_fir_design(F, A2BF, n, maxboost, Fs, Fl, W, XYZ)
|
|
|
istart = idx;
|
|
istart = idx;
|
|
|
end
|
|
end
|
|
|
end
|
|
end
|
|
|
- istart
|
|
|
|
|
|
|
|
|
|
%% extract the low frequency A2B coefficients
|
|
%% extract the low frequency A2B coefficients
|
|
|
fl = [0 F(1:dlast-1)']' ./ (Fs/2);
|
|
fl = [0 F(1:dlast-1)']' ./ (Fs/2);
|