ImmiscibleMultiphaseFlow.hpp

Go to the documentation of this file.

/*
 * ------------------------------------------------------------------------------------------------------------
 * SPDX-License-Identifier: LGPL-2.1-only
 *
 * Copyright (c) 2016-2024 Lawrence Livermore National Security LLC
 * Copyright (c) 2018-2024 TotalEnergies
 * Copyright (c) 2018-2024 The Board of Trustees of the Leland Stanford Junior University
 * Copyright (c) 2023-2024 Chevron
 * Copyright (c) 2019-     GEOS/GEOSX Contributors
 * All rights reserved
 *
 * See top level LICENSE, COPYRIGHT, CONTRIBUTORS, NOTICE, and ACKNOWLEDGEMENTS files for details.
 * ------------------------------------------------------------------------------------------------------------
 */
 
#ifndef GEOS_PHYSICSSOLVERS_FLUIDFLOW_IMMISCIBLEMULTIPHASEFLOW_HPP_
#define GEOS_PHYSICSSOLVERS_FLUIDFLOW_IMMISCIBLEMULTIPHASEFLOW_HPP_
 
#include "physicsSolvers/fluidFlow/FlowSolverBase.hpp"
#include "fieldSpecification/FieldSpecificationManager.hpp"
#include "physicsSolvers/fluidFlow/kernels/immiscibleMultiphase/ImmiscibleMultiphaseKernels.hpp"
#include "physicsSolvers/fluidFlow/CompositionalMultiphaseFVM.hpp"  // For GravityDensityScheme
namespace geos
{
 
//START_SPHINX_INCLUDE_00
class ImmiscibleMultiphaseFlow : public FlowSolverBase
{
public:
 
  ImmiscibleMultiphaseFlow( const string & name,
                            Group * const parent );
 
  ImmiscibleMultiphaseFlow() = delete;
 
  ImmiscibleMultiphaseFlow( ImmiscibleMultiphaseFlow const & ) = delete;
 
  ImmiscibleMultiphaseFlow( ImmiscibleMultiphaseFlow && ) = default;
 
  ImmiscibleMultiphaseFlow & operator=( ImmiscibleMultiphaseFlow const & ) = delete;
 
  ImmiscibleMultiphaseFlow & operator=( ImmiscibleMultiphaseFlow && ) = delete;
 
  virtual ~ImmiscibleMultiphaseFlow() override = default;
  static string catalogName() { return "ImmiscibleMultiphaseFlow"; }
  string getCatalogName() const override { return catalogName(); }
 
  virtual void registerDataOnMesh( Group & meshBodies ) override final;
 
  virtual void
  implicitStepSetup( real64 const & time_n,
                     real64 const & dt,
                     DomainPartition & domain ) override;
 
  virtual void
  assembleSystem( real64 const time_n,
                  real64 const dt,
                  DomainPartition & domain,
                  DofManager const & dofManager,
                  CRSMatrixView< real64, globalIndex const > const & localMatrix,
                  arrayView1d< real64 > const & localRhs ) override;
 
  virtual real64
  calculateResidualNorm( real64 const & time_n,
                         real64 const & dt,
                         DomainPartition const & domain,
                         DofManager const & dofManager,
                         arrayView1d< real64 const > const & localRhs ) override;
 
  virtual void
  applySystemSolution( DofManager const & dofManager,
                       arrayView1d< real64 const > const & localSolution,
                       real64 const scalingFactor,
                       real64 const dt,
                       DomainPartition & domain ) override;
 
  virtual void
  setupDofs( DomainPartition const & domain,
             DofManager & dofManager ) const override;
 
  virtual void
  applyBoundaryConditions( real64 const time_n,
                           real64 const dt,
                           DomainPartition & domain,
                           DofManager const & dofManager,
                           CRSMatrixView< real64, globalIndex const > const & localMatrix,
                           arrayView1d< real64 > const & localRhs ) override;
 
  virtual void
  resetStateToBeginningOfStep( DomainPartition & domain ) override;
 
  virtual void
  implicitStepComplete( real64 const & time,
                        real64 const & dt,
                        DomainPartition & domain ) override;
 
  void updateFluidState( ElementSubRegionBase & subRegion ) const;
 
  void updateVolumeConstraint( ElementSubRegionBase & subRegion ) const;
 
  virtual void saveConvergedState( ElementSubRegionBase & subRegion ) const override final;
 
  virtual void updateState( DomainPartition & domain ) override final;
 
  integer numFluidPhases() const { return m_numPhases; }
 
  void assembleAccumulationTerm( DomainPartition & domain,
                                 DofManager const & dofManager,
                                 CRSMatrixView< real64, globalIndex const > const & localMatrix,
                                 arrayView1d< real64 > const & localRhs ) const;
 
  virtual void
  assembleFluxTerms( real64 const dt,
                     DomainPartition const & domain,
                     DofManager const & dofManager,
                     CRSMatrixView< real64, globalIndex const > const & localMatrix,
                     arrayView1d< real64 > const & localRhs ) const;
 
