22 files changed, 367 insertions, 33 deletions
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;
 }