summaryrefslogtreecommitdiff
path: root/src/c/signalProcessing/crossCorr/ccrossCorra.c
diff options
context:
space:
mode:
authorjofret2009-04-28 06:57:25 +0000
committerjofret2009-04-28 06:57:25 +0000
commit5bb72c97b02e1cea0dbf008ec16029491956f971 (patch)
treea3b38e2ad33af5514091e67f57e8a60e0fe0cef3 /src/c/signalProcessing/crossCorr/ccrossCorra.c
parent5868a7f86c42335cdad7252ea55117acf7bafe83 (diff)
downloadscilab2c-5bb72c97b02e1cea0dbf008ec16029491956f971.tar.gz
scilab2c-5bb72c97b02e1cea0dbf008ec16029491956f971.tar.bz2
scilab2c-5bb72c97b02e1cea0dbf008ec16029491956f971.zip
Moving source code
Diffstat (limited to 'src/c/signalProcessing/crossCorr/ccrossCorra.c')
-rw-r--r--src/c/signalProcessing/crossCorr/ccrossCorra.c33
1 files changed, 33 insertions, 0 deletions
diff --git a/src/c/signalProcessing/crossCorr/ccrossCorra.c b/src/c/signalProcessing/crossCorr/ccrossCorra.c
new file mode 100644
index 00000000..53656f60
--- /dev/null
+++ b/src/c/signalProcessing/crossCorr/ccrossCorra.c
@@ -0,0 +1,33 @@
+
+/*
+ * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+ * Copyright (C) 2008 - INRIA - Arnaud TORSET
+ *
+ * This file must be used under the terms of the CeCILL.
+ * This source file is licensed as described in the file COPYING, which
+ * you should have received as part of this distribution. The terms
+ * are also available at
+ * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+ *
+ */
+
+#include <malloc.h>
+#include "crossCorr.h"
+#include "conv2d.h"
+#include "conj.h"
+
+void ccrossCorra(floatComplex* in1, int rows1, int cols1, floatComplex* in2, int rows2, int cols2, floatComplex* out){
+ floatComplex *in2Copy;
+ int i;
+
+ in2Copy=(floatComplex *)malloc((unsigned int)rows2*sizeof(floatComplex));
+
+ /* We change in2 to be in appropriate form in in2Copy*/
+ for (i=0;i<(rows2*cols2);i++) in2Copy[i]=cconjs(in2[rows2*cols2-1-i]);
+
+ cconv2da(in1, rows1, cols1, in2Copy, rows2, cols2, out);
+
+ free(in2Copy);
+}
+
+