|
|
@ -45,14 +45,14 @@ |
|
|
|
static const double b21 = 1.0 / 5.0; |
|
|
|
--- ./ode-initval/rkf45.c.orig Sat Dec 1 15:39:22 2001
|
|
|
|
+++ ./ode-initval/rkf45.c Sat Dec 1 15:40:02 2001
|
|
|
|
@@ -27,6 +27,10 @@
|
|
|
|
|
|
|
|
@@ -32,6 +32,10 @@
|
|
|
|
|
|
|
|
#include "odeiv_util.h" |
|
|
|
|
|
|
|
|
|
|
|
+/* undefine k6 and k7 if set (here are variables with such a name) */
|
|
|
|
+#undef k6
|
|
|
|
+#undef k7
|
|
|
|
+
|
|
|
|
/* Runge-Kutta-Fehlberg constants */ |
|
|
|
/* Runge-Kutta-Fehlberg coefficients. Zero elements left out */ |
|
|
|
|
|
|
|
static const double ah[] = { 1.0/4.0, 3.0/8.0, 12.0/13.0, 1.0, 1.0/2.0 }; |
|
|
|
|