diff options
Diffstat (limited to 'src/auxiliaryFunctions/find/sfinda.c')
-rw-r--r-- | src/auxiliaryFunctions/find/sfinda.c | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/src/auxiliaryFunctions/find/sfinda.c b/src/auxiliaryFunctions/find/sfinda.c deleted file mode 100644 index 6a23a9dd..00000000 --- a/src/auxiliaryFunctions/find/sfinda.c +++ /dev/null @@ -1,32 +0,0 @@ -/* - * 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 "find.h" - -void sfinda(float* x, int size, float* out, int *indiceOut) { - int i = 0; - - indiceOut[1]=0; - - /* if out is empty */ - out[0]=-1; - - - for (i = 0; i < size ; ++i) { - if (x[i] != 0) { - out[indiceOut[1]] = (float)(i+1); - indiceOut[1]++; - } - } -} - - |