added case where second input of meanf is complex

  updated the header and interface
  added functiosn for the new cases
update INIT_FillSCI2LibCDirs
changing the unit test in order to test the new cases

1 files changed, 4 insertions, 3 deletions

diff --git a/src/c/statisticsFunctions/meanf/zmeanfa.c b/src/c/statisticsFunctions/meanf/zmeanfa.c
index 592111d5..f6691d91 100644
--- a/src/c/statisticsFunctions/meanf/zmeanfa.c
+++ b/src/c/statisticsFunctions/meanf/zmeanfa.c
@@ -12,17 +12,18 @@
 
 #include "meanf.h"
 #include "multiplication.h"
+#include "division.h"
 
 doubleComplex zmeanfa(doubleComplex *in1, int size, doubleComplex *in2 ) {
   doubleComplex accumulate = DoubleComplex(0.0, 0.0);
-  double freAccumulate = 0.0;
+  doubleComplex freAccumulate = DoubleComplex(0.0, 0.0);
   int i = 0;
 
   for (i = 0; i < size; ++i)
     {
       accumulate = zadds(accumulate , zmuls( in1[i] ,in2[i]));
-      freAccumulate += zreals(in2[i]);
+      freAccumulate = zadds(in2[i],freAccumulate);
     }
-  return DoubleComplex(zreals(accumulate) / freAccumulate, zimags(accumulate) /freAccumulate);
+  return zrdivs(accumulate ,freAccumulate);
 }