cdot.m

JLAB is a set of Matlab functions I have written or co-written over the past fifteen years for the p

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));