set stepsize

This commit is contained in:
Holger Vogt 2020-05-24 15:20:34 +02:00
parent ab6224767b
commit fd36eb552f
1 changed files with 4 additions and 2 deletions

View File

@ -223,7 +223,7 @@ OPtran(CKTcircuit *ckt)
int type = ckt->CKTcurJob->JOBtype; int type = ckt->CKTcurJob->JOBtype;
SPfrontEnd->IFerrorf(ERR_INFO, "Transient op started"); SPfrontEnd->IFerrorf(ERR_INFO, "Transient op started");
#if 0
/* Set the final time */ /* Set the final time */
/* If we are in transient simulation */ /* If we are in transient simulation */
if (type == 4 && ckt->CKTstep > 0.) if (type == 4 && ckt->CKTstep > 0.)
@ -238,7 +238,9 @@ OPtran(CKTcircuit *ckt)
opfinaltime = 0.1 / nojob->NstartFreq; opfinaltime = 0.1 / nojob->NstartFreq;
ckt->CKTstep = opfinaltime / 1000.; ckt->CKTstep = opfinaltime / 1000.;
} }
#else
ckt->CKTstep = opstepsize;
#endif
delta=MIN(opfinaltime/100,ckt->CKTstep)/10; delta=MIN(opfinaltime/100,ckt->CKTstep)/10;
/* begin LTRA code addition */ /* begin LTRA code addition */