v_dot.m

来自「三维涡流计算」· M 代码 · 共 6 行

function c=v_dot(a,b);
c=zeros(size(a));
c(1,:)=a(1,:).*b(1,:)+a(2,:).*b(2,:)+a(3,:).*b(3,:);
c(2,:)=c(1,:);c(3,:)=c(1,:);