Commit 285229ed authored by Martin A's avatar Martin A
Browse files

scal3D

parent 4d6c9ee0
......@@ -69,3 +69,13 @@ else
error('mshNdvolume.m : unavailable case')
end
end
function [r] = scal3D(X,Y)
% X,Y are Nx3 array containing vector coordinates.
% X and/or Y may be 1x3.
r = X(:,1).*Y(:,1) + X(:,2).*Y(:,2) + X(:,3).*Y(:,3);
end
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment