Mercurial > hg > octave-lyh

annotate examples/@FIRfilter/FIRfilter_aggregation.m @ 17525:1d0fa3c34ad7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fully int16 type support
author LYH <lyh.kernel@gmail.com>
date Fri, 27 Sep 2013 04:14:51 +0800
parents 050bc580cb60
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9251
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
1 ## -*- texinfo -*-
14093
050bc580cb60 doc: Various docstring improvements before 3.6.0 release.
Rik <octave@nomad.inbox5.com>
parents: 9251
diff changeset
2 ## @deftypefn {Function File} {} FIRfilter ()
9251
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
3 ## @deftypefnx {Function File} {} FIRfilter (@var{p})
14093
050bc580cb60 doc: Various docstring improvements before 3.6.0 release.
Rik <octave@nomad.inbox5.com>
parents: 9251
diff changeset
4 ## Create a FIR filter with polynomial @var{p} as coefficient vector.
9251
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
5 ## @end deftypefn
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
6
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
7 function f = FIRfilter (p)
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
8
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
9 if (nargin == 0)
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
10 f.polynomial = @polynomial ([1]);
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
11 elseif (nargin == 1)
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
12 if (isa (p, "polynomial"))
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
13 f.polynomial = p;
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
14 else
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
15 error ("FIRfilter: expecting polynomial as input argument");
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
16 endif
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
17 else
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
18 print_usage ();
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
19 endif
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
20 f = class (f, "FIRfilter");
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
21 endfunction