Fix the clear phase of Matrix and RHS once for all
This commit is contained in:
parent
791861d849
commit
7a0a3abba9
|
|
@ -53,11 +53,9 @@ CKTload(CKTcircuit *ckt)
|
||||||
int status ;
|
int status ;
|
||||||
alpha = 1.0 ;
|
alpha = 1.0 ;
|
||||||
beta = 0.0 ;
|
beta = 0.0 ;
|
||||||
#else
|
|
||||||
int size ;
|
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
int i;
|
int i, size;
|
||||||
double startTime;
|
double startTime;
|
||||||
CKTnode *node;
|
CKTnode *node;
|
||||||
int error;
|
int error;
|
||||||
|
|
@ -81,13 +79,13 @@ CKTload(CKTcircuit *ckt)
|
||||||
status = cuCKTflush (ckt) ;
|
status = cuCKTflush (ckt) ;
|
||||||
if (status != 0)
|
if (status != 0)
|
||||||
return (E_NOMEM) ;
|
return (E_NOMEM) ;
|
||||||
#else
|
#endif
|
||||||
|
|
||||||
size = SMPmatSize (ckt->CKTmatrix) ;
|
size = SMPmatSize (ckt->CKTmatrix) ;
|
||||||
for (i = 0 ; i <= size ; i++)
|
for (i = 0 ; i <= size ; i++)
|
||||||
*(ckt->CKTrhs + i) = 0 ;
|
*(ckt->CKTrhs + i) = 0 ;
|
||||||
|
|
||||||
SMPclear (ckt->CKTmatrix) ;
|
SMPclear (ckt->CKTmatrix) ;
|
||||||
#endif
|
|
||||||
|
|
||||||
#ifdef STEPDEBUG
|
#ifdef STEPDEBUG
|
||||||
noncon = ckt->CKTnoncon;
|
noncon = ckt->CKTnoncon;
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue