1 files changed, 12 insertions, 0 deletions
diff --git a/gsl-1.9/integration/set_initial.c b/gsl-1.9/integration/set_initial.c
new file mode 100644
index 0000000..410a213
--- /dev/null
+++ b/gsl-1.9/integration/set_initial.c
@@ -0,0 +1,12 @@
+static inline
+void set_initial_result (gsl_integration_workspace * workspace, 
+                         double result, double error);
+
+static inline
+void set_initial_result (gsl_integration_workspace * workspace, 
+                         double result, double error)
+{
+  workspace->size = 1;
+  workspace->rlist[0] = result;
+  workspace->elist[0] = error;
+}