blob: 95b8de65c2add4c6298ed62827deb6e0e96212e5 [file] [log] [blame]
#include "osqp.h" // OSQP API
#include "osqp_tester.h" // Basic testing script header
#include "unconstrained/data.h"
void test_unconstrained_solve()
{
c_int exitflag;
// Problem settings
OSQPSettings *settings = (OSQPSettings *)c_malloc(sizeof(OSQPSettings));
// Structures
OSQPWorkspace *work; // Workspace
OSQPData *data; // Data
unconstrained_sols_data *sols_data;
// Populate data
data = generate_problem_unconstrained();
sols_data = generate_problem_unconstrained_sols_data();
// Define Solver settings as default
osqp_set_default_settings(settings);
settings->verbose = 1;
// Setup workspace
exitflag = osqp_setup(&work, data, settings);
// Setup correct
mu_assert("Unconstrained test solve: Setup error!", exitflag == 0);
// Solve Problem first time
osqp_solve(work);
// Compare solver statuses
mu_assert("Unconstrained test solve: Error in solver status!",
work->info->status_val == sols_data->status_test);
// Compare primal solutions
mu_assert("Unconstrained test solve: Error in primal solution!",
vec_norm_inf_diff(work->solution->x, sols_data->x_test,
data->n) < TESTS_TOL);
// Compare objective values
mu_assert("Unconstrained test solve: Error in objective value!",
c_absval(work->info->obj_val - sols_data->obj_value_test) <
TESTS_TOL);
// Clean workspace
osqp_cleanup(work);
// Cleanup settings and data
c_free(settings);
clean_problem_unconstrained(data);
clean_problem_unconstrained_sols_data(sols_data);
}