4 files changed, 71 insertions, 5 deletions
diff --git a/src/test/Makefile b/src/test/Makefile
index 951a1272..b9e8e291 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 Mon Jan 29 17:17:19 2007 jofret
+## Last update Wed Jan 31 09:27:59 2007 jofret
 ##
 ## Copyright INRIA 2006
 ##
@@ -19,7 +19,8 @@ LINK	=	../lib
 LIBS	=	-lm \
 		-lCos -lCosh \
 		-lSin -lSinh \
-		-lTan -lTanh
+		-lTan -lTanh \
+		-lExp
 CFLAGS	=	-Werror -Wall -pedantic -ansi
 CLFLAGS	=	-I$(INCLUDE) -L$(LINK) $(LIBS)
 AR	=	ar cru
@@ -31,6 +32,7 @@ SRC	=	testCos.c \
 		testSinh.c \
 		testTan.c \
 		testTanh.c \
+		testExp.c \
 		test.c
 
 HEAD	=	test.h
diff --git a/src/test/test.c b/src/test/test.c
index ffeeeb2a..ecf6e246 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 Mon Jan 29 17:24:07 2007 jofret
+** Last update Wed Jan 31 09:27:26 2007 jofret
 **
 ** Copyright INRIA 2006
 */
@@ -21,6 +21,7 @@ int main(int argc, char** argv) {
   int cosStatus, coshStatus = 0;
   int sinStatus, sinhStatus = 0;
   int tanStatus, tanhStatus = 0;
+  int expStatus = 0;
 
 
   printf("-*- -> Begin test sequence <- -*-");
@@ -38,11 +39,14 @@ int main(int argc, char** argv) {
   tanStatus = testTan();
   /* Test Hyperbolic Tangeant stuffs */
   tanhStatus = testTanh();
+  /* Test Exponential stuffs */
+  expStatus = testExp();
 
   printf("-*- -> End test sequence <- -*-");
   newline();
 
   return (cosStatus+coshStatus+
 	  sinStatus+sinhStatus+
-	  tanStatus+tanhStatus);
+	  tanStatus+tanhStatus+
+	  expStatus);
 }
diff --git a/src/test/test.h b/src/test/test.h
index 3b0d3e09..475c1ebb 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 Mon Jan 29 17:16:36 2007 jofret
+** Last update Wed Jan 31 09:26:21 2007 jofret
 **
 ** Copyright INRIA 2006
 */
@@ -40,3 +40,7 @@ int testTan();
 */
 int testTanh();
 
+/*
+** \brief Exponential Test
+*/
+int testExp();
diff --git a/src/test/testExp.c b/src/test/testExp.c
new file mode 100644
index 00000000..8f6c921b
--- /dev/null
+++ b/src/test/testExp.c
@@ -0,0 +1,56 @@
+/*
+**  -*- C -*-
+**
+** testExp.c
+** 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
+**
+** Copyright INRIA 2006
+*/
+
+#include <stdio.h>
+
+#define PI 3.1415826535
+
+float sexps(float);
+double dexps(double);
+
+
+void sexpsTest() {
+  printf(">> Float scalar\n");
+  printf("sexps(0) = %f\n", sexps((float) 0));
+  printf("sexps(PI) = %f\n", sexps(PI));
+  printf("sexps(PI/2) = %f\n", sexps(PI/2));
+  printf("sexps(PI/3) = %f\n", sexps(PI/3));
+  printf("sexps(PI/4) = %f\n", sexps(PI/4));
+  printf("sexps(PI/6) = %f\n", sexps(PI/6));
+  printf("sexps(-PI) = %f\n", sexps(-PI));
+  printf("sexps(-PI/2) = %f\n", sexps(-PI/2));
+  printf("sexps(-PI/3) = %f\n", sexps(-PI/3));
+  printf("sexps(-PI/4) = %f\n", sexps(-PI/4));
+  printf("sexps(-PI/6) = %f\n", sexps(-PI/6));
+}
+
+void dexpsTest() {
+  printf(">> Double scalar\n");
+  printf("dexps(0) = %e\n", dexps((double) 0));
+  printf("dexps(PI) = %e\n", dexps(PI));
+  printf("dexps(PI/2) = %e\n", dexps(PI/2));
+  printf("dexps(PI/3) = %e\n", dexps(PI/3));
+  printf("dexps(PI/4) = %e\n", dexps(PI/4));
+  printf("dexps(PI/6) = %e\n", dexps(PI/6));
+  printf("dexps(-PI) = %e\n", dexps(-PI));
+  printf("dexps(-PI/2) = %e\n", dexps(-PI/2));
+  printf("dexps(-PI/3) = %e\n", dexps(-PI/3));
+  printf("dexps(-PI/4) = %e\n", dexps(-PI/4));
+  printf("dexps(-PI/6) = %e\n", dexps(-PI/6));
+}
+
+int testExp() {
+  printf(">>>> Exponential Tests\n");
+  sexpsTest();
+  dexpsTest();
+  return 0;
+}