Mercurial > octave-antonio

diff scripts/special-matrix/pascal.m @ 13907:755f6b340453

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
pascal.m: Use in-place assignment operator for faster negation * pascal.m: Use in-place assignment operator for faster negation
author Rik <octave@nomad.inbox5.com>
date Tue, 22 Nov 2011 08:41:45 -0800
parents 1c06f3713e0a
children 72c96de7a403
line wrap: on
line diff
--- a/scripts/special-matrix/pascal.m	Tue Nov 22 04:23:02 2011 -0500
+++ b/scripts/special-matrix/pascal.m	Tue Nov 22 08:41:45 2011 -0800
@@ -66,7 +66,7 @@
   elseif (t == 2)
     retval = rot90 (retval, 3);
     if (rem (n,2) != 1)
-      retval = -retval;
+      retval *= -1;
     endif
   endif