view m-toolbox/classes/@mfir/mklowpass.m @ 25:79dc7091dbbc
database-connection-manager
Update tests
author |
Daniele Nicolodi <nicolodi@science.unitn.it> |
date |
Mon, 05 Dec 2011 16:20:06 +0100 (2011-12-05) |
parents |
f0afece42f48 |
children |
|
line source
% MKLOWPASS return a low pass filter mfir().
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% DESCRIPTION: MKLOWPASS return a low pass filter mfir().
%
% CALL: f = mklowpass(f, pl)
%
% VERSION: $Id: mklowpass.m,v 1.8 2011/04/04 11:37:02 hewitson Exp $
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function f = mklowpass(f, pl)
g = find(pl, 'gain');
fc = find(pl, 'fc');
fs = find(pl, 'fs');
order = find(pl, 'order');
win = find(pl, 'Win');
utils.helper.checkFilterOptions(pl);
f.name = 'lowpass';
f.fs = fs;
f.a = g.*fir1(order, 2*fc(1)/fs, 'low', win.win);
f.gd = (f.ntaps-1)/2;
f.histout = zeros(1,f.ntaps-1); % initialise output history
end