Adding Automated tests.

4 files changed, 351 insertions, 11 deletions

diff --git a/src/elementaryFunctions/cos/Makefile.am b/src/elementaryFunctions/cos/Makefile.am
index dbb69da6..28eb3a0a 100644
--- a/src/elementaryFunctions/cos/Makefile.am
+++ b/src/elementaryFunctions/cos/Makefile.am
@@ -5,7 +5,7 @@
 ## Made by  Bruno JOFRET <bruno.jofret@inria.fr>
 ##
 ## Started on  Fri Jan  5 10:19:16 2007 jofret
-## Last update Sun Mar 25 21:01:28 2007 bruno
+## Last update Wed Apr 18 16:42:18 2007 jofret
 ##
 ## Copyright INRIA 2007
 ##
@@ -31,3 +31,27 @@ SRC	=	scoss.c \
 		zcosa.c
 
 HEAD	=	../includes/cos.h
+
+####
+# Checking Part
+####
+
+check_INCLUDES	=	-I $(top_builddir)/elementaryFunctions/includes \
+			-I $(top_builddir)/type
+
+check_PROGRAMS	= 	testCos
+
+TESTS		=	testCos
+
+#
+# -*- Cosine Tests -*-
+#
+testCos_SOURCES = 	testCos.c
+testCos_CFLAGS	=	$(check_INCLUDES)
+testCos_LDADD	=	$(top_builddir)/lib/libDoubleComplex.a \
+			$(top_builddir)/lib/libFloatComplex.a \
+			$(top_builddir)/lib/libCos.a \
+			$(top_builddir)/lib/libSin.a \
+			$(top_builddir)/lib/libCosh.a \
+			$(top_builddir)/lib/libSinh.a \
+			@LIBMATH@
diff --git a/src/elementaryFunctions/cos/Makefile.in b/src/elementaryFunctions/cos/Makefile.in
index 04571dff..51dca305 100644
--- a/src/elementaryFunctions/cos/Makefile.in
+++ b/src/elementaryFunctions/cos/Makefile.in
@@ -36,6 +36,7 @@ PRE_UNINSTALL = :
 POST_UNINSTALL = :
 build_triplet = @build@
 host_triplet = @host@
+check_PROGRAMS = testCos$(EXEEXT)
 subdir = elementaryFunctions/cos
 DIST_COMMON = $(srcdir)/Makefile.am $(srcdir)/Makefile.in
 ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
@@ -65,6 +66,12 @@ am__objects_2 = scoss.$(OBJEXT) dcoss.$(OBJEXT) ccoss.$(OBJEXT) \
 	ccosa.$(OBJEXT) zcosa.$(OBJEXT)
 am_libCos_a_OBJECTS = $(am__objects_1) $(am__objects_2)
 libCos_a_OBJECTS = $(am_libCos_a_OBJECTS)
+am_testCos_OBJECTS = testCos-testCos.$(OBJEXT)
+testCos_OBJECTS = $(am_testCos_OBJECTS)
+testCos_DEPENDENCIES = $(top_builddir)/lib/libDoubleComplex.a \
+	$(top_builddir)/lib/libFloatComplex.a \
+	$(top_builddir)/lib/libCos.a $(top_builddir)/lib/libSin.a \
+	$(top_builddir)/lib/libCosh.a $(top_builddir)/lib/libSinh.a
 DEFAULT_INCLUDES = -I. -I$(srcdir) -I$(top_builddir)/includes
 depcomp = $(SHELL) $(top_srcdir)/config/depcomp
 am__depfiles_maybe = depfiles
@@ -72,8 +79,8 @@ COMPILE = $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) \
 	$(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS)
 CCLD = $(CC)
 LINK = $(CCLD) $(AM_CFLAGS) $(CFLAGS) $(AM_LDFLAGS) $(LDFLAGS) -o $@
