diff options
| author | torset | 2009-02-06 15:29:37 +0000 |
|---|---|---|
| committer | torset | 2009-02-06 15:29:37 +0000 |
| commit | 3b7fb4f8f46426d83bbc9040bc85b6ea90f065d6 (patch) | |
| tree | 13d5eac2f04170080232f2ea066e288f0a2dce70 /src/auxiliaryFunctions/sign | |
| parent | c03dd49c9d48be64cf1ed0b986f8d1a0aeb57ca7 (diff) | |
| download | scilab2c-3b7fb4f8f46426d83bbc9040bc85b6ea90f065d6.tar.gz scilab2c-3b7fb4f8f46426d83bbc9040bc85b6ea90f065d6.tar.bz2 scilab2c-3b7fb4f8f46426d83bbc9040bc85b6ea90f065d6.zip | |
Add and modify sign files
Diffstat (limited to 'src/auxiliaryFunctions/sign')
| -rw-r--r-- | src/auxiliaryFunctions/sign/csigns.c | 1 | ||||
| -rw-r--r-- | src/auxiliaryFunctions/sign/zsigns.c | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/src/auxiliaryFunctions/sign/csigns.c b/src/auxiliaryFunctions/sign/csigns.c index 218314ab..b054046f 100644 --- a/src/auxiliaryFunctions/sign/csigns.c +++ b/src/auxiliaryFunctions/sign/csigns.c @@ -14,5 +14,6 @@ #include "abs.h" floatComplex csigns(floatComplex in) { + if ( (creals(in)==0) && (cimags(in)==0) ) return FloatComplex(0,0); return FloatComplex(creals(in) / cabss(in), cimags(in) / cabss(in)); } diff --git a/src/auxiliaryFunctions/sign/zsigns.c b/src/auxiliaryFunctions/sign/zsigns.c index 397cc33a..a4fed8d4 100644 --- a/src/auxiliaryFunctions/sign/zsigns.c +++ b/src/auxiliaryFunctions/sign/zsigns.c @@ -14,5 +14,6 @@ #include "abs.h" doubleComplex zsigns(doubleComplex in) { + if ( (zreals(in)==0) && (zimags(in)==0) ) return DoubleComplex(0,0); return DoubleComplex(zreals(in) / zabss(in), zimags(in) / zabss(in)); } |