mirror of
https://github.com/OPM/opm-simulators.git
synced 2025-02-25 18:55:30 -06:00
Completed basic version of AD vector class and test.
This commit is contained in:
parent
6ed2b129cb
commit
069e878b0e
@ -31,9 +31,11 @@ namespace AutoDiff
|
|||||||
class ForwardVec
|
class ForwardVec
|
||||||
{
|
{
|
||||||
public:
|
public:
|
||||||
|
/// Underlying types for scalar vectors and jacobians.
|
||||||
typedef Eigen::Array<Scalar, Eigen::Dynamic, 1> V;
|
typedef Eigen::Array<Scalar, Eigen::Dynamic, 1> V;
|
||||||
typedef Eigen::SparseMatrix<Scalar> M;
|
typedef Eigen::SparseMatrix<Scalar> M;
|
||||||
|
|
||||||
|
/// Named constructor pattern used here.
|
||||||
static ForwardVec constant(const V& val)
|
static ForwardVec constant(const V& val)
|
||||||
{
|
{
|
||||||
return ForwardVec(val);
|
return ForwardVec(val);
|
||||||
@ -43,6 +45,9 @@ namespace AutoDiff
|
|||||||
{
|
{
|
||||||
ForwardVec ret(val);
|
ForwardVec ret(val);
|
||||||
|
|
||||||
|
// typedef Eigen::DiagonalMatrix<Scalar, Eigen::Dynamic> D;
|
||||||
|
// D ones = V::Ones(val.size()).matrix().asDiagonal();
|
||||||
|
// ret.jac_ = ones;
|
||||||
ret.jac_.reserve(Eigen::VectorXi::Constant(val.size(), 1));
|
ret.jac_.reserve(Eigen::VectorXi::Constant(val.size(), 1));
|
||||||
for (typename M::Index row = 0; row < val.size(); ++row) {
|
for (typename M::Index row = 0; row < val.size(); ++row) {
|
||||||
ret.jac_.insert(row, row) = Scalar(1.0);
|
ret.jac_.insert(row, row) = Scalar(1.0);
|
||||||
@ -56,6 +61,48 @@ namespace AutoDiff
|
|||||||
return ForwardVec(val, jac);
|
return ForwardVec(val, jac);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/// Operators.
|
||||||
|
ForwardVec operator+(const ForwardVec& rhs)
|
||||||
|
{
|
||||||
|
return function(val_ + rhs.val_, jac_ + rhs.jac_);
|
||||||
|
}
|
||||||
|
|
||||||
|
/// Operators.
|
||||||
|
ForwardVec operator-(const ForwardVec& rhs)
|
||||||
|
{
|
||||||
|
return function(val_ - rhs.val_, jac_ - rhs.jac_);
|
||||||
|
}
|
||||||
|
|
||||||
|
/// Operators.
|
||||||
|
ForwardVec operator*(const ForwardVec& rhs)
|
||||||
|
{
|
||||||
|
typedef Eigen::DiagonalMatrix<Scalar, Eigen::Dynamic> D;
|
||||||
|
D D1 = val_.matrix().asDiagonal();
|
||||||
|
D D2 = rhs.val_.matrix().asDiagonal();
|
||||||
|
return function(val_ * rhs.val_, D2*jac_ + D1*rhs.jac_);
|
||||||
|
}
|
||||||
|
|
||||||
|
/// Operators.
|
||||||
|
ForwardVec operator/(const ForwardVec& rhs)
|
||||||
|
{
|
||||||
|
typedef Eigen::DiagonalMatrix<Scalar, Eigen::Dynamic> D;
|
||||||
|
D D1 = val_.matrix().asDiagonal();
|
||||||
|
D D2 = rhs.val_.matrix().asDiagonal();
|
||||||
|
D D3 = std::pow(rhs.val_, -2).matrix().asDiagonal();
|
||||||
|
return function(val_ / rhs.val_, D3 * (D2*jac_ - D1*rhs.jac_));
|
||||||
|
}
|
||||||
|
|
||||||
|
/// I/O.
|
||||||
|
template <class Ostream>
|
||||||
|
Ostream&
|
||||||
|
print(Ostream& os) const
|
||||||
|
{
|
||||||
|
os << "val =\n" << val_ << "\n\njac =\n" << jac_ << "\n";
|
||||||
|
|
||||||
|
return os;
|
||||||
|
}
|
||||||
|
|
||||||
|
private:
|
||||||
explicit ForwardVec(const V& val)
|
explicit ForwardVec(const V& val)
|
||||||
: val_(val), jac_(val.size(), val.size())
|
: val_(val), jac_(val.size(), val.size())
|
||||||
{
|
{
|
||||||
@ -66,17 +113,6 @@ namespace AutoDiff
|
|||||||
{
|
{
|
||||||
}
|
}
|
||||||
|
|
||||||
template <class Ostream>
|
|
||||||
Ostream&
|
|
||||||
print(Ostream& os) const
|
|
||||||
{
|
|
||||||
os << "val =\n" << val_ << "\n\njac =\n" << jac_ << "\n";
|
|
||||||
|
|
||||||
return os;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
private:
|
|
||||||
V val_;
|
V val_;
|
||||||
M jac_;
|
M jac_;
|
||||||
};
|
};
|
||||||
|
23
test_vec.cpp
23
test_vec.cpp
@ -25,12 +25,29 @@ int main()
|
|||||||
typedef AutoDiff::ForwardVec<double> ADV;
|
typedef AutoDiff::ForwardVec<double> ADV;
|
||||||
ADV::V v(3);
|
ADV::V v(3);
|
||||||
v << 1.0, 2.2, 3.4;
|
v << 1.0, 2.2, 3.4;
|
||||||
std::cout << v << std::endl;
|
ADV::V v2(3);
|
||||||
ADV a = ADV::constant(v);
|
v2 << 0.2, 1.2, 13.4;
|
||||||
|
// std::cout << v << std::endl;
|
||||||
|
ADV a = ADV::constant(v2);
|
||||||
ADV x = ADV::variable(v);
|
ADV x = ADV::variable(v);
|
||||||
ADV::M jac(3,3);
|
ADV::M jac(3,3);
|
||||||
jac.insert(0, 0) = 1.0;
|
jac.insert(0, 0) = 1.0;
|
||||||
ADV f = ADV::function(v, jac);
|
ADV f = ADV::function(v, jac);
|
||||||
|
|
||||||
std::cout << a << "\n\n" << x << "\n\n" << f << std::endl;
|
ADV xpx = x + x;
|
||||||
|
std::cout << xpx;
|
||||||
|
ADV xpxpa = x + x + a;
|
||||||
|
std::cout << xpxpa;
|
||||||
|
|
||||||
|
std::cout << xpxpa - xpx;
|
||||||
|
|
||||||
|
ADV sqx = x * x;
|
||||||
|
|
||||||
|
std::cout << sqx;
|
||||||
|
|
||||||
|
ADV sqxdx = sqx / x;
|
||||||
|
|
||||||
|
std::cout << sqxdx;
|
||||||
|
|
||||||
|
// std::cout << a << "\n\n" << x << "\n\n" << f << std::endl;
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user