[BACK]Return to ox_cdd.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / ox_cdd

Diff for /OpenXM/src/ox_cdd/ox_cdd.c between version 1.2 and 1.3

version 1.2, 2007/09/12 07:07:36 version 1.3, 2007/09/15 06:31:59
Line 1 
Line 1 
 /*      $OpenXM: OpenXM/src/ox_cdd/ox_cdd.c,v 1.1 2005/05/25 04:42:20 noro Exp $        */  /*      $OpenXM: OpenXM/src/ox_cdd/ox_cdd.c,v 1.2 2007/09/12 07:07:36 noro Exp $        */
   
 #include <stdio.h>  #include <stdio.h>
 #include <stdlib.h>  #include <stdlib.h>
Line 278  void my_redcheck(void)
Line 278  void my_redcheck(void)
         push( matrix2cmo(result,result_row,col) );          push( matrix2cmo(result,result_row,col) );
 }  }
   
   cmo_qq* new_cmo_qq_set_mpq(mpq_ptr q);
   
 void my_lpsolve( int resulttype, int index )  void my_lpsolve( int resulttype, int index )
 {  {
         int row,col;          int row,col;
Line 384  void my_lpsolve( int resulttype, int index )
Line 386  void my_lpsolve( int resulttype, int index )
   
         if( index == LP_INTPT ) {          if( index == LP_INTPT ) {
                 tmp = lpintpt(row, col, matrix);                  tmp = lpintpt(row, col, matrix);
                 if ( tmp )                  if ( tmp ) {
                         cmoint = vector2cmo(tmp,col);                          cmoint = (cmo *)new_cmo_list();
                 else                          for(j=0;j < col;j++){
                                   if( tmp[j] != 0 ){
   #if defined GMPRATIONAL
                                           a = (cmo*) new_cmo_qq_set_mpq( (mpq_ptr)tmp[j] );
   #else
                                           a = (cmo*) new_cmo_double( *tmp[j] );
   #endif
                                   } else {
                                           a = (cmo*) new_cmo_zero();
                                   }
                                   cmoint = (cmo *)list_append( (cmo_list *) cmoint, a );
                           }
                   } else
                         cmoint = new_cmo_zero();                          cmoint = new_cmo_zero();
   #if defined GMPRATIONAL
                 for ( i = 0; i < col; i++ )                  for ( i = 0; i < col; i++ )
                         mpq_clear( (mpq_ptr)tmp[i] );                          mpq_clear( (mpq_ptr)tmp[i] );
   #endif
         }          }
   
         if( index == LP_MAX ){          if( index == LP_MAX ){
Line 435  int sm_executeFunction()
Line 451  int sm_executeFunction()
         } else if( strcmp( func->s, "lpmaxmin" ) == 0 ){          } else if( strcmp( func->s, "lpmaxmin" ) == 0 ){
                 my_lpsolve(LP_Q,LP_MAXMIN);                  my_lpsolve(LP_Q,LP_MAXMIN);
                 return 0;                  return 0;
 #if defined GMPRATIONAL  
         } else if( strcmp( func->s, "intpt" ) == 0 ){          } else if( strcmp( func->s, "intpt" ) == 0 ){
                 my_lpsolve(LP_Q,LP_INTPT);                  my_lpsolve(LP_Q,LP_INTPT);
                 return 0;                  return 0;
 #endif  
         } else if( strcmp( func->s, "debugprint" ) == 0 ){          } else if( strcmp( func->s, "debugprint" ) == 0 ){
                 pop();                  pop();
                 debug_print = get_i();                  debug_print = get_i();
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>