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

Fix the CUDA flag for ISRC model

This commit is contained in:
Francesco Lannutti 2018-04-15 23:47:21 +02:00
parent 2c7a5e7fc5
commit 750cc1e7fd
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/spicelib/devices/isrc/isrcsetup.c
View File

@ -17,7 +17,7 @@ ISRCsetup (SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *state)
ISRCmodel *model = (ISRCmodel *)inModel ;
ISRCinstance *here ;
int i, j, k, status ;
int i, j, status ;
NG_IGNORE(matrix) ;
NG_IGNORE(ckt) ;
@ -35,6 +35,9 @@ ISRCsetup (SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *state)
/* How many instances we have */
model->n_instances = i ;
/* This model supports CUDA */
model->gen.has_cuda = 1 ;
}
/* loop through all the current source models */
@ -42,23 +45,23 @@ ISRCsetup (SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *state)
{
model->offsetRHS = ckt->total_n_valuesRHS ;
k = 0 ;
j = 0 ;
/* loop through all the instances of the model */
for (here = ISRCinstances(model); here != NULL ; here = ISRCnextInstance(here))
{
/* For the RHS */
if (here->ISRCposNode != 0)
k++ ;
j++ ;
if (here->ISRCnegNode != 0)
k++ ;
j++ ;
}
model->n_valuesRHS = model->n_instances;
ckt->total_n_valuesRHS += model->n_valuesRHS ;
model->n_PtrRHS = k ;
model->n_PtrRHS = j ;
ckt->total_n_PtrRHS += model->n_PtrRHS ;