/usr/share/freemat/toolbox/geom/cross.m is in freemat-data 4.0-5build1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | % CROSS CROSS Cross Product of Two Vectors
%
% Usage
%
% Computes the cross product of two vectors. The general syntax
% for its use is
%
% c = cross(a,b)
%
% where a and b are 3-element vectors.
% Copyright (c) 2002-2007 Samit Basu
% Licensed under the GPL
function C = cross(A,B)
C(1) = A(2)*B(3) - A(3)*B(2);
C(2) = - A(1)*B(3) + A(3)*B(1);
C(3) = A(1)*B(2) - A(2)*B(1);
|