diff options
author | jofret | 2009-04-28 06:52:28 +0000 |
---|---|---|
committer | jofret | 2009-04-28 06:52:28 +0000 |
commit | 127ac18608c72acfed9d59599252ad62cb562ee5 (patch) | |
tree | efb7e9416342cd3758bf623710c46d2d4cdb5df4 /src/auxiliaryFunctions/abs/testDoubleAbs.c | |
parent | c1abfc271612a255d4491f2e0220bace5fdf11d2 (diff) | |
download | scilab2c-127ac18608c72acfed9d59599252ad62cb562ee5.tar.gz scilab2c-127ac18608c72acfed9d59599252ad62cb562ee5.tar.bz2 scilab2c-127ac18608c72acfed9d59599252ad62cb562ee5.zip |
Moving source code
Diffstat (limited to 'src/auxiliaryFunctions/abs/testDoubleAbs.c')
-rw-r--r-- | src/auxiliaryFunctions/abs/testDoubleAbs.c | 93 |
1 files changed, 0 insertions, 93 deletions
diff --git a/src/auxiliaryFunctions/abs/testDoubleAbs.c b/src/auxiliaryFunctions/abs/testDoubleAbs.c deleted file mode 100644 index c096692e..00000000 --- a/src/auxiliaryFunctions/abs/testDoubleAbs.c +++ /dev/null @@ -1,93 +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 "testAbs.h" - -int dabssTest() { - double value1 = -123456.789; - double value2 = 987654.321; - printf(">> Doubles \n"); - assert(dabss(value1) == -value1); - assert(dabss(value2) == value2); - assert(dabss(0) == 0); - assert(dabss(-1) == 1); - assert(dabss(1) == 1); - return 0; -} - -int zabssTest() { - doubleComplex value1 = DoubleComplex(4,3); - printf(">> Double Complex \n"); - assert(zabss(value1) == 5); - return 0; -} - -int dabsaTest() { - double value1 = -123456.789; - double value2 = 987654.321; - double value3 = 0; - double in[3]; - double out[3]; - - in[0] = value1; - in[1] = value2; - in[2] = value3; - - printf(">> Doubles Array\n"); - dabsa(in, 3, out); - assert(out[0] == -value1); - assert(out[1] == value2); - assert(out[2] == value3); - assert(out[2] == 0); - return 0; -} - -int zabsaTest() { - doubleComplex in[4]; - double out[4]; - - in[0] = DoubleComplex(4,3); - in[1] = DoubleComplex(-4,3); - in[2] = DoubleComplex(4,-3); - in[3] = DoubleComplex(-4,-3); - - printf(">> Double Complex Array\n"); - zabsa(in, 4, out); - assert(out[0] == 5); - assert(out[1] == 5); - assert(out[2] == 5); - assert(out[3] == 5); - return 0; -} - -int testAbs() { - int dabssStatus = 0; - int zabssStatus = 0; - int dabsaStatus = 0; - int zabsaStatus = 0; - - printf(">>>> Abs Tests\n"); - dabssStatus = dabssTest(); - zabssStatus = zabssTest(); - dabsaStatus = dabsaTest(); - zabsaStatus = zabsaTest(); - - return (dabssStatus + - zabssStatus+ - dabsaStatus + - zabsaStatus); -} - -int main(void) { - assert(testAbs() == 0); - return 0; -} |