#11172: Add auto Arps decline curve type

Add auto Arps decline curve fitting, document the algorithm and reference the AutoDCA repository.
This commit is contained in:
Magne Sjaastad committed 2026-10-13 12:44:00 +02:00
1 parent 393d32578e
commit c6927648e8
4 files changed
+279 -8

No files matched your search

@@ -56,6 +56,7 @@ void caf::AppEnum<RimSummaryDeclineCurve::DeclineCurveType>::setUp()
addItem( RimSummaryDeclineCurve::DeclineCurveType::EXPONENTIAL, "EXPONENTIAL", "Exponential" );
addItem( RimSummaryDeclineCurve::DeclineCurveType::HARMONIC, "HARMONIC", "Harmonic" );
addItem( RimSummaryDeclineCurve::DeclineCurveType::HYPERBOLIC, "HYPERBOLIC", "Hyperbolic" );
addItem( RimSummaryDeclineCurve::DeclineCurveType::AUTO_ARPS, "AUTO_ARPS", "Auto (Arps)" );
setDefault( RimSummaryDeclineCurve::DeclineCurveType::HARMONIC );
}
@@ -347,7 +348,7 @@ void RimSummaryDeclineCurve::defineUiOrdering( QString uiConfigName, caf::PdmUiO
caf::PdmUiGroup* declineCurveGroup = uiOrdering.addNewGroup( "Decline Curve" );
declineCurveGroup->add( &m_declineCurveType );
declineCurveGroup->add( &m_fitMethod );
if ( m_declineCurveType != RimSummaryDeclineCurve::DeclineCurveType::AUTO_ARPS ) declineCurveGroup->add( &m_fitMethod );
declineCurveGroup->add( &m_predictionYears );
if ( m_declineCurveType == RimSummaryDeclineCurve::DeclineCurveType::HYPERBOLIC )
@@ -22,7 +22,9 @@
#include <QStringList>
#include <algorithm>
#include <array>
#include <cmath>
#include <limits>
#include <tuple>
//--------------------------------------------------------------------------------------------------
@@ -207,6 +209,192 @@ RigDeclineCurveCalculator::FitResult RigDeclineCurveCalculator::fitHyperbolicDec
return std::make_pair( qi, di );
}
namespace
{
double autoArpsLoss( double b, double lnQi, double diPerYear, const std::vector<double>& tYears, const std::vector<double>& rates )
{
const double qi = std::exp( lnQi );
double loss = 0.0;
for ( size_t i = 0; i < tYears.size(); i++ )
{
double q = 0.0;
if ( b < 1.0e-3 )
{
q = qi * std::exp( -diPerYear * tYears[i] );
}
else
{
const double base = 1.0 + b * diPerYear * tYears[i];
if ( base <= 0.0 ) return std::numeric_limits<double>::max();
q = qi / std::pow( base, 1.0 / b );
}
const double rel = ( q - rates[i] ) / rates[i];
loss += rel * rel;
}
return std::isfinite( loss ) ? loss : std::numeric_limits<double>::max();
}
// Nelder-Mead minimization of the loss in (ln qi, Di) for a fixed b
std::pair<double, std::array<double, 2>>
minimizeAutoArps( double b, std::array<double, 2> start, const std::vector<double>& tYears, const std::vector<double>& rates )
{
using Point = std::array<double, 2>;
auto f = [&]( const Point& p ) { return autoArpsLoss( b, p[0], p[1], tYears, rates ); };
std::array<Point, 3> s = { start,
Point{ start[0] + 0.1, start[1] },
Point{ start[0], start[1] + 0.1 * std::max( 1.0, std::abs( start[1] ) ) } };
std::array<double, 3> v = { f( s[0] ), f( s[1] ), f( s[2] ) };
for ( int iter = 0; iter < 500; iter++ )
{
std::array<int, 3> idx = { 0, 1, 2 };
std::sort( idx.begin(), idx.end(), [&]( int a, int c ) { return v[a] < v[c]; } );
const Point best = s[idx[0]], mid = s[idx[1]], worst = s[idx[2]];
const double vb = v[idx[0]], vm = v[idx[1]], vw = v[idx[2]];
s = { best, mid, worst };
v = { vb, vm, vw };
if ( std::abs( vw - vb ) < 1.0e-18 ) break;
const Point centroid = { 0.5 * ( best[0] + mid[0] ), 0.5 * ( best[1] + mid[1] ) };
auto along = [&]( double k )
{ return Point{ centroid[0] + k * ( worst[0] - centroid[0] ), centroid[1] + k * ( worst[1] - centroid[1] ) }; };
const Point refl = along( -1.0 );
const double vRefl = f( refl );
if ( vRefl < vb )
{
const Point exp = along( -2.0 );
const double vExp = f( exp );
if ( vExp < vRefl )
{
s[2] = exp;
v[2] = vExp;
}
else
{
s[2] = refl;
v[2] = vRefl;
}
}
else if ( vRefl < vm )
{
s[2] = refl;
v[2] = vRefl;
}
else
{
const Point contr = along( vRefl < vw ? -0.5 : 0.5 );
const double vContr = f( contr );
if ( vContr < std::min( vw, vRefl ) )
{
s[2] = contr;
v[2] = vContr;
}
else
{
for ( int k = 1; k < 3; k++ )
{
s[k] = { best[0] + 0.5 * ( s[k][0] - best[0] ), best[1] + 0.5 * ( s[k][1] - best[1] ) };
v[k] = f( s[k] );
}
}
}
}
const int bestIdx = static_cast<int>( std::min_element( v.begin(), v.end() ) - v.begin() );
return { v[bestIdx], s[bestIdx] };
}
} // namespace
//--------------------------------------------------------------------------------------------------
///
//--------------------------------------------------------------------------------------------------
std::optional<RigDeclineCurveCalculator::ArpsFit> RigDeclineCurveCalculator::fitAutoArps( const std::vector<double>& times,
const std::vector<double>& flowRates )
{
// Only use positive rates, starting at the peak rate to skip the ramp-up phase
std::vector<double> t, q;
for ( size_t i = 0; i < std::min( times.size(), flowRates.size() ); i++ )
{
if ( flowRates[i] > 0.0 && std::isfinite( flowRates[i] ) )
{
t.push_back( times[i] / secondsPerYear );
q.push_back( flowRates[i] );
}
}
if ( q.empty() ) return std::nullopt;
const size_t peak = static_cast<size_t>( std::max_element( q.begin(), q.end() ) - q.begin() );
t.erase( t.begin(), t.begin() + peak );
q.erase( q.begin(), q.begin() + peak );
if ( q.size() < 3 ) return std::nullopt;
// Start from the exponential fit
std::array<double, 2> start = { std::log( q.back() ), 0.0 };
{
std::vector<double> lnq;
for ( double v : q )
lnq.push_back( std::log( v ) );
std::vector<double> tSecondsStart;
for ( double v : t )
tSecondsStart.push_back( v * secondsPerYear );
auto line = fitLine( tSecondsStart, lnq );
if ( !line ) return std::nullopt;
start = { line->first, -line->second * secondsPerYear };
if ( !std::isfinite( start[0] ) || !std::isfinite( start[1] ) ) return std::nullopt;
}
double bestLoss = std::numeric_limits<double>::max();
double bestB = 0.0;
std::array<double, 2> bestPoint = start;
std::vector<double> tSeconds;
for ( double v : t )
tSeconds.push_back( v * secondsPerYear );
auto evaluate = [&]( double b )
{
// Use the linearized fit for this b as starting point when available
std::array<double, 2> bStart = start;
if ( b >= 1.0e-3 )
{
auto linear = fitHyperbolicDecline( tSeconds, q, b );
if ( linear && linear->first > 0.0 && std::isfinite( linear->second ) )
bStart = { std::log( linear->first ), linear->second * secondsPerYear };
}
// Restart from the previous result to escape a collapsed simplex
auto [loss, point] = minimizeAutoArps( b, bStart, t, q );
for ( int restart = 0; restart < 3; restart++ )
std::tie( loss, point ) = minimizeAutoArps( b, point, t, q );
if ( loss < bestLoss )
{
bestLoss = loss;
bestB = b;
bestPoint = point;
}
};
for ( int i = 0; i <= 20; i++ )
evaluate( 0.05 * i );
// Refine around the best grid value
const double coarseB = bestB;
for ( int i = -4; i <= 4; i++ )
{
const double b = coarseB + 0.01 * i;
if ( b >= 0.0 && b <= 1.0 ) evaluate( b );
}
if ( bestLoss == std::numeric_limits<double>::max() ) return std::nullopt;
const double qi = std::exp( bestPoint[0] );
const double di = bestPoint[1] / secondsPerYear;
if ( !std::isfinite( qi ) || !std::isfinite( di ) || di < 0.0 ) return std::nullopt;
return ArpsFit{ qi, di, bestB };
}
//--------------------------------------------------------------------------------------------------
///
//--------------------------------------------------------------------------------------------------
@@ -257,8 +445,9 @@ std::optional<RigDeclineCurveCalculator::DeclineParameters>
double initialProductionRate = 0.0;
double initialDeclineRate = 0.0;
double hyperbolicConstantB = model.hyperbolicDeclineConstantB;
if ( model.fitMethod == FitMethod::START_END_POINT )
if ( model.fitMethod == FitMethod::START_END_POINT && model.type != DeclineCurveType::AUTO_ARPS )
{
std::tie( initialProductionRate, initialDeclineRate ) = computeStartEndPointParameters( values, timeSteps, model.isAccumulated );
}
@@ -286,7 +475,14 @@ std::optional<RigDeclineCurveCalculator::DeclineParameters>
}
FitResult fit;
if ( model.type == DeclineCurveType::EXPONENTIAL )
if ( model.type == DeclineCurveType::AUTO_ARPS )
{
auto arps = fitAutoArps( times, rates );
if ( !arps ) return std::nullopt;
fit = std::make_pair( arps->initialProductionRate, arps->initialDeclineRate );
hyperbolicConstantB = arps->hyperbolicDeclineConstantB;
}
else if ( model.type == DeclineCurveType::EXPONENTIAL )
{
fit = fitExponentialDecline( times, rates );
}
@@ -305,7 +501,7 @@ std::optional<RigDeclineCurveCalculator::DeclineParameters>
if ( !std::isfinite( initialProductionRate ) || !std::isfinite( initialDeclineRate ) ) return std::nullopt;
return DeclineParameters{ initialProductionRate, initialDeclineRate, referenceTime };
return DeclineParameters{ initialProductionRate, initialDeclineRate, referenceTime, hyperbolicConstantB };
}
//--------------------------------------------------------------------------------------------------
@@ -315,7 +511,7 @@ double RigDeclineCurveCalculator::computePredictedValue( const DeclineModel& mod
{
const double qi = parameters.initialProductionRate;
const double di = parameters.initialDeclineRate;
const double b = model.hyperbolicDeclineConstantB;
const double b = parameters.hyperbolicDeclineConstantB;
switch ( model.type )
{
@@ -325,6 +521,14 @@ double RigDeclineCurveCalculator::computePredictedValue( const DeclineModel& mod
case DeclineCurveType::HARMONIC:
return model.isAccumulated ? computeCumulativeProductionHarmonicDecline( qi, di, timeSinceStart )
: computeFlowRateHarmonicDecline( qi, di, timeSinceStart );
case DeclineCurveType::AUTO_ARPS:
if ( b < 1.0e-3 )
return model.isAccumulated ? computeCumulativeProductionExponentialDecline( qi, di, timeSinceStart )
: computeFlowRateExponentialDecline( qi, di, timeSinceStart );
if ( std::abs( b - 1.0 ) < 1.0e-3 )
return model.isAccumulated ? computeCumulativeProductionHarmonicDecline( qi, di, timeSinceStart )
: computeFlowRateHarmonicDecline( qi, di, timeSinceStart );
[[fallthrough]];
case DeclineCurveType::HYPERBOLIC:
return model.isAccumulated ? computeCumulativeProductionHyperbolicDecline( qi, di, timeSinceStart, b )
: computeFlowRateHyperbolicDecline( qi, di, timeSinceStart, b );
@@ -386,6 +590,7 @@ QString RigDeclineCurveCalculator::equationText( const DeclineModel& model, cons
rateEquation = "q(t) = qi / (1 + Di * t)";
cumulativeEquation = "Np(t) = Np0 + (qi / Di) * ln(qi / q(t))";
break;
case DeclineCurveType::AUTO_ARPS:
case DeclineCurveType::HYPERBOLIC:
rateEquation = "q(t) = qi / (1 + b * Di * t)^(1 / b)";
cumulativeEquation = "Np(t) = Np0 + qi^b / ((1 - b) * Di) * (qi^(1 - b) - q(t)^(1 - b))";
@@ -401,8 +606,8 @@ QString RigDeclineCurveCalculator::equationText( const DeclineModel& model, cons
const QString qiUnit = model.isAccumulated ? " [per year]" : "";
QString parameterText =
QString( "qi = %1%2, Di = %3 [1/year]" ).arg( qi, 0, 'g', 6 ).arg( qiUnit ).arg( parameters.initialDeclineRate * secondsPerYear, 0, 'g', 6 );
if ( model.type == DeclineCurveType::HYPERBOLIC )
parameterText += QString( ", b = %1" ).arg( model.hyperbolicDeclineConstantB, 0, 'g', 4 );
if ( model.type == DeclineCurveType::HYPERBOLIC || model.type == DeclineCurveType::AUTO_ARPS )
parameterText += QString( ", b = %1" ).arg( parameters.hyperbolicDeclineConstantB, 0, 'g', 4 );
lines << parameterText;
const QString referenceDate = QDateTime::fromSecsSinceEpoch( parameters.referenceTime ).date().toString( Qt::ISODate );
@@ -37,7 +37,8 @@ public:
{
EXPONENTIAL,
HARMONIC,
HYPERBOLIC
HYPERBOLIC,
AUTO_ARPS // Arps model where the hyperbolic constant is fitted to the data
};
enum class FitMethod
@@ -59,6 +60,7 @@ public:
double initialProductionRate; // [rate unit]
double initialDeclineRate; // [1/second]
time_t referenceTime; // time at which the initial production rate applies
double hyperbolicDeclineConstantB = 0.5; // fitted for AUTO_ARPS, otherwise copied from the model
};
static constexpr double secondsPerYear = 365.25 * 24.0 * 3600.0;
@@ -76,6 +78,29 @@ public:
const std::vector<time_t>& timeSteps,
const std::vector<time_t>& futureTimeSteps );
struct ArpsFit
{
double initialProductionRate;
double initialDeclineRate; // [1/second]
double hyperbolicDeclineConstantB;
};
// Automatic Arps fit inspired by AutoDCA (https://github.com/equinor/decline-curve-analysis), q(t) = qi / (1 + b * Di * t)^(1 / b),
// where b = 0 is exponential and b = 1 is harmonic.
//
// Algorithm:
// 1. Keep positive, finite rates and discard everything before the peak rate (ramp-up/plateau build-up). At least three points
// must remain.
// 2. For a grid of b values in [0, 1] (step 0.05), minimize the sum of squared relative errors ((q_model - q) / q)^2 over (ln qi, Di)
// using Nelder-Mead. The start guess is the linearized hyperbolic fit for that b (the exponential fit for b = 0), and the
// minimization is restarted a few times from its own result to avoid a collapsed simplex. Parameter sets where the model is
// undefined in the fitted time range are rejected.
// 3. Refine b with a finer grid (step 0.01) around the best coarse value, and return the parameters with the lowest loss. Fits with
// a negative decline rate are rejected.
//
// Time values are seconds relative to the reference time (<= 0).
static std::optional<ArpsFit> fitAutoArps( const std::vector<double>& times, const std::vector<double>& flowRates );
static QString equationText( const DeclineModel& model, const DeclineParameters& parameters );
static double computeDeclineRate( double time0, double value0, double time1, double value1 );
@@ -123,4 +123,44 @@ TEST( RigDeclineCurveCalculatorTests, historyIsBackwardExtrapolationOfFittedCurv
EXPECT_NE( values[0], ( *result )[0] );
EXPECT_GT( ( *result )[0], ( *result )[1] );
EXPECT_GT( ( *result )[3], ( *result )[4] );
}
//--------------------------------------------------------------------------------------------------
///
//--------------------------------------------------------------------------------------------------
TEST( RigDeclineCurveCalculatorTests, autoArpsRecoversHyperbolicParametersAndSkipsRampUp )
{
const double year = RigDeclineCurveCalculator::secondsPerYear;
const double qi = 100.0;
const double di = 0.6 / year;
const double b = 0.5;
std::vector<double> times;
std::vector<double> rates;
// Ramp-up before the peak rate must be ignored
for ( int i = -30; i <= -25; i++ )
{
times.push_back( i * 0.1 * year );
rates.push_back( 10.0 + ( i + 30 ) * 10.0 );
}
for ( int i = -24; i <= 0; i++ )
{
const double t = i * 0.1 * year;
times.push_back( t );
rates.push_back( RigDeclineCurveCalculator::computeFlowRateHyperbolicDecline( qi, di, t, b ) );
}
auto fit = RigDeclineCurveCalculator::fitAutoArps( times, rates );
ASSERT_TRUE( fit.has_value() );
EXPECT_NEAR( qi, fit->initialProductionRate, 0.5 );
EXPECT_NEAR( b, fit->hyperbolicDeclineConstantB, 0.05 );
EXPECT_NEAR( di * year, fit->initialDeclineRate * year, 0.05 );
}
//--------------------------------------------------------------------------------------------------
///
//--------------------------------------------------------------------------------------------------
TEST( RigDeclineCurveCalculatorTests, autoArpsFailsWithTooFewPoints )
{
EXPECT_FALSE( RigDeclineCurveCalculator::fitAutoArps( { -10.0, 0.0 }, { 5.0, 4.0 } ).has_value() );
}