Mercurial > hg > octave-lyh

diff scripts/linear-algebra/cross.m @ 6157:045038e0108a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-11-13 22:22:53 by jwe]
author jwe
date Mon, 13 Nov 2006 22:22:54 +0000
parents 34f96dd5441b
children 93c65f2a5668
line wrap: on
line diff
--- a/scripts/linear-algebra/cross.m
+++ b/scripts/linear-algebra/cross.m
@@ -80,7 +80,7 @@
   idx2(dim) = 2;
   idx3(dim) = 3;
 
-  if (size (x) == size (y))
+  if (size_equal (x, y))
     z = cat (dim, 
 	     (x(idx2{:}) .* y(idx3{:}) - x(idx3{:}) .* y(idx2{:})),
              (x(idx3{:}) .* y(idx1{:}) - x(idx1{:}) .* y(idx3{:})),