/[ascend]/trunk/base/generic/solver/slv_common.c
ViewVC logotype

Diff of /trunk/base/generic/solver/slv_common.c

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

revision 61 by jds, Mon Nov 14 02:37:20 2005 UTC revision 86 by johnpye, Wed Dec 7 04:38:54 2005 UTC
# Line 643  int slv_direct_solve(slv_system_t server Line 643  int slv_direct_solve(slv_system_t server
643    }    }
644    if (nsolns<0 && allsolns>0 && fp !=NULL) {    if (nsolns<0 && allsolns>0 && fp !=NULL) {
645     /* dump the rejected solutions to give the user a clue */     /* dump the rejected solutions to give the user a clue */
646      FPRINTF(fp,"Ignoring potential solutions for variable\n");      error_reporter_start(ASC_PROG_WARNING,NULL,0);
647        FPRINTF(fp,"Ignoring potential solutions for variable '");
648      var_write_name(server,var,fp);      var_write_name(server,var,fp);
649      FPRINTF(fp,"\nin equation\n");      FPRINTF(fp,"' in equation '");
650      rel_write_name(server,rel,fp);      rel_write_name(server,rel,fp);
651      FPRINTF(fp,"\n");      FPRINTF(fp,"'");
652        error_reporter_end_flush();
653    
654      for (--allsolns; allsolns >= 0; allsolns--)  {      for (--allsolns; allsolns >= 0; allsolns--)  {
655        FPRINTF(fp,"Rejected solution: %.18g\n",slist[allsolns]);        FPRINTF(fp,"Rejected solution: %.18g\n",slist[allsolns]);
656      }      }

Legend:
Removed from v.61  
changed lines
  Added in v.86

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22