temporary diagnostic

This commit is contained in:
Frantisek Kluknavsky 2013-01-17 15:36:12 +01:00
parent 0a4dd02f6a
commit 0e96212c37

View File

@ -1,6 +1,6 @@
diff -up wrk/ode-initval2/msbdf.c.wrk wrk/ode-initval2/msbdf.c
--- wrk/ode-initval2/msbdf.c.wrk 2013-01-09 10:35:45.259960403 +0100
+++ wrk/ode-initval2/msbdf.c 2013-01-17 15:26:23.387104698 +0100
+++ wrk/ode-initval2/msbdf.c 2013-01-17 15:36:07.755918734 +0100
@@ -116,7 +116,6 @@ static void *
msbdf_alloc (size_t dim)
{
@ -9,14 +9,14 @@ diff -up wrk/ode-initval2/msbdf.c.wrk wrk/ode-initval2/msbdf.c
if (state == 0)
{
GSL_ERROR_NULL ("failed to allocate space for msbdf_state", GSL_ENOMEM);
@@ -634,6 +633,7 @@ msbdf_update (void *vstate, const size_t
--- convergence failure resulted in step size decrease
*/
@@ -1083,6 +1082,7 @@ msbdf_apply (void *vstate, size_t dim, d
{
/* Carries out a step by BDF linear multistep methods. */
+printf("ALOKUJEEEEEEEEEEEEEEEEEEEEEEEEEEM\n");
const double c = 0.2;
const double gammarel = fabs (gamma / gammaprev - 1.0);
msbdf_state_t *state = (msbdf_state_t *) vstate;
double *const z = state->z;
diff -up wrk/ode-initval2/test.c.wrk wrk/ode-initval2/test.c
--- wrk/ode-initval2/test.c.wrk 2013-01-09 10:48:22.051415928 +0100
+++ wrk/ode-initval2/test.c 2013-01-17 15:18:46.759826995 +0100