cdot.m

来自「JLAB is a set of Matlab functions I have」· M 代码 · 共 8 行

function[x]=cdot(a,b)
% CDOT   Dot product.   X=CDOT(A,B) <==> X=REAL(A.*CONJ(B));
%   _________________________________________________________________
%   This is part of JLAB --- type 'help jlab' for more information 
%   (C) 2000, 2004 J.M. Lilly --- type 'help jlab_license' for details
  
x=real(a.*conj(b));