Mercurial > hg > octave-lyh

annotate examples/@FIRfilter/subsref.m @ 14855:1b48b209a8d6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Use Octave coding conventions for coddling parentheses in examples directory * display.m, subsref.m, display.m, mtimes.m, plot.m, polyval.m, myprop.c, stringdemo.cc, unwinddemo.cc: Use Octave coding conventions for coddling parentheses.
author Rik <octave@nomad.inbox5.com>
date Mon, 09 Jul 2012 13:23:31 -0700
parents f8b8ab529913
children 48f5b993b819
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 function out = subsref (f, x)
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
2 switch x.type
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
3 case "()"
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
4 n = f.polynomial;
14855
1b48b209a8d6 maint: Use Octave coding conventions for coddling parentheses in examples directory
Rik <octave@nomad.inbox5.com>
parents: 9251
diff changeset
5 out = filter (n.poly, 1, x.subs{1});
9251
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
6 case "."
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
7 fld = x.subs;
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
8 if (strcmp (fld, "polynomial"))
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
9 out = f.polynomial;
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
10 else
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
11 error ("@FIRfilter/subsref: invalid property \"%s\"", fld);
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
12 endif
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
13 otherwise
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
14 error ("@FIRfilter/subsref: invalid subscript type for FIR filter");
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
15 endswitch
f8b8ab529913 improve OOP documentation
Robert T. Short <octave@phaselockedsystems.com>
parents:
diff changeset
16 endfunction