-SOURCES = $(libCos_a_SOURCES)
-DIST_SOURCES = $(libCos_a_SOURCES)
+SOURCES = $(libCos_a_SOURCES) $(testCos_SOURCES)
+DIST_SOURCES = $(libCos_a_SOURCES) $(testCos_SOURCES)
 ETAGS = etags
 CTAGS = ctags
 DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
@@ -189,6 +196,28 @@ SRC = scoss.c \
 		zcosa.c
 
 HEAD = ../includes/cos.h
+
+####
+# Checking Part
+####
+check_INCLUDES = -I $(top_builddir)/elementaryFunctions/includes \
+			-I $(top_builddir)/type
+
+TESTS = testCos
+
+#
+# -*- Cosine Tests -*-
+#
+testCos_SOURCES = testCos.c
+testCos_CFLAGS = $(check_INCLUDES)
+testCos_LDADD = $(top_builddir)/lib/libDoubleComplex.a \
+			$(top_builddir)/lib/libFloatComplex.a \
+			$(top_builddir)/lib/libCos.a \
+			$(top_builddir)/lib/libSin.a \
+			$(top_builddir)/lib/libCosh.a \
+			$(top_builddir)/lib/libSinh.a \
+			@LIBMATH@
+
 all: all-am
 
 .SUFFIXES:
@@ -259,6 +288,12 @@ libCos.a: $(libCos_a_OBJECTS) $(libCos_a_DEPENDENCIES)
 	$(libCos_a_AR) libCos.a $(libCos_a_OBJECTS) $(libCos_a_LIBADD)
 	$(RANLIB) libCos.a
 
+clean-checkPROGRAMS:
+	-test -z "$(check_PROGRAMS)" || rm -f $(check_PROGRAMS)
+testCos$(EXEEXT): $(testCos_OBJECTS) $(testCos_DEPENDENCIES) 
+	@rm -f testCos$(EXEEXT)
+	$(LINK) $(testCos_LDFLAGS) $(testCos_OBJECTS) $(testCos_LDADD) $(LIBS)
+
 mostlyclean-compile:
 	-rm -f *.$(OBJEXT)
 
@@ -271,6 +306,7 @@ distclean-compile:
 @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/dcoss.Po@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/scosa.Po@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/scoss.Po@am__quote@
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/testCos-testCos.Po@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/zcosa.Po@am__quote@
 @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/zcoss.Po@am__quote@
 
@@ -287,6 +323,20 @@ distclean-compile:
 @AMDEP_TRUE@@am__fastdepCC_FALSE@	source='$<' object='$@' libtool=no @AMDEPBACKSLASH@
 @AMDEP_TRUE@@am__fastdepCC_FALSE@	DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
 @am__fastdepCC_FALSE@	$(COMPILE) -c `$(CYGPATH_W) '$<'`
