#include "test_macros.hpp"
#include <matrix/integration.hpp>

using matrix::Matrix;
using matrix::ones;
using matrix::Vector;

Vector<float, 6> f(float t, const Matrix<float, 6, 1> &  /*y*/, const Matrix<float, 3, 1> &  /*u*/);

Vector<float, 6> f(float t, const Matrix<float, 6, 1> &  /*y*/, const Matrix<float, 3, 1> &  /*u*/) {
    float v = -sinf(t);
    return v*ones<float, 6, 1>();
}

int main()
{
    Vector<float, 6> y = ones<float, 6, 1>();
    Vector<float, 3> u = ones<float, 3, 1>();
    float t0 = 0;
    float tf = 2;
    float h = 0.001f;
    integrate_rk4(f, y, u, t0, tf, h, y);
    float v = 1 + cosf(tf) - cosf(t0);
    TEST(isEqual(y, (ones<float, 6, 1>()*v)));
    return 0;
}

/* vim: set et fenc=utf-8 ff=unix sts=0 sw=4 ts=4 : */