blob: ab4d55b56faf99317065814709c5b63ab1f85b91 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
// 09.10.0
function Out=Crossprod(a,b)
if length(a)==3
Tmp1=a(2)*b(3)-a(3)*b(2);
Tmp2=a(3)*b(1)-a(1)*b(3);
Tmp3=a(1)*b(2)-a(2)*b(1);
Out=[Tmp1,Tmp2,Tmp3];
else
Out=a(1)*b(2)-a(2)*b(1);
end;
endfunction
|