diff --git a/src/spicelib/analysis/dctran.c b/src/spicelib/analysis/dctran.c index 6e6a03f77..4170a9a60 100644 --- a/src/spicelib/analysis/dctran.c +++ b/src/spicelib/analysis/dctran.c @@ -229,36 +229,6 @@ DCtran(CKTcircuit *ckt, if(converged != 0) { fprintf(stdout,"\nTransient solution failed -\n"); CKTncDump(ckt); -/* CKTnode *node; - double new, old, tol; - int i=1; - - fprintf(stdout,"\nTransient solution failed -\n\n"); - fprintf(stdout,"Last Node Voltages\n"); - fprintf(stdout,"------------------\n\n"); - fprintf(stdout,"%-30s %20s %20s\n", "Node", "Last Voltage", - "Previous Iter"); - fprintf(stdout,"%-30s %20s %20s\n", "----", "------------", - "-------------"); - for(node=ckt->CKTnodes->next;node;node=node->next) { - if (strstr(node->name, "#branch") || !strchr(node->name, '#')) { - new = ckt->CKTrhsOld [i] ; - old = ckt->CKTrhs [i] ; - fprintf(stdout,"%-30s %20g %20g", node->name, new, old); - if(node->type == SP_VOLTAGE) { - tol = ckt->CKTreltol * (MAX(fabs(old),fabs(new))) + - ckt->CKTvoltTol; - } else { - tol = ckt->CKTreltol * (MAX(fabs(old),fabs(new))) + - ckt->CKTabstol; - } - if (fabs(new-old) >tol ) { - fprintf(stdout," *"); - } - fprintf(stdout,"\n"); - } - i++; - } */ fprintf(stdout,"\n"); fflush(stdout); } else if (!ft_noacctprint && !ft_noinitprint) {