diff options
Diffstat (limited to 'src/auxiliaryFunctions/sign/csigns.c')
-rw-r--r-- | src/auxiliaryFunctions/sign/csigns.c | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/src/auxiliaryFunctions/sign/csigns.c b/src/auxiliaryFunctions/sign/csigns.c index 9590e4bf..218314ab 100644 --- a/src/auxiliaryFunctions/sign/csigns.c +++ b/src/auxiliaryFunctions/sign/csigns.c @@ -1,18 +1,18 @@ /* -** -*- C -*- -** -** csigns.c -** Made by Bruno JOFRET <bruno.jofret@inria.fr> -** -** Started on Fri Sep 7 16:56:47 2007 bruno -** Last update Fri Sep 7 17:29:18 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" +#include "abs.h" -int csigns(floatComplex in) { - /* FIXME : Dummy ...*/ - return -1; +floatComplex csigns(floatComplex in) { + return FloatComplex(creals(in) / cabss(in), cimags(in) / cabss(in)); } |