diff options
-rw-r--r-- | ChangeLog | 23 | ||||
-rw-r--r-- | TODO | 9 | ||||
-rw-r--r-- | src/Makefile | 6 | ||||
-rw-r--r-- | src/auxiliaryFunctions/Makefile | 16 | ||||
-rw-r--r-- | src/auxiliaryFunctions/find/Makefile | 8 | ||||
-rw-r--r-- | src/auxiliaryFunctions/find/cfinda.c | 3 | ||||
-rw-r--r-- | src/auxiliaryFunctions/isempty/Makefile | 43 | ||||
-rw-r--r-- | src/auxiliaryFunctions/isempty/cisEmptya.c | 24 | ||||
-rw-r--r-- | src/auxiliaryFunctions/isempty/disEmptya.c | 23 | ||||
-rw-r--r-- | src/auxiliaryFunctions/isempty/isEmpty.h | 37 | ||||
-rw-r--r-- | src/auxiliaryFunctions/isempty/sisEmptya.c | 23 | ||||
-rw-r--r-- | src/auxiliaryFunctions/isempty/zisEmptya.c | 24 | ||||
-rw-r--r-- | src/elementaryFunctions/Makefile | 6 | ||||
-rw-r--r-- | src/misc/notFound.h (renamed from src/auxiliaryFunctions/find/notFound.h) | 0 | ||||
-rw-r--r-- | src/test/Makefile | 17 | ||||
-rw-r--r-- | src/test/test.c | 13 | ||||
-rw-r--r-- | src/test/test.h | 12 | ||||
-rw-r--r-- | src/test/testCos.c | 40 | ||||
-rw-r--r-- | src/test/testCosh.c | 13 | ||||
-rw-r--r-- | src/test/testExp.c | 13 | ||||
-rw-r--r-- | src/test/testSin.c | 13 | ||||
-rw-r--r-- | src/test/testSinh.c | 13 | ||||
-rw-r--r-- | src/test/testTan.c | 13 | ||||
-rw-r--r-- | src/test/testTanh.c | 40 |
24 files changed, 397 insertions, 35 deletions
@@ -1,3 +1,26 @@ +2007-02-14 Bruno JOFRET <bruno.jofret@inria.fr> + + * src/test/test*.c : + Add some FIXME in order to remember to code some tests. + * src/test/testFind.c : + Testing of the find function. + * src/test/testIsEmpty.c : + Testing of the isEmpty function. + * src/misc : + Create for misc includes. + * src/auxiliaryFunctions/find/notFound.h : + Moved + * src/misc/notFound.h : + Better use here. + * */*/Makefile : + Modify all Makefiles. Remove -pedantic. + Must be crazy to use this... + * src/auxiliaryFunctions/isempty : + IsEmpty functions implementation. + * src/auxiliaryFunctions/isempty/{sdcz}isEmptya.c : + Implementation : s(float) d(double) + c(floatComplex) z(doubleComplex) + 2007-02-13 Bruno JOFRET <bruno.jofret@inria.fr> * src/elementaryFunctions/tanh/ztanhs.c : @@ -5,11 +5,14 @@ ## Made by Bruno JOFRET <bruno.jofret@inria.fr> ## ## Started on Tue Nov 21 15:22:58 2006 jofret -## Last update Tue Feb 13 16:00:07 2007 jofret +## Last update Wed Feb 14 17:39:41 2007 jofret ## ## Copyright INRIA 2006 ## +RN - Define for all the future the C Complex Structure. +BJ + RN - Clearly specify what the "find" function may return BJ Position in array AND/OR Value. @@ -28,4 +31,6 @@ BJ - Listing of atomic call and library dependences. BJ - Bench for precision between F77 and C Math lib. For example : atan2 / log1p -BJ - Bench Encapsulation vs. Direct function call
\ No newline at end of file +BJ - Bench Encapsulation vs. Direct function call + +BJ - Enlarge tests.
\ No newline at end of file diff --git a/src/Makefile b/src/Makefile index 0c16eb4c..8ca80967 100644 --- a/src/Makefile +++ b/src/Makefile @@ -5,7 +5,7 @@ ## Made by Bruno JOFRET <bruno.jofret@inria.fr> ## ## Started on Tue Dec 5 09:19:53 2006 jofret -## Last update Thu Feb 8 11:42:50 2007 jofret +## Last update Wed Feb 14 14:02:27 2007 jofret ## ## Copyright INRIA 2006 ## @@ -20,13 +20,17 @@ all: recure stdc99: @for i in $(DIRS); \ do cd $$i && make STANDARD=-std=c99; \ + result=$$? ; \ cd .. ;\ + if test $$result -ne 0; then exit 1; fi; \ done recure: @for i in $(DIRS); \ do cd $$i && make; \ + result=$$? ; \ cd .. ;\ + if test $$result -ne 0; then exit 1; fi; \ done clean: diff --git a/src/auxiliaryFunctions/Makefile b/src/auxiliaryFunctions/Makefile index c38a45ed..06db4f70 100644 --- a/src/auxiliaryFunctions/Makefile +++ b/src/auxiliaryFunctions/Makefile @@ -5,14 +5,14 @@ ## Made by Bruno JOFRET <bruno.jofret@inria.fr> ## ## Started on Tue Dec 5 09:19:53 2006 jofret -## Last update Tue Feb 13 17:17:02 2007 jofret +## Last update Wed Feb 14 15:40:48 2007 jofret ## ## Copyright INRIA 2006 ## DIRS = sign \ - find #\ - #isempty #\ + find \ + isempty #\ #isnan #\ #rand #\ #size #\ @@ -20,10 +20,20 @@ DIRS = sign \ all: recure +stdc99: + @for i in $(DIRS); \ + do cd $$i && make STANDARD=-std=c99; \ + result=$$? ; \ + cd .. ;\ + if test $$result -ne 0; then exit 1; fi; \ + done + recure: @for i in $(DIRS); \ do cd $$i && make; \ + result=$$? ; \ cd .. ;\ + if test $$result -ne 0; then exit 1; fi; \ done clean: diff --git a/src/auxiliaryFunctions/find/Makefile b/src/auxiliaryFunctions/find/Makefile index 88ec08fc..ab3bb60e 100644 --- a/src/auxiliaryFunctions/find/Makefile +++ b/src/auxiliaryFunctions/find/Makefile @@ -5,7 +5,7 @@ ## Made by Bruno JOFRET <bruno.jofret@inria.fr> ## ## Started on Thu Nov 30 16:33:40 2006 jofret -## Last update Tue Feb 13 15:54:45 2007 jofret +## Last update Wed Feb 14 14:07:02 2007 jofret ## ## Copyright INRIA 2006 ## @@ -14,9 +14,9 @@ NAME = ../../lib/libFind.a RM = rm -f CC = gcc -INCLUDE = ../../type -LINK = ../../lib -CFLAGS = -Werror -Wall -pedantic -ansi -I $(INCLUDE) -L $(LINK) $(STANDARD) +INCLUDE = -I ../../type -I ../../misc +LINK = -L ../../lib +CFLAGS = -Werror -Wall -pedantic -ansi $(INCLUDE) $(LINK) $(STANDARD) AR = ar cru RANLIB = ranlib diff --git a/src/auxiliaryFunctions/find/cfinda.c b/src/auxiliaryFunctions/find/cfinda.c index aa126296..19a9667f 100644 --- a/src/auxiliaryFunctions/find/cfinda.c +++ b/src/auxiliaryFunctions/find/cfinda.c @@ -5,7 +5,7 @@ ** Made by Bruno JOFRET <bruno.jofret@inria.fr> ** ** Started on Tue Feb 13 16:46:42 2007 jofret -** Last update Tue Feb 13 17:15:14 2007 jofret +** Last update Wed Feb 14 17:09:19 2007 jofret ** ** Copyright INRIA 2007 */ @@ -14,5 +14,6 @@ #include "notFound.h" int cfinda(floatComplex* z, int size) { + /* FIXME : Dummy !! */ return NOT_FOUND; } diff --git a/src/auxiliaryFunctions/isempty/Makefile b/src/auxiliaryFunctions/isempty/Makefile new file mode 100644 index 00000000..85aff443 --- /dev/null +++ b/src/auxiliaryFunctions/isempty/Makefile @@ -0,0 +1,43 @@ +## +## -*- makefile -*- +## +## Makefile +## Made by Bruno JOFRET <bruno.jofret@inria.fr> +## +## Started on Thu Nov 30 16:33:40 2006 jofret +## Last update Wed Feb 14 14:38:13 2007 jofret +## +## Copyright INRIA 2006 +## + +NAME = ../../lib/libIsEmpty.a + +RM = rm -f +CC = gcc +INCLUDE = -I ../../type -I ../../misc +LINK = -L ../../lib +CFLAGS = -Werror -Wall -pedantic -ansi $(INCLUDE) $(LINK) $(STANDARD) +AR = ar cru +RANLIB = ranlib + +SRC = sisEmptya.c \ + disEmptya.c \ + cisEmptya.c \ + zisEmptya.c + +HEAD = isEmpty.h +OBJ = $(SRC:.c=.o) + +all: $(NAME) + +$(NAME) : $(HEAD) $(OBJ) + $(AR) $@ $(OBJ) + $(RANLIB) $@ + +clean: + $(RM) $(OBJ) + +distclean: clean + $(RM) $(NAME) + +re: clean all diff --git a/src/auxiliaryFunctions/isempty/cisEmptya.c b/src/auxiliaryFunctions/isempty/cisEmptya.c new file mode 100644 index 00000000..bbaa71ea --- /dev/null +++ b/src/auxiliaryFunctions/isempty/cisEmptya.c @@ -0,0 +1,24 @@ +/* +** -*- C -*- +** +** cisEmptya.c +** Made by Bruno JOFRET <bruno.jofret@inria.fr> +** +** Started on Wed Feb 14 15:33:30 2007 jofret +** Last update Wed Feb 14 15:35:29 2007 jofret +** +** Copyright INRIA 2007 +*/ + +#include <stdbool.h> +#include "notFound.h" +#include "floatComplex.h" + +int cfinda(floatComplex*, int); + +bool cisEmptya(floatComplex* x, int size) { + if (cfinda(x, size) == NOT_FOUND) { + return true; + } + return false; +} diff --git a/src/auxiliaryFunctions/isempty/disEmptya.c b/src/auxiliaryFunctions/isempty/disEmptya.c new file mode 100644 index 00000000..7ffb3a1a --- /dev/null +++ b/src/auxiliaryFunctions/isempty/disEmptya.c @@ -0,0 +1,23 @@ +/* +** -*- C -*- +** +** disEmptya.c +** Made by Bruno JOFRET <bruno.jofret@inria.fr> +** +** Started on Wed Feb 14 15:29:27 2007 jofret +** Last update Wed Feb 14 15:29:54 2007 jofret +** +** Copyright INRIA 2007 +*/ + +#include <stdbool.h> +#include "notFound.h" + +int dfinda(double*, int); + +bool disEmptya(double* x, int size) { + if (dfinda(x, size) == NOT_FOUND) { + return true; + } + return false; +} diff --git a/src/auxiliaryFunctions/isempty/isEmpty.h b/src/auxiliaryFunctions/isempty/isEmpty.h new file mode 100644 index 00000000..40a9ad3e --- /dev/null +++ b/src/auxiliaryFunctions/isempty/isEmpty.h @@ -0,0 +1,37 @@ +/* +** -*- C -*- +** +** find.h +** Made by Bruno JOFRET <bruno.jofret@inria.fr> +** +** Started on Thu Feb 8 10:12:17 2007 jofret +** Last update Wed Feb 14 14:43:53 2007 jofret +** +** Copyright INRIA 2007 +*/ + +#ifndef __IS_EMPTY_H__ +#define __IS_EMPTY_H__ + +#include <bool.h> + +/* +** \brief Float Is Empty function +*/ +bool sisEmptya(float* x, int size); + +/* +** \brief Double Is Empty function +*/ +bool disEmptya(double*x, int size); + +/* +** \brief Float Complex Is Empty function +*/ +bool cisEmptya(floatComplex* z, int size); + +/* +** \brief Double Complex Is Empty function +*/ +bool zisEmptya(doubleComplex* z, int size); +#endif /* !__IS_EMPTY_H__ */ diff --git a/src/auxiliaryFunctions/isempty/sisEmptya.c b/src/auxiliaryFunctions/isempty/sisEmptya.c new file mode 100644 index 00000000..af8a9860 --- /dev/null +++ b/src/auxiliaryFunctions/isempty/sisEmptya.c @@ -0,0 +1,23 @@ +/* +** -*- C -*- +** +** sisEmptya.c +** Made by Bruno JOFRET <bruno.jofret@inria.fr> +** +** Started on Wed Feb 14 14:59:33 2007 jofret +** Last update Wed Feb 14 15:25:32 2007 jofret +** +** Copyright INRIA 2007 +*/ + +#include <stdbool.h> +#include "notFound.h" + +int sfinda(float*, int); + +bool sisEmptya(float* x, int size) { + if (sfinda(x, size) == NOT_FOUND) { + return true; + } + return false; +} diff --git a/src/auxiliaryFunctions/isempty/zisEmptya.c b/src/auxiliaryFunctions/isempty/zisEmptya.c new file mode 100644 index 00000000..02e0ce53 --- /dev/null +++ b/src/auxiliaryFunctions/isempty/zisEmptya.c @@ -0,0 +1,24 @@ +/* +** -*- C -*- +** +** zisEmptya.c +** Made by Bruno JOFRET <bruno.jofret@inria.fr> +** +** Started on Wed Feb 14 15:34:28 2007 jofret +** Last update Wed Feb 14 15:40:02 2007 jofret +** +** Copyright INRIA 2007 +*/ + +#include <stdbool.h> +#include "notFound.h" +#include "doubleComplex.h" + +int zfinda(doubleComplex*, int); + +bool zisEmptya(doubleComplex* x, int size) { + if (zfinda(x, size) == NOT_FOUND) { + return true; + } + return false; +} diff --git a/src/elementaryFunctions/Makefile b/src/elementaryFunctions/Makefile index 73e2c6b6..6d079772 100644 --- a/src/elementaryFunctions/Makefile +++ b/src/elementaryFunctions/Makefile @@ -5,7 +5,7 @@ ## Made by Bruno JOFRET <bruno.jofret@inria.fr> ## ## Started on Tue Dec 5 09:19:53 2006 jofret -## Last update Wed Jan 31 09:22:09 2007 jofret +## Last update Wed Feb 14 14:03:59 2007 jofret ## ## Copyright INRIA 2006 ## @@ -26,13 +26,17 @@ all: recure recure: @for i in $(DIRS); \ do cd $$i && make; \ + result=$$? ; \ cd .. ;\ + if test $$result -ne 0; then exit 1; fi; \ done clean: @for i in $(DIRS); \ do cd $$i && make $@; \ + result=$$? ; \ cd .. ;\ + if test $$result -ne 0; then exit 1; fi; \ done distclean: diff --git a/src/auxiliaryFunctions/find/notFound.h b/src/misc/notFound.h index 59d8c2fe..59d8c2fe 100644 --- a/src/auxiliaryFunctions/find/notFound.h +++ b/src/misc/notFound.h diff --git a/src/test/Makefile b/src/test/Makefile index b9e8e291..f4f1c9c9 100644 --- a/src/test/Makefile +++ b/src/test/Makefile @@ -5,7 +5,7 @@ ## Made by Bruno JOFRET <bruno.jofret@inria.fr> ## ## Started on Thu Nov 30 16:33:40 2006 jofret -## Last update Wed Jan 31 09:27:59 2007 jofret +## Last update Wed Feb 14 16:59:45 2007 jofret ## ## Copyright INRIA 2006 ## @@ -14,15 +14,18 @@ NAME = alltest RM = rm -f CC = gcc -INCLUDE = ../type -LINK = ../lib +INCLUDE = -I ../type -I ../misc +LINK = -L ../lib LIBS = -lm \ -lCos -lCosh \ -lSin -lSinh \ -lTan -lTanh \ - -lExp -CFLAGS = -Werror -Wall -pedantic -ansi -CLFLAGS = -I$(INCLUDE) -L$(LINK) $(LIBS) + -lExp \ + -lFind \ + -lIsEmpty + +CFLAGS = -Werror -Wall -ansi $(INCLUDE) +CLFLAGS = $(LINK) $(LIBS) AR = ar cru RANLIB = ranlib @@ -33,6 +36,8 @@ SRC = testCos.c \ testTan.c \ testTanh.c \ testExp.c \ + testFind.c \ + testIsEmpty.c \ test.c HEAD = test.h diff --git a/src/test/test.c b/src/test/test.c index ecf6e246..4b3805a3 100644 --- a/src/test/test.c +++ b/src/test/test.c @@ -5,7 +5,7 @@ ** Made by Bruno JOFRET <bruno.jofret@inria.fr> ** ** Started on Fri Dec 8 14:53:51 2006 jofret -** Last update Wed Jan 31 09:27:26 2007 jofret +** Last update Wed Feb 14 16:10:20 2007 jofret ** ** Copyright INRIA 2006 */ @@ -22,6 +22,7 @@ int main(int argc, char** argv) { int sinStatus, sinhStatus = 0; int tanStatus, tanhStatus = 0; int expStatus = 0; + int findStatus, isEmptyStatus = 0; printf("-*- -> Begin test sequence <- -*-"); @@ -42,11 +43,19 @@ int main(int argc, char** argv) { /* Test Exponential stuffs */ expStatus = testExp(); + + /* Test Find stuffs */ + findStatus = testFind(); + /* Test IsEmpty stuffs */ + isEmptyStatus = testIsEmpty(); + + printf("-*- -> End test sequence <- -*-"); newline(); return (cosStatus+coshStatus+ sinStatus+sinhStatus+ tanStatus+tanhStatus+ - expStatus); + expStatus+ + findStatus+isEmptyStatus); } diff --git a/src/test/test.h b/src/test/test.h index 475c1ebb..b5734135 100644 --- a/src/test/test.h +++ b/src/test/test.h @@ -5,7 +5,7 @@ ** Made by Bruno JOFRET <bruno.jofret@inria.fr> ** ** Started on Fri Dec 8 15:00:40 2006 jofret -** Last update Wed Jan 31 09:26:21 2007 jofret +** Last update Wed Feb 14 15:49:51 2007 jofret ** ** Copyright INRIA 2006 */ @@ -44,3 +44,13 @@ int testTanh(); ** \brief Exponential Test */ int testExp(); + +/* +** \brief Find Test +*/ +int testFind(); + +/* +** \brief IsEmpty Test +*/ +int testIsEmpty(); diff --git a/src/test/testCos.c b/src/test/testCos.c index f4c024bd..bd7a7668 100644 --- a/src/test/testCos.c +++ b/src/test/testCos.c @@ -5,7 +5,7 @@ ** Made by Bruno JOFRET <bruno.jofret@inria.fr> ** ** Started on Fri Dec 8 15:05:44 2006 jofret -** Last update Mon Dec 11 10:58:24 2006 jofret +** Last update Wed Feb 14 17:37:43 2007 jofret ** ** Copyright INRIA 2006 */ @@ -48,9 +48,45 @@ void dcossTest() { printf("dcoss(-PI/6) = %e\n", dcoss(-PI/6)); } +void ccossTest() { + printf(">> Float Complex scalar\n"); + /* FIXME : Implement some test here ... */ +} + +void zcossTest() { + printf(">> Double Complex scalar\n"); + /* FIXME : Implement some test here ... */ +} + +void scosaTest() { + printf(">> Float array\n"); + /* FIXME : Implement some test here ... */ +} + +void dcosaTest() { + printf(">> Double Array\n"); + /* FIXME : Implement some test here ... */ +} + +void ccosaTest() { + printf(">> Float Complex Array\n"); + /* FIXME : Implement some test here ... */ +} + +void zcosaTest() { + printf(">> Double Complex Array\n"); + /* FIXME : Implement some test here ... */ +} + int testCos() { - printf(">>>> Cosine Tests\n"); + printf("\n>>>> Cosine Tests\n"); scossTest(); dcossTest(); + ccossTest(); + zcossTest(); + scosaTest(); + dcosaTest(); + ccosaTest(); + zcosaTest(); return 0; } diff --git a/src/test/testCosh.c b/src/test/testCosh.c index 0efb9868..dcd9ab1d 100644 --- a/src/test/testCosh.c +++ b/src/test/testCosh.c @@ -5,7 +5,7 @@ ** Made by Bruno JOFRET <bruno.jofret@inria.fr> ** ** Started on Fri Dec 8 15:05:44 2006 jofret -** Last update Mon Jan 29 16:15:15 2007 jofret +** Last update Wed Feb 14 17:36:47 2007 jofret ** ** Copyright INRIA 2006 */ @@ -49,8 +49,17 @@ void dcoshsTest() { } int testCosh() { - printf(">>>> Hyperbolic Cosine Tests\n"); + printf("\n>>>> Hyperbolic Cosine Tests\n"); scoshsTest(); dcoshsTest(); + /* FIXME : Implement some test here ... */ + /* + ccoshsTest(); + zcoshsTest(); + scoshaTest(); + dcoshaTest(); + ccoshaTest(); + zcoshaTest(); + */ return 0; } diff --git a/src/test/testExp.c b/src/test/testExp.c index 8f6c921b..05145832 100644 --- a/src/test/testExp.c +++ b/src/test/testExp.c @@ -5,7 +5,7 @@ ** Made by Bruno JOFRET <bruno.jofret@inria.fr> ** ** Started on Fri Dec 8 15:05:44 2006 jofret -** Last update Wed Jan 31 09:25:30 2007 jofret +** Last update Wed Feb 14 17:35:58 2007 jofret ** ** Copyright INRIA 2006 */ @@ -49,8 +49,17 @@ void dexpsTest() { } int testExp() { - printf(">>>> Exponential Tests\n"); + printf("\n>>>> Exponential Tests\n"); sexpsTest(); dexpsTest(); + /* FIXME : Implement some test here ... */ + /* + cexpsTest(); + zexpsTest(); + sexpaTest(); + dexpaTest(); + cexpaTest(); + zexpaTest(); + */ return 0; } diff --git a/src/test/testSin.c b/src/test/testSin.c index 30a24501..0e95deeb 100644 --- a/src/test/testSin.c +++ b/src/test/testSin.c @@ -5,7 +5,7 @@ ** Made by Bruno JOFRET <bruno.jofret@inria.fr> ** ** Started on Fri Dec 8 15:06:16 2006 jofret -** Last update Mon Dec 11 10:59:39 2006 jofret +** Last update Wed Feb 14 17:31:37 2007 jofret ** ** Copyright INRIA 2006 */ @@ -48,8 +48,17 @@ void dsinsTest() { } int testSin() { - printf(">>>> Sine Tests\n"); + printf("\n>>>> Sine Tests\n"); ssinsTest(); dsinsTest(); + /* FIXME : Implement some test here ... */ + /* + csinsTest(); + zsinsTest(); + ssinaTest(); + dsinaTest(); + csinaTest(); + zsinaTest(); + */ return 0; } diff --git a/src/test/testSinh.c b/src/test/testSinh.c index 22ac851c..24bd655b 100644 --- a/src/test/testSinh.c +++ b/src/test/testSinh.c @@ -5,7 +5,7 @@ ** Made by Bruno JOFRET <bruno.jofret@inria.fr> ** ** Started on Fri Dec 8 15:06:16 2006 jofret -** Last update Mon Jan 29 16:16:59 2007 jofret +** Last update Wed Feb 14 17:26:26 2007 jofret ** ** Copyright INRIA 2006 */ @@ -48,8 +48,17 @@ void dsinhsTest() { } int testSinh() { - printf(">>>> Hyperbolic Sine Tests\n"); + printf("\n>>>> Hyperbolic Sine Tests\n"); ssinhsTest(); dsinhsTest(); + /* FIXME : Implement some test here ... */ + /* + csinhsTest(); + zsinhsTest(); + ssinhaTest(); + dsinhaTest(); + csinhaTest(); + zsinhaTest(); + */ return 0; } diff --git a/src/test/testTan.c b/src/test/testTan.c index 0b1f1c52..3368184d 100644 --- a/src/test/testTan.c +++ b/src/test/testTan.c @@ -5,7 +5,7 @@ ** Made by Bruno JOFRET <bruno.jofret@inria.fr> ** ** Started on Fri Dec 8 15:05:44 2006 jofret -** Last update Mon Jan 29 17:13:12 2007 jofret +** Last update Wed Feb 14 17:25:09 2007 jofret ** ** Copyright INRIA 2006 */ @@ -49,8 +49,17 @@ void dtansTest() { } int testTan() { - printf(">>>> Tangeant Tests\n"); + printf("\n>>>> Tangeant Tests\n"); stansTest(); dtansTest(); + /* FIXME : Implement some test here ... */ + /* + ctansTest(); + ztansTest(); + stanaTest(); + dtanaTest(); + ctanaTest(); + ztanaTest(); + */ return 0; } diff --git a/src/test/testTanh.c b/src/test/testTanh.c index 77c4452e..6ed1810b 100644 --- a/src/test/testTanh.c +++ b/src/test/testTanh.c @@ -5,7 +5,7 @@ ** Made by Bruno JOFRET <bruno.jofret@inria.fr> ** ** Started on Fri Dec 8 15:05:44 2006 jofret -** Last update Mon Jan 29 17:14:52 2007 jofret +** Last update Wed Feb 14 17:17:37 2007 jofret ** ** Copyright INRIA 2006 */ @@ -48,9 +48,45 @@ void dtanhsTest() { printf("dtanhs(-PI/6) = %e\n", dtanhs(-PI/6)); } +void ctanhsTest() { + printf(">> Float Complex scalar\n"); + /* FIXME : Implement some test here ... */ +} + +void ztanhsTest() { + printf(">> Double Complex scalar\n"); + /* FIXME : Implement some test here ... */ +} + +void stanhaTest() { + printf(">> Float array\n"); + /* FIXME : Implement some test here ... */ +} + +void dtanhaTest() { + printf(">> Double array\n"); + /* FIXME : Implement some test here ... */ +} + +void ctanhaTest() { + printf(">> Float Complex array\n"); + /* FIXME : Implement some test here ... */ +} + +void ztanhaTest() { + printf(">> Double Complex array\n"); + /* FIXME : Implement some test here ... */ +} + int testTanh() { - printf(">>>> Hyperbolic Tangeant Tests\n"); + printf("\n>>>> Hyperbolic Tangeant Tests\n"); stanhsTest(); dtanhsTest(); + ctanhsTest(); + ztanhsTest(); + stanhaTest(); + dtanhaTest(); + ctanhaTest(); + ztanhaTest(); return 0; } |