summaryrefslogtreecommitdiff
path: root/src/auxiliaryFunctions/sign/dsigna.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/auxiliaryFunctions/sign/dsigna.c')
-rw-r--r--src/auxiliaryFunctions/sign/dsigna.c27
1 files changed, 12 insertions, 15 deletions
diff --git a/src/auxiliaryFunctions/sign/dsigna.c b/src/auxiliaryFunctions/sign/dsigna.c
index b72bbb9c..49e66144 100644
--- a/src/auxiliaryFunctions/sign/dsigna.c
+++ b/src/auxiliaryFunctions/sign/dsigna.c
@@ -1,25 +1,22 @@
/*
-** -*- C -*-
-**
-** dsigna.c
-** Made by Bruno JOFRET <bruno.jofret@inria.fr>
-**
-** Started on Fri Sep 7 17:35:44 2007 bruno
-** Last update Fri Sep 7 17:36:15 2007 bruno
-**
-** Copyright INRIA 2007
-*/
+ * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+ * Copyright (C) 2007-2008 - INRIA - Bruno JOFRET
+ *
+ * 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 "sign.h"
-int dsigna(double *in, int size) {
+void dsigna(double *in, int size, double *out) {
int i = 0;
- int sign = 1;
- /* FIXME : Does it what it's supposed to do ? */
for (i = 0 ; i < size ; ++i) {
- sign = sign * dsigns(in[i]);
+ out[i] = dsigns(in[i]);
}
- return sign;
}