35 for (mh = ckt->CKTheadList; mh !=
NULL; mh = mh->
next) {
37 error = (*func)(ckt,mh->
head);
38 if (error)
return (error);
43 temp = ckt->CKTsols[7];
44 for (i = 7; i > 0; i--) {
45 ckt->CKTsols[i] = ckt->CKTsols[i-1];
47 ckt->CKTsols[0] = temp;
50 for (i = 0; i <= size; i++) {
51 ckt->CKTsols[0][i] = ckt->CKTrhsOld[i];
int CKTaccept(CKTcircuit *ckt)
struct sCKTmodHead * next