luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix abs(-0), which shall evaluate to +0

This commit is contained in:
rlar 2016-06-13 19:41:17 +02:00
parent 8f44e9da44
commit 4d95360a68
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/include/ngspice/complex.h
View File

@ -69,7 +69,7 @@ typedef struct {
#endif #endif
/* Some defines used mainly in cmath.c. */ /* Some defines used mainly in cmath.c. */
#define FTEcabs(d) (((d) < 0.0) ? - (d) : (d)) #define FTEcabs(d) fabs(d)
#define cph(c) (atan2(imagpart(c), (realpart(c)))) #define cph(c) (atan2(imagpart(c), (realpart(c))))
#define cmag(c) (hypot(realpart(c), imagpart(c))) #define cmag(c) (hypot(realpart(c), imagpart(c)))
#define radtodeg(c) (cx_degrees ? ((c) / 3.14159265358979323846 * 180) : (c)) #define radtodeg(c) (cx_degrees ? ((c) / 3.14159265358979323846 * 180) : (c))

2
src/spicelib/parser/ptfuncs.c
View File

@ -25,7 +25,7 @@ double PTfudge_factor;
double double
PTabs(double arg) PTabs(double arg)
{ {
return arg >= 0.0 ? arg : -arg; return fabs(arg);
} }
double double