Mercurial > octave

comparison scripts/polynomial/polyderiv.m @ 7411:83a8781b529d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2008-01-22 21:52:25 by jwe]
author jwe
date Tue, 22 Jan 2008 21:52:26 +0000
parents a1dbe9d80eee
children eb63fbe60fab
comparison
equal deleted inserted replaced
7410:8a3b2ccc4e11 7411:83a8781b529d
87 endif 87 endif
88 else 88 else
89 print_usage (); 89 print_usage ();
90 endif 90 endif
91 91
92 endfunction
92 93
93 endfunction 94 %!assert(all (all (polyderiv ([1, 2, 3]) == [2, 2])));
95
96 %!assert(polyderiv (13) == 0);
97
98 %!error polyderiv ([]);
99
100 %!error polyderiv ([1, 2; 3, 4]);
101