Mercurial > hg > octave-nkf

annotate examples/@polynomial/end.m @ 9288:7621f0b0e588

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
examples/@polynomial/end.m: Fix end for zero based indexing.
author Robert T. Short <rtshort@ieee.org>
date Tue, 02 Jun 2009 20:56:19 -0700
parents 226f6d001ee2
children 446c46af4b42
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
8223
0c91b9a17dcf Commit missing files from previous change
David Bateman <dbateman@free.fr>
parents:
diff changeset
1 function r = end (obj, index_pos, num_indices)
9284
567e3e4ab74d fix up examples/@polynomial
Robert T. Short <octave@phaselockedsystems.com>
parents: 8256
diff changeset
2
9285
226f6d001ee2 further improve the polynomial example, fix indexing
Jaroslav Hajek <highegg@gmail.com>
parents: 9284
diff changeset
3 if (num_indices != 1)
9284
567e3e4ab74d fix up examples/@polynomial
Robert T. Short <octave@phaselockedsystems.com>
parents: 8256
diff changeset
4 error ("polynomial object may only have one index")
8223
0c91b9a17dcf Commit missing files from previous change
David Bateman <dbateman@free.fr>
parents:
diff changeset
5 endif
9284
567e3e4ab74d fix up examples/@polynomial
Robert T. Short <octave@phaselockedsystems.com>
parents: 8256
diff changeset
6
9288
7621f0b0e588 examples/@polynomial/end.m: Fix end for zero based indexing.
Robert T. Short <rtshort@ieee.org>
parents: 9285
diff changeset
7 r = length (obj.poly) - 1;
9284
567e3e4ab74d fix up examples/@polynomial
Robert T. Short <octave@phaselockedsystems.com>
parents: 8256
diff changeset
8
8223
0c91b9a17dcf Commit missing files from previous change
David Bateman <dbateman@free.fr>
parents:
diff changeset
9 endfunction