Function change_cost

IntegerProgramming/IP_algorithms.cc:3364–3989

int change_cost(INPUT_FILE GROEBNER, INPUT_FILE NEW_COST,
                const int& version,
                const int& S_pair_criteria,
                const float& interred_percentage,
                const BOOLEAN& verbose)
{

  char format_string[128];
  int elimination_variables;
  int weighted_variables;
  char elimination_refinement[128];
  char weighted_refinement[128];
  int new_variables;
  char algorithm[128];
  long old_size;

  ifstream old(GROEBNER);
  ifstream _new(NEW_COST);

  // verify existence of files

  if(!old)
  {
    cerr<<"ERROR: int change_cost(INPUT_FILE, INPUT_FILE):\n"
      "cannot read from first input file, possibly not found"<<endl;
    return 0;
  }

  if(!_new)
  {
    cerr<<"ERROR: int change_cost(INPUT_FILE, INPUT_FILE):\n"
      "cannot read from second input file, possibly not found"<<endl;
    return 0;
  }


// read first part of GROEBNER file (until term ordering reached)

  // read format specification

  old>>format_string;

  if(!old)
  {
    cerr<<"ERROR: int change_cost(INPUT_FILE, INPUT_FILE):\n"
      "input failure when reading format specification of first input file,\n"
      "input format not accepted"<<endl;
    return 0;
  }

  if(strcmp(format_string,"GROEBNER"))
  {
    cerr<<"WARNING: int change_cost(INPUT_FILE, INPUT_FILE):\n"
      "first input file has suspicious format"<<endl;
  }

  // read algorithm