diff options
Diffstat (limited to 'src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpa.c')
-rw-r--r-- | src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpa.c | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpa.c b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpa.c new file mode 100644 index 00000000..037d89e5 --- /dev/null +++ b/src/Scilab2C/Scilab2C/CFiles/sci2ccode/dexpa.c @@ -0,0 +1,20 @@ +/* +** -*- C -*- +** +** dexpa.c +** Made by Bruno JOFRET <bruno.jofret@inria.fr> +** +** Started on Thu Dec 7 14:54:56 2006 jofret +** Last update Mon Oct 22 09:53:15 2007 bruno +** +** Copyright INRIA 2006 +*/ + +#include "exp.h" + +void dexpa(double* x, int size, double* y) { + int i = 0; + for (i = 0; i < size; ++i) { + y[i] = dexps(x[i]); + } +} |