Mercurial > octave-nkf
comparison scripts/polynomial/polyvalm.m @ 7411:83a8781b529d
[project @ 2008-01-22 21:52:25 by jwe]
author | jwe |
---|---|
date | Tue, 22 Jan 2008 21:52:26 +0000 |
parents | a1dbe9d80eee |
children | 6f2d95255911 |
comparison
equal
deleted
inserted
replaced
7410:8a3b2ccc4e11 | 7411:83a8781b529d |
---|---|
60 else | 60 else |
61 y = v * (diag (polyval (c, diag (d))) / v); | 61 y = v * (diag (polyval (c, diag (d))) / v); |
62 endif | 62 endif |
63 | 63 |
64 endfunction | 64 endfunction |
65 | |
66 %!assert(isempty (polyvalm ([], [1, 2; 3, 4]))); | |
67 | |
68 %!error polyvalm ([1, 1, 1], [1, 2; 3, 4; 5, 6]); | |
69 |