summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/DP45.cpp40
-rw-r--r--tests/Makefile.am4
2 files changed, 43 insertions, 1 deletions
diff --git a/tests/DP45.cpp b/tests/DP45.cpp
new file mode 100644
index 0000000..5faa78a
--- /dev/null
+++ b/tests/DP45.cpp
@@ -0,0 +1,40 @@
+#include "vZ.hpp"
+#include <cmath>
+#include <cstdlib>
+#include <iostream>
+#include <iomanip>
+
+// y' = y (y == C*exp(t))
+double
+f(double t, double y)
+{
+ return y;
+}
+
+int
+main()
+{
+ vZ::DP45Integrator integrator(f);
+ integrator.tol(1e-6).y(1.0).x(0.0).h(0.06);
+
+ integrator.integrate(2.0);
+
+ double actual = integrator.y();
+ double expected = std::exp(2.0);
+
+ std::cout << std::setprecision(10)
+ << "Numerical: " << actual << std::endl
+ << "Expected: " << expected << std::endl
+ << "h: " << integrator.h() << std::endl
+ << "Iterations: " << integrator.iterations() << std::endl
+ << "Rejections: " << integrator.rejections() << std::endl;
+
+ double error = std::fabs(expected - actual)/expected;
+ if (error > 6.0e-7) {
+ std::cerr << "Error: " << 100.0*error << "%" << std::endl;
+ return EXIT_FAILURE;
+ } else {
+ std::cout << "Error: " << 100.0*error << "%" << std::endl;
+ return EXIT_SUCCESS;
+ }
+}
diff --git a/tests/Makefile.am b/tests/Makefile.am
index 60e5cf3..5874419 100644
--- a/tests/Makefile.am
+++ b/tests/Makefile.am
@@ -26,7 +26,8 @@ check_PROGRAMS = Euler-test \
HE12-test \
BS23-test \
RKF45-test \
- CK45-test
+ CK45-test \
+ DP45-test
TESTS = $(check_PROGRAMS)
Euler_test_SOURCES = Euler.cpp
@@ -37,3 +38,4 @@ HE12_test_SOURCES = HE12.cpp
BS23_test_SOURCES = BS23.cpp
RKF45_test_SOURCES = RKF45.cpp
CK45_test_SOURCES = CK45.cpp
+DP45_test_SOURCES = DP45.cpp