Mercurial > octave-nkf
changeset 4008:a0e323e959cd
[project @ 2002-07-26 04:51:03 by jwe]
| author | jwe |
|---|---|
| date | Fri, 26 Jul 2002 04:51:03 +0000 |
| parents | 31448e09d38e |
| children | 27e461aed956 |
| files | scripts/ChangeLog scripts/general/rem.m |
| diffstat | 2 files changed, 8 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog Fri Jul 26 01:47:32 2002 +0000 +++ b/scripts/ChangeLog Fri Jul 26 04:51:03 2002 +0000 @@ -1,11 +1,12 @@ 2002-07-25 John W. Eaton <jwe@bevo.che.wisc.edu> - * plot/loglogerr.m: Likewise. - + * general/mod.m: Use isreal (x), not any (any (imag (x))). + * general/rem.m: Likewise. + + * plot/loglogerr.m: Use varargin instead of old style varargs. + * plot/semilogxerr.m: Likewise. * plot/semilogyerr.m: Likewise. - * plot/semilogxerr.m: Use varargin instead of old style varargs. - 2002-07-25 Teemu Ikonen <tpikonen@pcu.helsinki.fi> * plot/__errcomm__.m: New file. Common functionality for error plots.
--- a/scripts/general/rem.m Fri Jul 26 01:47:32 2002 +0000 +++ b/scripts/general/rem.m Fri Jul 26 04:51:03 2002 +0000 @@ -46,10 +46,10 @@ ## Matlab allows complex arguments, but as far as I can tell, that's a ## bunch of hooey. - if (any (any (imag (x))) || any (any (imag (y)))) + if (isreal (x) && isreal (y)) + r = x - y .* fix (x ./ y); + else error ("rem: complex arguments are not allowed"); endif - r = x - y .* fix (x ./ y); - endfunction