Logo Search packages:      
Sourcecode: octave-nurbs version File versions  Download package

veccross.m

function cross = veccross(vec1,vec2)
% 
% VECCROSS: The cross product of two vectors.
% 
% Calling Sequence:
% 
%   cross = veccross(vec1,vec2);
% 
% Parameters:
% 
%   vec1    : An array of column vectors represented by a matrix of
%   vec2    size (dim,nv), where is the dimension of the vector and
%           nv the number of vectors.
% 
%   cross   : Array of column vectors, each element is corresponding
%           to the cross product of the respective components in vec1
%           and vec2.
% 
% Description:
% 
%   Cross product of two vectors.
% 
% Examples:
% 
%   Determine the cross products of:
%   (2.3,3.4,5.6) and (1.2,4.5,1.2)
%   (5.1,0.0,2.3) and (2.5,3.2,4.0)
% 
%   cross = veccross([2.3 5.1; 3.4 0.0; 5.6 2.3],);

%  D.M. Spink
%  Copyright (c) 2000.

if size(vec1,1) == 2
  % 2D vector
  cross = zeros(size(vec1));
  cross(3,:) = vec1(1,:).*vec2(2,:)-vec1(2,:).*vec2(1,:);
else
  % 3D vector
  cross = ;
end


Generated by  Doxygen 1.6.0   Back to index