mirror of
https://github.com/OPM/opm-simulators.git
synced 2024-12-23 16:00:01 -06:00
146 lines
5.1 KiB
C++
146 lines
5.1 KiB
C++
/*
|
|
Copyright 2017 SINTEF Digital, Mathematics and Cybernetics.
|
|
Copyright 2017 Statoil ASA.
|
|
Copyright 2016 - 2017 IRIS AS.
|
|
|
|
This file is part of the Open Porous Media project (OPM).
|
|
|
|
OPM is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation, either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
OPM is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with OPM. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#ifndef OPM_MULTISEGMENTWELL_EQUATIONS_HEADER_INCLUDED
|
|
#define OPM_MULTISEGMENTWELL_EQUATIONS_HEADER_INCLUDED
|
|
|
|
#include <dune/common/fmatrix.hh>
|
|
#include <dune/common/fvector.hh>
|
|
#include <dune/istl/bcrsmatrix.hh>
|
|
#include <dune/istl/bvector.hh>
|
|
|
|
#include <memory>
|
|
|
|
namespace Dune {
|
|
template<class M> class UMFPack;
|
|
}
|
|
|
|
namespace Opm
|
|
{
|
|
|
|
template<class Scalar, int numWellEq, int numEq> class MultisegmentWellEquationAccess;
|
|
template<class Scalar> class MultisegmentWellGeneric;
|
|
class WellContributions;
|
|
class WellInterfaceGeneric;
|
|
class WellState;
|
|
|
|
template<class Scalar, int numWellEq, int numEq>
|
|
class MultisegmentWellEquations
|
|
{
|
|
public:
|
|
// sparsity pattern for the matrices
|
|
// [A C^T [x = [ res
|
|
// B D ] x_well] res_well]
|
|
|
|
// the vector type for the res_well and x_well
|
|
using VectorBlockWellType = Dune::FieldVector<Scalar,numWellEq>;
|
|
using BVectorWell = Dune::BlockVector<VectorBlockWellType>;
|
|
|
|
using VectorBlockType = Dune::FieldVector<Scalar,numEq>;
|
|
using BVector = Dune::BlockVector<VectorBlockType>;
|
|
|
|
// the matrix type for the diagonal matrix D
|
|
using DiagMatrixBlockWellType = Dune::FieldMatrix<Scalar,numWellEq,numWellEq>;
|
|
using DiagMatWell = Dune::BCRSMatrix<DiagMatrixBlockWellType>;
|
|
|
|
// the matrix type for the non-diagonal matrix B and C^T
|
|
using OffDiagMatrixBlockWellType = Dune::FieldMatrix<Scalar,numWellEq,numEq>;
|
|
using OffDiagMatWell = Dune::BCRSMatrix<OffDiagMatrixBlockWellType>;
|
|
|
|
MultisegmentWellEquations(const MultisegmentWellGeneric<Scalar>& well);
|
|
|
|
//! \brief Setup sparsity pattern for the matrices.
|
|
//! \param num_cells Total number of cells
|
|
//! \param numPerfs Number of perforations
|
|
//! \param cells Cell indices for perforations
|
|
//! \param segment_inlets Cell indices for segment inlets
|
|
//! \param segment_perforations Cell indices for segment perforations
|
|
void init(const int num_cells,
|
|
const int numPerfs,
|
|
const std::vector<int>& cells,
|
|
const std::vector<std::vector<int>>& segment_inlets,
|
|
const std::vector<std::vector<int>>& segment_perforations);
|
|
|
|
//! \brief Set all coefficients to 0.
|
|
void clear();
|
|
|
|
//! \brief Apply linear operator to vector.
|
|
void apply(const BVector& x, BVector& Ax) const;
|
|
|
|
//! \brief Apply linear operator to vector.
|
|
void apply(BVector& r) const;
|
|
|
|
//! \brief Compute the LU-decomposition of D matrix.
|
|
void createSolver();
|
|
|
|
//! \brief Apply inverted D matrix to residual and return result.
|
|
BVectorWell solve() const;
|
|
|
|
//! \brief Recover well solution.
|
|
//! \details xw = inv(D)*(rw - C*x)
|
|
void recoverSolutionWell(const BVector& x, BVectorWell& xw) const;
|
|
|
|
//! \brief Add the matrices of this well to the WellContributions object.
|
|
void extract(WellContributions& wellContribs) const;
|
|
|
|
//! \brief Add the matrices of this well to the sparse matrix adapter.
|
|
template<class SparseMatrixAdapter>
|
|
void extract(SparseMatrixAdapter& jacobian) const;
|
|
|
|
//! \brief Extract CPR pressure matrix.
|
|
template<class PressureMatrix>
|
|
void extractCPRPressureMatrix(PressureMatrix& jacobian,
|
|
const BVector& weights,
|
|
const int pressureVarIndex,
|
|
const bool /*use_well_weights*/,
|
|
const WellInterfaceGeneric& well,
|
|
const int seg_pressure_var_ind,
|
|
const WellState& well_state) const;
|
|
|
|
//! \brief Returns a const reference to the residual.
|
|
const BVectorWell& residual() const
|
|
{
|
|
return resWell_;
|
|
}
|
|
|
|
private:
|
|
friend class MultisegmentWellEquationAccess<Scalar,numWellEq,numEq>;
|
|
// two off-diagonal matrices
|
|
OffDiagMatWell duneB_;
|
|
OffDiagMatWell duneC_;
|
|
// "diagonal" matrix for the well. It has offdiagonal entries for inlets and outlets.
|
|
DiagMatWell duneD_;
|
|
|
|
/// \brief solver for diagonal matrix
|
|
///
|
|
/// This is a shared_ptr as MultisegmentWell is copied in computeWellPotentials...
|
|
mutable std::shared_ptr<Dune::UMFPack<DiagMatWell>> duneDSolver_;
|
|
|
|
// residuals of the well equations
|
|
BVectorWell resWell_;
|
|
|
|
const MultisegmentWellGeneric<Scalar>& well_; //!< Reference to well
|
|
};
|
|
|
|
}
|
|
|
|
#endif // OPM_MULTISEGMENTWELLWELL_EQUATIONS_HEADER_INCLUDED
|