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

The derivative of pow shall use the new pow function as well, 

when compat mode LT is selected.
This commit is contained in:
Holger Vogt 2022-10-14 14:54:30 +02:00
parent 01c4a5dff2
commit e2defea752
1 changed files with 16 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/spicelib/parser/inpptree.c
View File

@ -331,12 +331,22 @@ static INPparseNode *PTdifferentiate(INPparseNode * p, int varnum)
#define b p->right #define b p->right
if (b->type == PT_CONSTANT) { if (b->type == PT_CONSTANT) {
arg1 = PTdifferentiate(a, varnum); arg1 = PTdifferentiate(a, varnum);
newp = mkb(PT_TIMES, if (newcompat.lt) {
mkb(PT_TIMES, newp = mkb(PT_TIMES,
mkcon(b->constant), mkb(PT_TIMES,
mkf(PTF_PWR, mkcon(b->constant),
mkb(PT_COMMA, a, mkcon(b->constant - 1.0)))), mkf(PTF_POW,
arg1); mkb(PT_COMMA, a, mkcon(b->constant - 1.0)))),
arg1);
}
else {
newp = mkb(PT_TIMES,
mkb(PT_TIMES,
mkcon(b->constant),
mkf(PTF_PWR,
mkb(PT_COMMA, a, mkcon(b->constant - 1.0)))),
arg1);
}
} }
else if (a->type == PT_CONSTANT){ else if (a->type == PT_CONSTANT){
arg2 = PTdifferentiate(b, varnum); arg2 = PTdifferentiate(b, varnum);