rpms/gsl
3
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

temporary diagnostic

Browse Source
This commit is contained in:
Frantisek Kluknavsky 2013-01-21 11:00:04 +01:00
parent a1291cc4bd
commit 32039434e9
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
wrk.patch
View File

@ -1,6 +1,6 @@
diff -up wrk/ode-initval2/cstd.c.wrk wrk/ode-initval2/cstd.c
--- wrk/ode-initval2/cstd.c.wrk 2013-01-18 16:02:19.566833381 +0100
+++ wrk/ode-initval2/cstd.c 2013-01-18 16:10:37.126101180 +0100
+++ wrk/ode-initval2/cstd.c 2013-01-21 10:59:17.113888393 +0100
@@ -85,6 +85,7 @@ std_control_hadjust (void *vstate, size_
const double y[], const double yerr[], const double yp[],
double *h)
@ -25,6 +25,14 @@ diff -up wrk/ode-initval2/cstd.c.wrk wrk/ode-initval2/cstd.c
/* increase step, no more than factor of 5 */
double r = S / pow (rmax, 1.0 / (ord + 1.0));
@@ -137,6 +140,7 @@ std_control_hadjust (void *vstate, size_
}
else
{
+ printf("nemenim");
/* no change */
return GSL_ODEIV_HADJ_NIL;
}
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-17 20:00:18.350164952 +0100