8 #include "km3_toa_utils.hpp" 
   13 void vectorMultiply(complex_type* _vectorSrcA, complex_type* _vectorSrcB, complex_type* _vectorDest, 
size_t _length)
 
   33         real_type a_real, b_real, a_imag, b_imag;
 
   35         for(
unsigned int k = 0; 
k < _length; 
k++) {
 
   36                 a_real = _vectorSrcA[
k][0];
 
   37                 a_imag = _vectorSrcA[
k][1];
 
   38                 b_real = _vectorSrcB[
k][0];
 
   39                 b_imag = _vectorSrcB[
k][1];
 
   41                 k1 = a_real*(b_real+b_imag);
 
   42                 k2 = b_imag*(a_real+a_imag);
 
   43                 k3 = b_real*(a_imag-a_real);
 
   45                 _vectorDest[
k][0] = k1-k2;
 
   46                 _vectorDest[
k][1] = k1+k3;
 
*fatal Wrong number of arguments esac JCookie sh JRuns D $DETECTOR d sort n k
 
void vectorMultiply(complex_type *_vectorSrcA, complex_type *_vectorSrcB, complex_type *_vectorDest, size_t _length)