Home > classes > @mfir > private > mkhighpass.m

mkhighpass

PURPOSE ^

return a high pass filter miir(). A Butterworth filter is used.

SYNOPSIS ^

function f = mkhighpass(pl)

DESCRIPTION ^

 return a high pass filter miir(). A Butterworth filter is used.
 
     
 M Hewitson 27-08-02

 
 $Id: mkhighpass.html,v 1.1 2007/06/08 14:15:06 hewitson Exp $

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function f = mkhighpass(pl)
0002 
0003 % return a high pass filter miir(). A Butterworth filter is used.
0004 %
0005 %
0006 % M Hewitson 27-08-02
0007 %
0008 %
0009 % $Id: mkhighpass.html,v 1.1 2007/06/08 14:15:06 hewitson Exp $
0010 %
0011 
0012 g     = find(pl, 'gain');
0013 fc    = find(pl, 'fc');
0014 fs    = find(pl, 'fs');
0015 order = find(pl, 'order');
0016 win   = find(pl, 'Win');
0017 
0018 if(fc(1) > fs/2)
0019   error('fc must be < fs/2');
0020 end
0021 
0022 
0023 f.name     = 'std highpass';
0024 f.fs       = fs;
0025 f.ntaps    = order+1;
0026 f.a        = fir1(order, 2*fc/fs, 'high', win.win);
0027 f.gd       = (f.ntaps)/2;
0028 f.g        = g;
0029 f.histout  = zeros(1,f.ntaps-1);   % initialise output history
0030 
0031 
0032 % END
0033

Generated on Fri 08-Jun-2007 16:09:11 by m2html © 2003