Mercurial > octave-nkf

comparison scripts/linear-algebra/cross.m @ 10549:95c3e38098bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Untabify .m scripts
author Rik <code@nomad.inbox5.com>
date Fri, 23 Apr 2010 11:28:50 -0700
parents cac3b4e5035b
children 1740012184f9
comparison
equal deleted inserted replaced
10548:479536c5bb10 10549:95c3e38098bf
40 ## Author: Kurt Hornik <Kurt.Hornik@wu-wien.ac.at> 40 ## Author: Kurt Hornik <Kurt.Hornik@wu-wien.ac.at>
41 ## Created: 15 October 1994 41 ## Created: 15 October 1994
42 ## Adapted-By: jwe 42 ## Adapted-By: jwe
43 43
44 function z = cross (x, y, dim) 44 function z = cross (x, y, dim)
45 45
46 if (nargin != 2 && nargin != 3) 46 if (nargin != 2 && nargin != 3)
47 print_usage (); 47 print_usage ();
48 endif 48 endif
49 49
50 if (ndims (x) < 3 && ndims (y) < 3 && nargin < 3) 50 if (ndims (x) < 3 && ndims (y) < 3 && nargin < 3)