+
+testCos-testCos.o: testCos.c
+@am__fastdepCC_TRUE@	if $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(testCos_CFLAGS) $(CFLAGS) -MT testCos-testCos.o -MD -MP -MF "$(DEPDIR)/testCos-testCos.Tpo" -c -o testCos-testCos.o `test -f 'testCos.c' || echo '$(srcdir)/'`testCos.c; \
+@am__fastdepCC_TRUE@	then mv -f "$(DEPDIR)/testCos-testCos.Tpo" "$(DEPDIR)/testCos-testCos.Po"; else rm -f "$(DEPDIR)/testCos-testCos.Tpo"; exit 1; fi
+@AMDEP_TRUE@@am__fastdepCC_FALSE@	source='testCos.c' object='testCos-testCos.o' libtool=no @AMDEPBACKSLASH@
+@AMDEP_TRUE@@am__fastdepCC_FALSE@	DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
+@am__fastdepCC_FALSE@	$(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(testCos_CFLAGS) $(CFLAGS) -c -o testCos-testCos.o `test -f 'testCos.c' || echo '$(srcdir)/'`testCos.c
+
+testCos-testCos.obj: testCos.c
+@am__fastdepCC_TRUE@	if $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(testCos_CFLAGS) $(CFLAGS) -MT testCos-testCos.obj -MD -MP -MF "$(DEPDIR)/testCos-testCos.Tpo" -c -o testCos-testCos.obj `if test -f 'testCos.c'; then $(CYGPATH_W) 'testCos.c'; else $(CYGPATH_W) '$(srcdir)/testCos.c'; fi`; \
+@am__fastdepCC_TRUE@	then mv -f "$(DEPDIR)/testCos-testCos.Tpo" "$(DEPDIR)/testCos-testCos.Po"; else rm -f "$(DEPDIR)/testCos-testCos.Tpo"; exit 1; fi
+@AMDEP_TRUE@@am__fastdepCC_FALSE@	source='testCos.c' object='testCos-testCos.obj' libtool=no @AMDEPBACKSLASH@
+@AMDEP_TRUE@@am__fastdepCC_FALSE@	DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
+@am__fastdepCC_FALSE@	$(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(testCos_CFLAGS) $(CFLAGS) -c -o testCos-testCos.obj `if test -f 'testCos.c'; then $(CYGPATH_W) 'testCos.c'; else $(CYGPATH_W) '$(srcdir)/testCos.c'; fi`
 uninstall-info-am:
 
 ID: $(HEADERS) $(SOURCES) $(LISP) $(TAGS_FILES)
@@ -337,6 +387,79 @@ GTAGS:
 distclean-tags:
 	-rm -f TAGS ID GTAGS GRTAGS GSYMS GPATH tags
 
+check-TESTS: $(TESTS)
+	@failed=0; all=0; xfail=0; xpass=0; skip=0; \
+	srcdir=$(srcdir); export srcdir; \
+	list='$(TESTS)'; \
+	if test -n "$$list"; then \
+	  for tst in $$list; do \
+	    if test -f ./$$tst; then dir=./; \
+	    elif test -f $$tst; then dir=; \
+	    else dir="$(srcdir)/"; fi; \
+	    if $(TESTS_ENVIRONMENT) $${dir}$$tst; then \
+	      all=`expr $$all + 1`; \
+	      case " $(XFAIL_TESTS) " in \
+	      *" $$tst "*) \
+		xpass=`expr $$xpass + 1`; \
+		failed=`expr $$failed + 1`; \
+		echo "XPASS: $$tst"; \
+	      ;; \
+	      *) \
+		echo "PASS: $$tst"; \
+	      ;; \
+	      esac; \
+	    elif test $$? -ne 77; then \
+	      all=`expr $$all + 1`; \
+	      case " $(XFAIL_TESTS) " in \
+	      *" $$tst "*) \
+		xfail=`expr $$xfail + 1`; \
+		echo "XFAIL: $$tst"; \
+	      ;; \
+	      *) \
+		failed=`expr $$failed + 1`; \
+		echo "FAIL: $$tst"; \
+	      ;; \
+	      esac; \
+	    else \
+	      skip=`expr $$skip + 1`; \
+	      echo "SKIP: $$tst"; \
+	    fi; \
+	  done; \
+	  if test "$$failed" -eq 0; then \
+	    if test "$$xfail" -eq 0; then \
+	      banner="All $$all tests passed"; \
+	    else \
+	      banner="All $$all tests behaved as expected ($$xfail expected failures)"; \
+	    fi; \
+	  else \
+	    if test "$$xpass" -eq 0; then \
+	      banner="$$failed of $$all tests failed"; \
+	    else \
+	      banner="$$failed of $$all tests did not behave as expected ($$xpass unexpected passes)"; \
+	    fi; \
+	  fi; \
+	  dashes="$$banner"; \
+	  skipped=""; \
+	  if test "$$skip" -ne 0; then \
+	    skipped="($$skip tests were not run)"; \
+	    test `echo "$$skipped" | wc -c` -le `echo "$$banner" | wc -c` || \
+	      dashes="$$skipped"; \
+	  fi; \
+	  report=""; \
+	  if test "$$failed" -ne 0 && test -n "$(PACKAGE_BUGREPORT)"; then \
+	    report="Please report to $(PACKAGE_BUGREPORT)"; \
+	    test `echo "$$report" | wc -c` -le `echo "$$banner" | wc -c` || \
+	      dashes="$$report"; \
+	  fi; \
+	  dashes=`echo "$$dashes" | sed s/./=/g`; \
+	  echo "$$dashes"; \
+	  echo "$$banner"; \
+	  test -z "$$skipped" || echo "$$skipped"; \
+	  test -z "$$report" || echo "$$report"; \
+	  echo "$$dashes"; \
+	  test "$$failed" -eq 0; \
+	else :; fi
+
 distdir: $(DISTFILES)
 	@srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`; \
 	topsrcdirstrip=`echo "$(top_srcdir)" | sed 's|.|.|g'`; \
@@ -365,6 +488,8 @@ distdir: $(DISTFILES)
 	  fi; \
 	done
 check-am: all-am
+	$(MAKE) $(AM_MAKEFLAGS) $(check_PROGRAMS)
+	$(MAKE) $(AM_MAKEFLAGS) check-TESTS
 check: check-am
 all-am: Makefile $(LIBRARIES)
 installdirs:
@@ -397,8 +522,8 @@ maintainer-clean-generic:
 	@echo "it deletes files that may require special tools to rebuild."
 clean: clean-am
 
-clean-am: clean-generic clean-instLIBRARIES clean-noinstLIBRARIES \
-	mostlyclean-am
+clean-am: clean-checkPROGRAMS clean-generic clean-instLIBRARIES \
+	clean-noinstLIBRARIES mostlyclean-am
 
 distclean: distclean-am
 	-rm -rf ./$(DEPDIR)
@@ -445,12 +570,13 @@ ps-am:
 
 uninstall-am: uninstall-info-am uninstall-instLIBRARIES
 
-.PHONY: CTAGS GTAGS all all-am check check-am clean clean-generic \
-	clean-instLIBRARIES clean-noinstLIBRARIES ctags distclean \
-	distclean-compile distclean-generic distclean-tags distdir dvi \
-	dvi-am html html-am info info-am install install-am \
-	install-data install-data-am install-exec install-exec-am \
-	install-info install-info-am install-instLIBRARIES install-man \
+.PHONY: CTAGS GTAGS all all-am check check-TESTS check-am clean \
+	clean-checkPROGRAMS clean-generic clean-instLIBRARIES \
+	clean-noinstLIBRARIES ctags distclean distclean-compile \
+	distclean-generic distclean-tags distdir dvi dvi-am html \
+	html-am info info-am install install-am install-data \
+	install-data-am install-exec install-exec-am install-info \
+	install-info-am install-instLIBRARIES install-man \
 	install-strip installcheck installcheck-am installdirs \
 	maintainer-clean maintainer-clean-generic mostlyclean \
 	mostlyclean-compile mostlyclean-generic pdf pdf-am ps ps-am \
diff --git a/src/elementaryFunctions/cos/testCos.c b/src/elementaryFunctions/cos/testCos.c
new file mode 100644
index 00000000..3059567e
--- /dev/null
+++ b/src/elementaryFunctions/cos/testCos.c
@@ -0,0 +1,150 @@
+/*
+**  -*- C -*-
+**
+** testCos.c
+** Made by  Bruno JOFRET <bruno.jofret@inria.fr>
+**
+** Started on  Fri Dec  8 15:05:44 2006 jofret
+** Last update Fri Mar 30 11:12:04 2007 jofret
+**
+** Copyright INRIA 2006
+*/
+
+#include "testCos.h"
+
+void scossTest(void) {
+  printf(">> Float scalar\n");
+  printf("scoss(0) = %f\n", scoss((float) 0));
+  printf("scoss(PI) = %f\n", scoss(PI));
+  printf("scoss(PI/2) = %f\n", scoss(PI/2));
+  printf("scoss(PI/3) = %f\n", scoss(PI/3));
+  printf("scoss(PI/4) = %f\n", scoss(PI/4));
+  printf("scoss(PI/6) = %f\n", scoss(PI/6));
+  printf("scoss(-PI) = %f\n", scoss(-PI));
+  printf("scoss(-PI/2) = %f\n", scoss(-PI/2));
+  printf("scoss(-PI/3) = %f\n", scoss(-PI/3));
+  printf("scoss(-PI/4) = %f\n", scoss(-PI/4));
+  printf("scoss(-PI/6) = %f\n", scoss(-PI/6));
+}
+
+void dcossTest(void) {
+  printf(">> Double scalar\n");
+  printf("dcoss(0) = %e\n", dcoss((double) 0));
+  printf("dcoss(PI) = %e\n", dcoss(PI));
+  printf("dcoss(PI/2) = %e\n", dcoss(PI/2));
+  printf("dcoss(PI/3) = %e\n", dcoss(PI/3));
+  printf("dcoss(PI/4) = %e\n", dcoss(PI/4));
+  printf("dcoss(PI/6) = %e\n", dcoss(PI/6));
+  printf("dcoss(-PI) = %e\n", dcoss(-PI));
+  printf("dcoss(-PI/2) = %e\n", dcoss(-PI/2));
+  printf("dcoss(-PI/3) = %e\n", dcoss(-PI/3));
+  printf("dcoss(-PI/4) = %e\n", dcoss(-PI/4));
+  printf("dcoss(-PI/6) = %e\n", dcoss(-PI/6));
+}
+
+void ccossTest(void) {
+  floatComplex pi_pi = FloatComplex(PI, PI);
+  floatComplex pi_2_pi_2 = FloatComplex(PI/2, PI/2);
+  floatComplex pi_2_pi_3 = FloatComplex(PI/2, PI/3);
+  floatComplex pi_2_pi_4 = FloatComplex(PI/2, PI/4);
+  floatComplex out;
+
+  printf(">> Float Complex scalar\n");
+  out = ccoss(pi_pi);
+  printf("ccoss(PI + I*PI) = %f + I * %f\n", creals(out), cimags(out));
+  out = ccoss(pi_2_pi_2);
+  printf("ccoss(PI/2 + I*PI/2) = %f + I * %f\n", creals(out), cimags(out));
+  out = ccoss(pi_2_pi_3);
+  printf("ccoss(PI/2 + I*PI/3) = %f + I * %f\n", creals(out), cimags(out));
+  out = ccoss(pi_2_pi_4);
+  printf("ccoss(PI/2 + I*PI/4) = %f + I * %f\n", creals(out), cimags(out));
+}
+
+void zcossTest(void) {
+  doubleComplex pi_pi = DoubleComplex(PI, PI);
+  doubleComplex pi_2_pi_2 = DoubleComplex(PI/2, PI/2);
+  doubleComplex pi_2_pi_3 = DoubleComplex(PI/2, PI/3);
+  doubleComplex pi_2_pi_4 = DoubleComplex(PI/2, PI/4);
+  doubleComplex out;
+
+  printf(">> Double Complex scalar\n");
+  out = zcoss(pi_pi);
+  printf("zcoss(PI + I*PI) = %e + I * %e\n", zreals(out), zimags(out));
+  out = zcoss(pi_2_pi_2);
+  printf("zcoss(PI/2 + I*PI/2) = %e + I * %e\n", zreals(out), zimags(out));
+  out = zcoss(pi_2_pi_3);
+  printf("zcoss(PI/2 + I*PI/3) = %e + I * %e\n", zreals(out), zimags(out));
+  out = zcoss(pi_2_pi_4);
+  printf("zcoss(PI/2 + I*PI/4) = %e + I * %e\n", zreals(out), zimags(out));
+}
+
+void scosaTest(void) {
+  float out[5];
+  float in[5] = {PI, PI/2, PI/3, PI/4, PI/6};
+  int i = 0;
+
+  printf(">> Float array\n");
+  scosa(in, out, 5);
+  for (i = 0 ; i < 5 ; ++i)
+    printf("scosa(array) = %f\n", out[i]);
+}
+
+void dcosaTest(void) {
+  double out[5];
+  double in[5] = {PI, PI/2, PI/3, PI/4, PI/6};
+  int i = 0;
+
+  printf(">> Double Array\n");
+  dcosa(in, out, 5);
+  for (i = 0 ; i < 5 ; ++i)
+    printf("scosa(array) = %f\n", out[i]);
+
+}
+
+void ccosaTest(void) {
+  floatComplex pi_pi = FloatComplex(PI, PI);
+  floatComplex pi_2_pi_2 = FloatComplex(PI/2, PI/2);
+  floatComplex pi_2_pi_3 = FloatComplex(PI/2, PI/3);
+  floatComplex pi_2_pi_4 = FloatComplex(PI/2, PI/4);
+  floatComplex in[4] = {pi_pi, pi_2_pi_2, pi_2_pi_3, pi_2_pi_4};
+  floatComplex out[4];
+  int i = 0;
+
+  ccosa(in, out, 4);
+  printf(">> Float Complex Array\n");
+  for (i = 0 ; i < 4 ; ++i)
+    printf("ccosa(array) = %e + I * %e\n", creals(out[i]), cimags(out[i]));
+}
+
+void zcosaTest(void) {
+  doubleComplex pi_pi = DoubleComplex(PI, PI);
+  doubleComplex pi_2_pi_2 = DoubleComplex(PI/2, PI/2);
+  doubleComplex pi_2_pi_3 = DoubleComplex(PI/2, PI/3);
+  doubleComplex pi_2_pi_4 = DoubleComplex(PI/2, PI/4);
+  doubleComplex in[4] = {pi_pi, pi_2_pi_2, pi_2_pi_3, pi_2_pi_4 };
+  doubleComplex out[4];
+  int i = 0;
+
+  zcosa(in, out, 4);
+  printf(">> Double Complex Array\n");
+  for (i = 0 ; i < 4 ; ++i)
+    printf("zcosa(array) = %e + I * %e\n", zreals(out[i]), zimags(out[i]));
+}
+
+int testCos(void) {
+  printf("\n>>>> Cosine Tests\n");
+  scossTest();
+  dcossTest();
+  ccossTest();
+  zcossTest();
+  scosaTest();
+  dcosaTest();
+  ccosaTest();
+  zcosaTest();
+  return 0;
+}
+
+int main(void) {
+  assert(testCos() == 0);
+  return 0;
+}
diff --git a/src/elementaryFunctions/cos/testCos.h b/src/elementaryFunctions/cos/testCos.h
new file mode 100644
index 00000000..41a9373c
--- /dev/null
+++ b/src/elementaryFunctions/cos/testCos.h
@@ -0,0 +1,40 @@
+/*
+**  -*- C -*-
+**
+** testCos.h
+** Made by  Bruno JOFRET <bruno.jofret@inria.fr>
+**
+** Started on  Mon Mar 26 16:33:11 2007 jofret
+** Last update Fri Mar 30 12:04:25 2007 jofret
+**
+** Copyright INRIA 2007
+*/
+
+#ifndef _TESTCOS_H_
+#define _TESTCOS_H_
+
+#include <stdio.h>
+#include <assert.h>
+#include "cos.h"
+#include "constant.h"
+
+
+void scossTest(void);
+
+void dcossTest(void);
+
+void ccossTest(void);
+
+void zcossTest(void);
+
+void scosaTest(void);
+
+void dcosaTest(void);
+
+void ccosaTest(void);
+
+void zcosaTest(void);
+
+int testCos(void);
+
+#endif /* ! _TESTCOS_H_ */