Mercurial > hg > octave-nkf

comparison scripts/polynomial/polygcd.m @ 5642:2618a0750ae6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-03-06 21:26:48 by jwe]
author jwe
date Mon, 06 Mar 2006 21:26:54 +0000
parents 7012c2492c12
children 34f96dd5441b
comparison
equal deleted inserted replaced
5641:eb998631a4aa 5642:2618a0750ae6
31 ## Example 31 ## Example
32 ## @example 32 ## @example
33 ## polygcd (poly(1:8), poly(3:12)) - poly(3:8) 33 ## polygcd (poly(1:8), poly(3:12)) - poly(3:8)
34 ## deconv (poly(1:8), polygcd (poly(1:8), poly(3:12))) - poly(1:2) 34 ## deconv (poly(1:8), polygcd (poly(1:8), poly(3:12))) - poly(1:2)
35 ## @end example 35 ## @end example
36 ## @end deftypefn
37 ##
38 ## @seealso{poly, polyinteg, polyderiv, polyreduce, roots, conv, deconv, 36 ## @seealso{poly, polyinteg, polyderiv, polyreduce, roots, conv, deconv,
39 ## residue, filter, polyval, and polyvalm} 37 ## residue, filter, polyval, and polyvalm}
38 ## @end deftypefn
40 39
41 function x = polygcd (b, a, tol) 40 function x = polygcd (b, a, tol)
42 41
43 if (nargin == 2 || nargin == 3) 42 if (nargin == 2 || nargin == 3)
44 if (nargin == 2) 43 if (nargin == 2)