2013-04-16 05:31:47 +08:00
|
|
|
/**
|
|
|
|
* @file testPendulumExplicitEuler.cpp
|
|
|
|
* @author Duy-Nguyen Ta
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <CppUnitLite/TestHarness.h>
|
2013-08-19 23:32:16 +08:00
|
|
|
#include <gtsam/inference/Symbol.h>
|
2013-04-16 05:31:47 +08:00
|
|
|
#include <gtsam_unstable/dynamics/Pendulum.h>
|
|
|
|
|
|
|
|
/* ************************************************************************* */
|
|
|
|
using namespace gtsam;
|
|
|
|
using namespace gtsam::symbol_shorthand;
|
|
|
|
|
2013-04-23 01:44:09 +08:00
|
|
|
namespace {
|
2013-04-16 05:31:47 +08:00
|
|
|
|
2013-04-23 01:44:09 +08:00
|
|
|
const double tol=1e-5;
|
|
|
|
const double h = 0.1;
|
|
|
|
const double g = 9.81, l = 1.0;
|
|
|
|
|
|
|
|
const double deg2rad = M_PI/180.0;
|
2014-11-04 22:41:14 +08:00
|
|
|
double q1(deg2rad*30.0), q2(deg2rad*31.0);
|
|
|
|
double v1(deg2rad*1.0/h), v2((v1-h*g/l*sin(q1)));
|
2013-04-23 01:44:09 +08:00
|
|
|
|
|
|
|
}
|
2013-04-16 05:31:47 +08:00
|
|
|
|
|
|
|
/* ************************************************************************* */
|
|
|
|
TEST( testPendulumFactor1, evaluateError) {
|
|
|
|
// hard constraints don't need a noise model
|
2013-04-17 03:07:59 +08:00
|
|
|
PendulumFactor1 constraint(Q(2), Q(1), V(1), h);
|
2013-04-16 05:31:47 +08:00
|
|
|
|
|
|
|
// verify error function
|
2016-04-16 04:54:46 +08:00
|
|
|
EXPECT(assert_equal(Z_1x1, constraint.evaluateError(q2, q1, v1), tol));
|
2013-04-16 05:31:47 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
/* ************************************************************************* */
|
|
|
|
TEST( testPendulumFactor2, evaluateError) {
|
|
|
|
// hard constraints don't need a noise model
|
2013-04-17 03:07:59 +08:00
|
|
|
PendulumFactor2 constraint(V(2), V(1), Q(1), h);
|
2013-04-16 05:31:47 +08:00
|
|
|
|
|
|
|
// verify error function
|
2016-04-16 04:54:46 +08:00
|
|
|
EXPECT(assert_equal(Z_1x1, constraint.evaluateError(v2, v1, q1), tol));
|
2013-04-16 05:31:47 +08:00
|
|
|
}
|
|
|
|
|
2013-04-17 03:07:59 +08:00
|
|
|
/* ************************************************************************* */
|
|
|
|
TEST( testPendulumFactorPk, evaluateError) {
|
|
|
|
// hard constraints don't need a noise model
|
|
|
|
PendulumFactorPk constraint(P(1), Q(1), Q(2), h);
|
|
|
|
|
2014-11-04 22:41:14 +08:00
|
|
|
double pk( 1/h * (q2-q1) + h*g*sin(q1) );
|
2013-04-17 03:07:59 +08:00
|
|
|
|
|
|
|
// verify error function
|
2016-04-16 04:54:46 +08:00
|
|
|
EXPECT(assert_equal(Z_1x1, constraint.evaluateError(pk, q1, q2), tol));
|
2013-04-17 03:07:59 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
/* ************************************************************************* */
|
|
|
|
TEST( testPendulumFactorPk1, evaluateError) {
|
|
|
|
// hard constraints don't need a noise model
|
|
|
|
PendulumFactorPk1 constraint(P(2), Q(1), Q(2), h);
|
|
|
|
|
2014-11-04 22:41:14 +08:00
|
|
|
double pk1( 1/h * (q2-q1) );
|
2013-04-17 03:07:59 +08:00
|
|
|
|
|
|
|
// verify error function
|
2016-04-16 04:54:46 +08:00
|
|
|
EXPECT(assert_equal(Z_1x1, constraint.evaluateError(pk1, q1, q2), tol));
|
2013-04-17 03:07:59 +08:00
|
|
|
}
|
|
|
|
|
2013-04-16 05:31:47 +08:00
|
|
|
|
|
|
|
/* ************************************************************************* */
|
|
|
|
int main() { TestResult tr; return TestRegistry::runAllTests(tr); }
|
|
|
|
/* ************************************************************************* */
|