Mercurial > octave-nkf

view examples/@polynomial/end.m @ 14200:64d9f33313cc stable rc-3-6-0-1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
3.6.0-rc1 release candidate * configure.ac (AC_INIT): Version is now 3.6.0-rc1. (OCTAVE_RELEASE_DATE): Now 2012-01-12.
author John W. Eaton <jwe@octave.org>
date Thu, 12 Jan 2012 14:31:50 -0500
parents 7621f0b0e588
children 446c46af4b42
line wrap: on
line source

function r = end (obj, index_pos, num_indices)

  if (num_indices != 1)
    error ("polynomial object may only have one index")
  endif
  
  r = length (obj.poly) - 1;

endfunction