function w=kryss(u,v) 
% Cross product
%
% Syntax: w=kryss(u,v) 
%
% Input:   u,v - two 1x3 vectors 
% Output:  w   - a vector
%
% Adams 10.3, Theorem 2

w = [ u(2)*v(3)-u(3)*v(2); u(3)*v(1)-u(1)*v(3); u(1)*v(2)-u(2)*v(1) ];