  void applyDirichletBC( real64 const time,
                         real64 const dt,
                         DofManager const & dofManager,
                         DomainPartition & domain,
                         CRSMatrixView< real64, globalIndex const > const & localMatrix,
                         arrayView1d< real64 > const & localRhs ) const;
 
  void applySourceFluxBC( real64 const time,
                          real64 const dt,
                          DofManager const & dofManager,
                          DomainPartition & domain,
                          CRSMatrixView< real64, globalIndex const > const & localMatrix,
                          arrayView1d< real64 > const & localRhs ) const;
  virtual real64 setNextDtBasedOnStateChange( real64 const & currentDt,
                                              DomainPartition & domain ) override;
 
  virtual void initializePreSubGroups() override;
 
  virtual void initializePostInitialConditionsPreSubGroups() override;
 
  virtual void initializeFluidState( MeshLevel & mesh, string_array const & regionNames ) override;
 
 
  void updatePhaseMass( ElementSubRegionBase & subRegion ) const;
 
  struct viewKeyStruct : public FlowSolverBase::viewKeyStruct
  {
    // inputs
 
    // density averaging scheme
    static constexpr char const * gravityDensitySchemeString()    { return "gravityDensityScheme"; }
 
    // time stepping controls
    static constexpr char const * solutionChangeScalingFactorString() { return "solutionChangeScalingFactor"; }
    static constexpr char const * targetRelativePresChangeString() { return "targetRelativePressureChangeInTimeStep"; }
    static constexpr char const * targetPhaseVolFracChangeString() { return "targetPhaseVolFractionChangeInTimeStep"; }
 
    // nonlinear solver parameters
    static constexpr char const * maxRelativePresChangeString() { return "maxRelativePressureChange"; }
    static constexpr char const * useTotalMassEquationString() { return "useTotalMassEquation"; }
 
    static constexpr char const * capPressureNamesString() { return "capillary_pressure"; }
    static constexpr char const * relPermNamesString() { return "relative_permeability"; }
    static constexpr char const * elemDofFieldString() { return "elemDofField"; }
  };
 
 
private:
 
  virtual void postInputInitialization() override;
 
  void updateFluidModel( ObjectManagerBase & dataGroup ) const;
 
  void updateRelPermModel( ObjectManagerBase & dataGroup ) const;
 
  void updateCapPressureModel( ObjectManagerBase & dataGroup ) const;
 
  void updatePhaseMobility( ObjectManagerBase & dataGroup ) const;
 
  template< typename OBJECT_TYPE >
  void applyFieldValue( real64 const & time_n,
                        real64 const & dt,
                        MeshLevel & mesh,
                        char const logMessage[],
                        string const fieldKey,
                        string const boundaryFieldKey ) const;
 
  integer m_numPhases;
 
  bool m_hasCapPressure;
 
  integer m_useTotalMassEquation;
 
  GravityDensityScheme m_gravityDensityScheme;
 
  real64 m_targetRelativePresChange;
 
  real64 m_targetPhaseVolFracChange;
 
  real64 m_solutionChangeScalingFactor;
 
 
private:
 
  bool validateDirichletBC( DomainPartition & domain,
                            real64 const time ) const;
 
  virtual void setConstitutiveNames( ElementSubRegionBase & subRegion ) const override;
 
};
 
template< typename OBJECT_TYPE >
void ImmiscibleMultiphaseFlow::applyFieldValue( real64 const & time_n,
                                                real64 const & dt,
                                                MeshLevel & mesh,
                                                char const logMessage[],
                                                string const fieldKey,
                                                string const boundaryFieldKey ) const
{
  FieldSpecificationManager & fsManager = FieldSpecificationManager::getInstance();
 
  fsManager.apply< OBJECT_TYPE >( time_n + dt,
                                  mesh,
                                  fieldKey,
                                  [&]( FieldSpecificationBase const & fs,
                                       string const & setName,
                                       SortedArrayView< localIndex const > const & lset,
                                       OBJECT_TYPE & targetGroup,
                                       string const & )
  {
    if( fs.getLogLevel() >= 1 && m_nonlinearSolverParameters.m_numNewtonIterations == 0 )
    {
      globalIndex const numTargetElems = MpiWrapper::sum< globalIndex >( lset.size() );
      GEOS_LOG_RANK_0( GEOS_FMT( logMessage,
                                 getName(), time_n+dt, fs.getCatalogName(), fs.getName(),
                                 setName, targetGroup.getName(), fs.getScale(), numTargetElems ) );
    }
 
    // Specify the bc value of the field
    fs.applyFieldValue< FieldSpecificationEqual,
                        parallelDevicePolicy<> >( lset,
                                                  time_n + dt,
                                                  targetGroup,
                                                  boundaryFieldKey );
  } );
}
 
 
} // namespace geos
 
#endif //GEOS_PHYSICSSOLVERS_FLUIDFLOW_IMMISCIBLEMULTIPHASEFLOW_HPP_