OilfieldToolsNet/opm-simulators
4
0
Fork 0
mirror of https://github.com/OPM/opm-simulators.git synced 2024-12-28 02:00:59 -06:00
Code Issues Packages Projects Releases Wiki Activity

make code compile and run.

Browse Source
This commit is contained in:
Robert Kloefkorn 2016-08-26 11:54:59 +02:00
parent 699a0ede01
commit b092b2504c
3 changed files with 26 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
opm/autodiff/BlackoilDetails.hpp
View File

@ -226,7 +226,8 @@ namespace detail {
assert(nw * np == int(residual_well.size()));
// Do the global reductions
#if HAVE_MPI
#if 0
HAVE_MPI
if ( linsolver_.parallelInformation().type() == typeid(ParallelISTLInformation) )
{
const ParallelISTLInformation& info =

11
opm/autodiff/BlackoilModelEbos.hpp
View File

@ -290,7 +290,16 @@ namespace Opm {
// -------- Well equations ----------
double dt = timer.currentStepLength();
IterationReport iter_report = wellModel().assemble(ebosSimulator_, iterationIdx, dt, well_state, residual_);
IterationReport iter_report;
try
{
iter_report = wellModel().assemble(ebosSimulator_, iterationIdx, dt, well_state, residual_);
}
catch ( const Dune::FMatrixError& e )
{
OPM_THROW(Opm::NumericalProblem,"no convergence");
}
typedef double Scalar;
typedef Dune::FieldVector<Scalar, 3 > VectorBlockType;
typedef Dune::FieldMatrix<Scalar, 3, 3 > MatrixBlockType;

36
opm/autodiff/StandardWellsDense.hpp
View File

@ -253,26 +253,22 @@ namespace Opm {
}
}
void matAdd( Mat& res, const Mat& A, const Mat& B ) const
Mat matAdd( const Mat& A, const Mat& B ) const
{
matBinaryOp( res, A, B, true );
return matBinaryOp( A, B, true );
}
void matSubstract( Mat& res, const Mat& A, const Mat& B ) const
Mat matSubstract( const Mat& A, const Mat& B ) const
{
matBinaryOp( res, A, B, false );
return matBinaryOp( A, B, false );
}
void matBinaryOp( Mat& res, const Mat& A, const Mat& B, const bool add ) const
Mat matBinaryOp( const Mat& A, const Mat& B, const bool add ) const
{
assert( A.N() == B.N() && A.M() == B.M() );
res.setSize( A.N(), A.M() );
res.setBuildMode( Mat::implicit );
const int avg_cols_per_row = 20;
const double overflow_fraction = 0.4;
res.setImplicitBuildModeParameters(avg_cols_per_row,overflow_fraction);
Mat res( A.N(), A.M(), avg_cols_per_row,overflow_fraction, Mat::implicit );
assert( A.N() == B.N() && A.M() == B.M() );
// res = A
for( auto rowit = A.begin(), rowEnd = A.end(); rowit != rowEnd; ++rowit )
@ -294,7 +290,6 @@ namespace Opm {
for( auto colit = rowit->begin(); colit != colEnd; ++colit )
{
const int colIdx = colit.index();
// op either implements += or -=
if( add )
{
res.entry( rowIdx, colIdx ) += (*colit);
@ -307,16 +302,15 @@ namespace Opm {
}
res.compress();
return res;
}
void addRhs(BVector& x, Mat& jac) const {
assert(x.size() == rhs.size());
x += rhs_;
Mat A;//( jac );
// jac = A + duneA
//matAdd( A, jac, duneA_ );
//jac = A;
jac += duneA_;
jac = matAdd( jac, duneA_ );
//jac += duneA_;
}
void apply( Mat& A,
@ -334,11 +328,9 @@ namespace Opm {
//std::cout << "duneA" << std::endl;
//print(duneA);
Mat E;//( A );
// A = E - duneA
//matSubstract( E, A, duneA );
//A = E;
A -= duneA;
A = matSubstract( A, duneA );
//A -= duneA;
//std::cout << "after" << std::endl;
//print(A);
BmultinvD.mmv(resWell_, res);
@ -397,7 +389,7 @@ namespace Opm {
phase_condition_ = pc_arg;
vfp_properties_ = vfp_properties_arg;
gravity_ = gravity_arg;
perf_cell_depth_ = subset(depth_arg, wellOps().well_cells);
perf_cell_depth_ = subset(depth_arg, wellOps().well_cells);
}
const WellOps& wellOps() const
@ -880,7 +872,7 @@ namespace Opm {
EvalWell cqt_is = cqt_i/volumeRatio;
//std::cout << "volrat " << volumeRatio << " " << volrat_perf_[perf] << std::endl;
for (int phase = 0; phase < np; ++phase) {
cq_s_dense[phase][perf] = cmix_s[phase] * cqt_is; // * b_perfcells_dense[phase];
cq_s_dense[phase][perf] = cmix_s[phase] * cqt_is; // * b_perfcells_dense[phase];
}
}