temporary diagnostic

This commit is contained in:
Frantisek Kluknavsky 2013-01-23 17:16:49 +01:00
parent c7b509e575
commit c1920774ef

View File

@ -70,7 +70,7 @@ diff -up wrk/ode-initval2/cstd.c.wrk wrk/ode-initval2/cstd.c
}
diff -up wrk/ode-initval2/evolve.c.wrk wrk/ode-initval2/evolve.c
--- wrk/ode-initval2/evolve.c.wrk 2013-01-17 18:48:06.473062671 +0100
+++ wrk/ode-initval2/evolve.c 2013-01-23 17:10:19.668348408 +0100
+++ wrk/ode-initval2/evolve.c 2013-01-23 17:16:43.867729446 +0100
@@ -28,6 +28,8 @@
#include "odeiv_util.h"
@ -120,7 +120,7 @@ diff -up wrk/ode-initval2/evolve.c.wrk wrk/ode-initval2/evolve.c
double h_old = h0;
-
+ printf("pred hadjust vonku\n%d\n", s->type->order (s->state));
+ printf("pred hadjust vonku\n%d\n", step->type->order (s->state));
const int hadjust_status
=
gsl_odeiv2_control_hadjust (con, step, y, e->yerr, e->dydt_out, &h0);