Mercurial > hg > ltpda
view m-toolbox/classes/@mfir/mkbandpass.m @ 46:ca0b8d4dcdb6 database-connection-manager
Fix
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Tue, 06 Dec 2011 19:07:27 +0100 |
parents | f0afece42f48 |
children |
line wrap: on
line source
% MKBANDPASS return a bandpass filter mfir(). A Cheby filter is used. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % DESCRIPTION: MKBANDPASS return a bandpass filter mfir(). % A Cheby filter is used. % % CALL: f = mkbandpass(f, pl) % % VERSION: $Id: mkbandpass.m,v 1.10 2011/04/04 11:37:02 hewitson Exp $ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% function f = mkbandpass(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 = 'bandpass'; f.fs = fs; f.a = g.*fir1(order, 2.*fc/fs, 'bandpass', win.win); f.gd = (f.ntaps-1)/2; f.histout = zeros(1,f.ntaps-1); % initialise output history end