added: StandardWellEquations::apply(x,Ax)

this applies the equation system to a vector.
use the new method in the well implementation.

opm/simulators/wells/StandardWellEquations.cpp

@@ -111,6 +111,25 @@ void StandardWellEquations<Scalar,numEq>::clear()
     resWell_ = 0.0;
 }
 
+template<class Scalar, int numEq>
+void StandardWellEquations<Scalar,numEq>::apply(const BVector& x, BVector& Ax) const
+{
+    assert(Bx_.size() == duneB_.N());
+    assert(invDrw_.size() == invDuneD_.N());
+
+    // Bx_ = duneB_ * x
+    parallelB_.mv(x, Bx_);
+
+    // invDBx = invDuneD_ * Bx_
+    // TODO: with this, we modified the content of the invDrw_.
+    // Is it necessary to do this to save some memory?
+    auto& invDBx = invDrw_;
+    invDuneD_.mv(Bx_, invDBx);
+
+    // Ax = Ax - duneC_^T * invDBx
+    duneC_.mmtv(invDBx, Ax);
+}
+
 #define INSTANCE(N) \
 template class StandardWellEquations<double,N>;
 

opm/simulators/wells/StandardWellEquations.hpp

@@ -73,6 +73,9 @@ public:
     //! \brief Set all coefficients to 0.
     void clear();
 
+    //! \brief Apply linear operator to vector.
+    void apply(const BVector& x, BVector& Ax) const;
+
     // two off-diagonal matrices
     OffDiagMatWell duneB_;
     OffDiagMatWell duneC_;

opm/simulators/wells/StandardWell_impl.hpp

@@ -1722,20 +1722,8 @@ namespace Opm
             // Contributions are already in the matrix itself
             return;
         }
-        assert(this->linSys_.Bx_.size() == this->linSys_.duneB_.N());
-        assert(this->linSys_.invDrw_.size() == this->linSys_.invDuneD_.N());
 
-        // Bx_ = duneB_ * x
+        this->linSys_.apply(x, Ax);
-        this->linSys_.parallelB_.mv(x, this->linSys_.Bx_);
-
-        // invDBx = invDuneD_ * Bx_
-        // TODO: with this, we modified the content of the invDrw_.
-        // Is it necessary to do this to save some memory?
-        BVectorWell& invDBx = this->linSys_.invDrw_;
-        this->linSys_.invDuneD_.mv(this->linSys_.Bx_, invDBx);
-
-        // Ax = Ax - duneC_^T * invDBx
-        this->linSys_.duneC_.mmtv(invDBx,Ax);
     }