summaryrefslogtreecommitdiff
path: root/src/elementaryFunctions/tan/dtana.c
diff options
context:
space:
mode:
authorjofret2007-01-29 17:02:35 +0000
committerjofret2007-01-29 17:02:35 +0000
commit170334ed9128da4a2f916d88ba52db0988e1d119 (patch)
treeb73d501433e15e52e04a6e6237b2e552e8da5da9 /src/elementaryFunctions/tan/dtana.c
parentc24d5795ea30345dee4cb5f308de7021ba0ef00b (diff)
downloadscilab2c-170334ed9128da4a2f916d88ba52db0988e1d119.tar.gz
scilab2c-170334ed9128da4a2f916d88ba52db0988e1d119.tar.bz2
scilab2c-170334ed9128da4a2f916d88ba52db0988e1d119.zip
Need to have a clear answer about STDC99 for complex implementation !
Add som tests.
Diffstat (limited to 'src/elementaryFunctions/tan/dtana.c')
-rw-r--r--src/elementaryFunctions/tan/dtana.c20
1 files changed, 20 insertions, 0 deletions
diff --git a/src/elementaryFunctions/tan/dtana.c b/src/elementaryFunctions/tan/dtana.c
new file mode 100644
index 00000000..42e85490
--- /dev/null
+++ b/src/elementaryFunctions/tan/dtana.c
@@ -0,0 +1,20 @@
+/*
+** -*- C -*-
+**
+** dtana.c
+** Made by Bruno JOFRET <bruno.jofret@inria.fr>
+**
+** Started on Thu Dec 7 14:54:56 2006 jofret
+** Last update Mon Jan 29 16:12:12 2007 jofret
+**
+** Copyright INRIA 2006
+*/
+
+double dtans(double);
+
+void dtana(double* x, int strideX, double* y, int strideY, int size) {
+ int i = 0;
+ for (i = 0; i < size; ++i) {
+ y[i] = dtans(x[i]);
+ }
+}