Mercurial > hg > octave-lyh

comparison scripts/polynomial/polyderiv.m @ 6046:34f96dd5441b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-10-10 16:10:25 by jwe]
author jwe
date Tue, 10 Oct 2006 16:10:31 +0000
parents 2618a0750ae6
children 9398f6a81bdf
comparison
equal deleted inserted replaced
6045:421d8a903df7 6046:34f96dd5441b
84 p = p(:).'; 84 p = p(:).';
85 85
86 q = p(1:(lp-1)) .* [(lp-1):-1:1]; 86 q = p(1:(lp-1)) .* [(lp-1):-1:1];
87 endif 87 endif
88 else 88 else
89 usage ("q = polyderiv (p) or q = polyderiv (b, a) or [q, r] = polyderiv (b, a)"); 89 print_usage ();
90 endif 90 endif
91 91
92 92
93 endfunction 93 endfunction