Blame integration/set_initial.c

Packit 67cb25
static inline
Packit 67cb25
void set_initial_result (gsl_integration_workspace * workspace, 
Packit 67cb25
                         double result, double error);
Packit 67cb25
Packit 67cb25
static inline
Packit 67cb25
void set_initial_result (gsl_integration_workspace * workspace, 
Packit 67cb25
                         double result, double error)
Packit 67cb25
{
Packit 67cb25
  workspace->size = 1;
Packit 67cb25
  workspace->rlist[0] = result;
Packit 67cb25
  workspace->elist[0] = error;
Packit 67cb25
}