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

PTpower

This commit is contained in:
rlar 2016-12-21 21:16:37 +01:00 committed by Holger Vogt
parent 6ef2a5f81b
commit 611596c916
1 changed files with 1 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -70,14 +70,7 @@ PTdivide(double arg1, double arg2)
double double
PTpower(double arg1, double arg2) PTpower(double arg1, double arg2)
{ {
if (arg1 < 0.0) { return pow(fabs(arg1), arg2);
if (fabs(arg2 - ((int) arg2)) / (arg2 + 0.001) < 0.000001) {
arg2 = (int) arg2;
} else {
arg1 = -arg1;
}
}
return (pow(arg1, arg2));
} }
double double