Mercurial > octave
view scripts/polynomial/polyder.m @ 11469:c776f063fefe
Overhaul m-script files to use common variable name between code and documentation.
author | Rik <octave@nomad.inbox5.com> |
---|---|
date | Sun, 09 Jan 2011 12:41:21 -0800 |
parents | a8ce6bdecce5 |
children | fd0a3ac60b0e |
line wrap: on
line source
## Copyright (C) 1995, 1996, 1997, 2000, 2005, 2006, 2007 John W. Eaton ## ## This file is part of Octave. ## ## Octave is free software; you can redistribute it and/or modify it ## under the terms of the GNU General Public License as published by ## the Free Software Foundation; either version 3 of the License, or (at ## your option) any later version. ## ## Octave is distributed in the hope that it will be useful, but ## WITHOUT ANY WARRANTY; without even the implied warranty of ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ## General Public License for more details. ## ## You should have received a copy of the GNU General Public License ## along with Octave; see the file COPYING. If not, see ## <http://www.gnu.org/licenses/>. ## -*- texinfo -*- ## @deftypefn {Function File} {} polyderiv (@var{p}) ## @deftypefnx {Function File} {[@var{k}] =} polyderiv (@var{a}, @var{b}) ## @deftypefnx {Function File} {[@var{q}, @var{d}] =} polyderiv (@var{b}, @var{a}) ## An alias for @code{polyderiv}. ## @seealso{polyderiv} ## @end deftypefn ## Author: John W. Eaton function [q, d] = polyder (p, a) if (nargin == 1) q = polyderiv (p); elseif (nargin == 2) if (nargout == 2) [q, d] = polyderiv (p, a); else q = polyderiv (p, a); endif else print_usage (); endif endfunction