Browse Source

Don't do optran, if command optran is not given.

pre-master-46
Holger Vogt 5 years ago
parent
commit
7f1fdd3934
  1. 7
      src/spicelib/analysis/optran.c

7
src/spicelib/analysis/optran.c

@ -45,6 +45,7 @@ static int OPbreakSize;
static double opfinaltime = 1e-6;
static double opstepsize = 1e-8;
static double opramptime = 0.;
static bool nooptran = TRUE;
/* command to set the 6 optran flags
CKTnoOpIter (default 0, set by 'option noopiter')
@ -68,6 +69,7 @@ void com_optran(wordlist* wl) {
fprintf(cp_err, "Error: no circuit loaded\n");
return;
}
nooptran = FALSE;
/* wordlist with 6 parameters */
optrancom = strtol(wltmp->wl_word, &stpstr, 10);
if ((errno == ERANGE) || (*stpstr != '\0'))
@ -240,6 +242,11 @@ OPtran(CKTcircuit *ckt)
#if defined SHARED_MODULE
int redostep;
#endif
/* if optran command has not been given (in .spiceinit or in .control section,
we don' use optran */
if (nooptran)
return 1;
/*
ACAN *acjob = (ACAN *) ckt->CKTcurJob;
TRANan *trjob = (TRANan *) ckt->CKTcurJob;

Loading…
Cancel
Save