diff options
author | jofret | 2008-05-22 09:40:40 +0000 |
---|---|---|
committer | jofret | 2008-05-22 09:40:40 +0000 |
commit | 883693213d04ea4b95c618ae6a258c1566c3ffc6 (patch) | |
tree | ae2015d5109b801f73ca687b1ae01804fc31f304 /src/elementaryFunctions/log10/zlog10s.c | |
parent | 6d2a9845241e1c1b9774165847f2836b9bc81aee (diff) | |
download | scilab2c-883693213d04ea4b95c618ae6a258c1566c3ffc6.tar.gz scilab2c-883693213d04ea4b95c618ae6a258c1566c3ffc6.tar.bz2 scilab2c-883693213d04ea4b95c618ae6a258c1566c3ffc6.zip |
* Update to Scilab Algorithm
* License update
* Need some tests
Diffstat (limited to 'src/elementaryFunctions/log10/zlog10s.c')
-rw-r--r-- | src/elementaryFunctions/log10/zlog10s.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/elementaryFunctions/log10/zlog10s.c b/src/elementaryFunctions/log10/zlog10s.c index 7988b00d..5403162f 100644 --- a/src/elementaryFunctions/log10/zlog10s.c +++ b/src/elementaryFunctions/log10/zlog10s.c @@ -11,8 +11,9 @@ */ #include "log10.h" +#include "log.h" doubleComplex zlog10s(doubleComplex in) { - /* FIXME : Implementation */ - return in; + doubleComplex log_z = zlogs(in); + return DoubleComplex(zreals(log_z) / dlogs(10.0), zimags(log_z) / dlogs(10.0)); } |