--- trunk/ascend4/solver/slv3.c 2004/10/29 20:54:12 1 +++ trunk/ascend4/solver/slv3.c 2004/11/05 21:21:36 2 @@ -3993,6 +3993,19 @@ minor++; +/* 2004.11.5 code by AWW to eliminate runaway minor loop */ + int32 maxMinorIterations; + maxMinorIterations = 30; + if(minor >= maxMinorIterations){ + FPRINTF(stderr,"\nQRSlv: Too many minor iterations. Check variables on bounds.\n"); + sys->s.inconsistent = TRUE; + iteration_ends(sys); + update_status(sys); + return; + } + +/* end of code by AWW */ + if (first) { change_maxstep(sys, MAXDOUBLE); first = FALSE;