/[ascend]/trunk/ascend4/solver/slv3.c
ViewVC logotype

Diff of /trunk/ascend4/solver/slv3.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1 by aw0a, Fri Oct 29 20:54:12 2004 UTC revision 2 by aw0a, Fri Nov 5 21:21:36 2004 UTC
# Line 3993  static void slv3_iterate(slv_system_t se Line 3993  static void slv3_iterate(slv_system_t se
3993    
3994      minor++;      minor++;
3995    
3996    /* 2004.11.5 code by AWW to eliminate runaway minor loop */
3997        int32 maxMinorIterations;
3998        maxMinorIterations = 30;
3999        if(minor >= maxMinorIterations){
4000          FPRINTF(stderr,"\nQRSlv: Too many minor iterations. Check variables on bounds.\n");
4001          sys->s.inconsistent = TRUE;
4002          iteration_ends(sys);
4003          update_status(sys);
4004          return;
4005        }
4006    
4007    /* end of code by AWW */
4008    
4009      if (first) {      if (first) {
4010        change_maxstep(sys, MAXDOUBLE);        change_maxstep(sys, MAXDOUBLE);
4011        first = FALSE;        first = FALSE;
Legend:
Removed from v.1  
changed lines
  Added in v.2
john.pye@anu.edu.au
 ViewVC Help
Powered by ViewVC 1.1.22