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

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

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

revision 1174 by johnpye, Mon Jan 15 06:46:44 2007 UTC revision 1175 by johnpye, Thu Jan 18 00:34:22 2007 UTC
# Line 2920  int COI_CALL slv9_conopt_errmsg( int* RO Line 2920  int COI_CALL slv9_conopt_errmsg( int* RO
2920          FPRINTF(ASCERR,"Variable %d (Maybe it's '%s'): ",*COLNO,varname);          FPRINTF(ASCERR,"Variable %d (Maybe it's '%s'): ",*COLNO,varname);
2921          ASC_FREE(varname);          ASC_FREE(varname);
2922      }else if(*COLNO == -1 ){      }else if(*COLNO == -1 ){
2923          FPRINTF(ASCERR,"Relation %d: ",*ROWNO);          FPRINTF(ASCERR,"Relation %d: ",*ROWNO);
2924      }else{      }else{
2925          FPRINTF(ASCERR,"Variable %d (Maybe it's '%s') appearing in relation %d: ",*COLNO,varname,*ROWNO);          FPRINTF(ASCERR,"Variable %d (Maybe it's '%s') appearing in relation %d: ",*COLNO,varname,*ROWNO);
2926          ASC_FREE(varname);          ASC_FREE(varname);
# Line 3118  static void slv9_coipsz(int32 *nintg, in Line 3118  static void slv9_coipsz(int32 *nintg, in
3118      @see conopt.h      @see conopt.h
3119  */  */
3120  static void slv_conopt_iterate(slv9_system_t sys){  static void slv_conopt_iterate(slv9_system_t sys){
   int n;  
3121    
3122    if(sys->con.cntvect == NULL){    if(sys->con.cntvect == NULL){
3123      sys->con.cntvect = ASC_NEW_ARRAY(int,COIDEF_Size());      sys->con.cntvect = ASC_NEW_ARRAY(int,COIDEF_Size());
# Line 3137  static void slv_conopt_iterate(slv9_syst Line 3136  static void slv_conopt_iterate(slv9_syst
3136    COIDEF_NumNZ(sys->con.cntvect, &(sys->con.nz));    COIDEF_NumNZ(sys->con.cntvect, &(sys->con.nz));
3137    COIDEF_NumNlNz(sys->con.cntvect, &(sys->con.nlnz));    COIDEF_NumNlNz(sys->con.cntvect, &(sys->con.nlnz));
3138    COIDEF_OptDir(sys->con.cntvect, &(sys->con.optdir));    COIDEF_OptDir(sys->con.cntvect, &(sys->con.optdir));
3139      
3140    COIDEF_ObjCon(sys->con.cntvect, &(sys->con.objcon)); /* objective will be last row     */    COIDEF_ObjCon(sys->con.cntvect, &(sys->con.objcon)); /* objective will be last row     */
3141    COIDEF_Base(sys->con.cntvect, &(sys->con.base));    COIDEF_Base(sys->con.cntvect, &(sys->con.base));
3142    COIDEF_ErrLim(sys->con.cntvect, &(DOMLIM));    COIDEF_ErrLim(sys->con.cntvect, &(DOMLIM));
# Line 3190  static void slv_conopt_iterate(slv9_syst Line 3189  static void slv_conopt_iterate(slv9_syst
3189    /*    /*
3190     * do not keep model in memory after solution     * do not keep model in memory after solution
3191     */     */
3192    sys->con.kept = 0;        sys->con.kept = 0;
3193    
3194    COI_Solve(sys->con.cntvect);    COI_Solve(sys->con.cntvect);
3195    /* conopt_start(&(sys->con.kept), usrmem, &(sys->con.lwork),    /* conopt_start(&(sys->con.kept), usrmem, &(sys->con.lwork),

Legend:
Removed from v.1174  
changed lines
  Added in v.1175

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