From 7cb849b5f5ec1aca5a846825b3941b350f056d45 Mon Sep 17 00:00:00 2001
From: Oliver Sander <sander@igpm.rwth-aachen.de>
Date: Mon, 22 Mar 2010 10:49:10 +0000
Subject: [PATCH] add infinitesimal variation of a RealTuple
[[Imported from SVN: r5785]]
---
src/localgeodesicfestiffness.hh | 7 +++++++
1 file changed, 7 insertions(+)
diff --git a/src/localgeodesicfestiffness.hh b/src/localgeodesicfestiffness.hh
index d21b23cb..7b9f5b53 100644
--- a/src/localgeodesicfestiffness.hh
+++ b/src/localgeodesicfestiffness.hh
@@ -52,6 +52,13 @@ class LocalGeodesicFEStiffness
(i==2)*eps));
}
+ static void infinitesimalVariation(RealTuple<2>& c, double eps, int i)
+ {
+ Dune::FieldVector<double,2> v(0);
+ v[i] = eps;
+ c = RealTuple<2>::exp(c,v);
+ }
+
public:
//! Each block is x, y, theta in 2d, T (R^3 \times SO(3)) in 3d
--
GitLab