EpetraMatrix.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_LINEARALGEBRA_INTERFACES_EPETRAMATRIX_HPP_
#define GEOS_LINEARALGEBRA_INTERFACES_EPETRAMATRIX_HPP_
 
#include "common/DataTypes.hpp"
#include "linearAlgebra/interfaces/trilinos/EpetraVector.hpp"
#include "linearAlgebra/interfaces/trilinos/EpetraExport.hpp"
#include "linearAlgebra/common/LinearOperator.hpp"
#include "linearAlgebra/interfaces/MatrixBase.hpp"
 
class Epetra_Map;
class Epetra_CrsMatrix;
class Epetra_FECrsMatrix;
 
namespace geos
{
 
class EpetraMatrix final : public virtual LinearOperator< EpetraVector >,
  private MatrixBase< EpetraMatrix, EpetraVector >
{
public:
 
  using Vector = EpetraVector;
 
  using Export = EpetraExport;
 
 
  EpetraMatrix();
 
  EpetraMatrix( EpetraMatrix const & src );
 
  EpetraMatrix( EpetraMatrix && src ) noexcept;
 
  EpetraMatrix & operator=( EpetraMatrix const & src );
 
  EpetraMatrix & operator=( EpetraMatrix && src ) noexcept;
 
  virtual ~EpetraMatrix() override;
 
 
 
  using MatrixBase::createWithLocalSize;
  using MatrixBase::createWithGlobalSize;
  using MatrixBase::create;
  using MatrixBase::closed;
  using MatrixBase::assembled;
  using MatrixBase::insertable;
  using MatrixBase::modifiable;
  using MatrixBase::ready;
  using MatrixBase::residual;
  using MatrixBase::setDofManager;
  using MatrixBase::dofManager;
  using MatrixBase::extract;
  using MatrixBase::extractLocal;
  using MatrixBase::multiplyPtAP;
  using MatrixBase::multiplyP1tAP2;
 
  virtual void createWithLocalSize( localIndex const localRows,
                                    localIndex const localCols,
                                    localIndex const maxEntriesPerRow,
                                    MPI_Comm const & comm ) override;
 
  virtual void createWithGlobalSize( globalIndex const globalRows,
                                     globalIndex const globalCols,
                                     localIndex const maxEntriesPerRow,
                                     MPI_Comm const & comm ) override;
 
  virtual void open() override;
 
  virtual void close() override;
 
  virtual bool created() const override;
 
  virtual void reset() override;
 
  virtual void set( real64 const value ) override;
 
  virtual void zero() override;
 
  virtual void add( globalIndex const rowIndex,
                    globalIndex const colIndex,
                    real64 const value ) override;
 
  virtual void set( globalIndex const rowIndex,
                    globalIndex const colIndex,
                    real64 const value ) override;
 
  virtual void insert( globalIndex const rowIndex,
                       globalIndex const colIndex,
                       real64 const value ) override;
 
  virtual void add( globalIndex const rowIndex,
                    globalIndex const * colIndices,
                    real64 const * values,
                    localIndex const size ) override;
 
  virtual void set( globalIndex const rowIndex,
                    globalIndex const * colIndices,
                    real64 const * values,
                    localIndex const size ) override;
 
  virtual void insert( globalIndex const rowIndex,
                       globalIndex const * colIndices,
                       real64 const * values,
                       localIndex const size ) override;
 
  virtual void add( globalIndex const rowIndex,
                    arraySlice1d< globalIndex const > const & colIndices,
                    arraySlice1d< real64 const > const & values ) override;
 
  virtual void set( globalIndex const rowIndex,
                    arraySlice1d< globalIndex const > const & colIndices,
                    arraySlice1d< real64 const > const & values ) override;
 
  virtual void insert( globalIndex const rowIndex,
                       arraySlice1d< globalIndex const > const & colIndices,
                       arraySlice1d< real64 const > const & values ) override;
 
  virtual void add( arraySlice1d< globalIndex const > const & rowIndices,
                    arraySlice1d< globalIndex const > const & colIndices,
                    arraySlice2d< real64 const > const & values ) override;
 
  virtual void set( arraySlice1d< globalIndex const > const & rowIndices,
                    arraySlice1d< globalIndex const > const & colIndices,
                    arraySlice2d< real64 const > const & values ) override;
 
  virtual void insert( arraySlice1d< globalIndex const > const & rowIndices,
                       arraySlice1d< globalIndex const > const & colIndices,
                       arraySlice2d< real64 const > const & values ) override;
 
  virtual void add( globalIndex const * rowIndices,
                    globalIndex const * colIndices,
                    real64 const * values,
                    localIndex const numRows,
                    localIndex const numCols ) override;
 
  virtual void set( globalIndex const * rowIndices,
                    globalIndex const * colIndices,
                    real64 const * values,
                    localIndex const numRows,
                    localIndex const numCols ) override;
 
  virtual void insert( globalIndex const * rowIndices,
                       globalIndex const * colIndices,
                       real64 const * values,
                       localIndex const numRows,
                       localIndex const numCols ) override;
 
  virtual void insert( arrayView1d< globalIndex const > const & rowIndices,
                       arrayView1d< globalIndex const > const & colIndices,
                       arrayView1d< real64 const > const & values ) override;
 
  virtual void apply( EpetraVector const & src,
                      EpetraVector & dst ) const override;
 
  virtual void applyTranspose( EpetraVector const & src,
                               EpetraVector & dst ) const override;
 
  virtual void multiply( EpetraMatrix const & src,
                         EpetraMatrix & dst ) const override;
 
  virtual void leftMultiplyTranspose( EpetraMatrix const & src,
                                      EpetraMatrix & dst ) const override;
 
  virtual void rightMultiplyTranspose( EpetraMatrix const & src,
                                       EpetraMatrix & dst ) const override;
 
  virtual void multiplyRAP( EpetraMatrix const & R,
                            EpetraMatrix const & P,
                            EpetraMatrix & dst ) const override;
 
  virtual void multiplyPtAP( EpetraMatrix const & P,
                             EpetraMatrix & dst ) const override;
 
  virtual void gemv( real64 const alpha,
                     EpetraVector const & x,
                     real64 const beta,
                     EpetraVector & y,
                     bool useTranspose = false ) const override;
 
  virtual void scale( real64 const scalingFactor ) override;
 
  virtual void leftScale( EpetraVector const & vec ) override;
 
  virtual void rightScale( EpetraVector const & vec ) override;
 
  virtual void leftRightScale( EpetraVector const & vecLeft,
                               EpetraVector const & vecRight ) override;
 
  virtual void computeScalingVector( EpetraVector & scaling ) const override;
 
  virtual void rescaleRows( arrayView1d< globalIndex const > const & rowIndices,
                            RowSumType const rowSumType ) override;
 
  virtual void transpose( EpetraMatrix & dst ) const override;
 
  virtual void separateComponentFilter( EpetraMatrix & dst,
                                        integer const dofsPerNode ) const override;
 
  virtual real64 clearRow( globalIndex const row,
                           bool const keepDiag = false,
                           real64 const diagValue = 0.0 ) override;
 
  virtual void addEntries( EpetraMatrix const & src,
                           MatrixPatternOp const op,
                           real64 const scale ) override;
 
  virtual void addDiagonal( EpetraVector const & src,
                            real64 const scale ) override;
 
  virtual void clampEntries( real64 const lo,
                             real64 const hi,
                             bool const excludeDiag ) override;
 
  virtual localIndex maxRowLengthLocal() const override;
 
  virtual localIndex maxRowLength() const override;
 
  virtual localIndex rowLength( globalIndex const globalRowIndex ) const override;
 
  virtual void getRowLengths( arrayView1d< localIndex > const & lengths ) const override;
 
  virtual void getRowLocalLengths( arrayView1d< localIndex > const & lengths ) const override;
 
  virtual void getRowCopy( globalIndex globalRow,
                           arraySlice1d< globalIndex > const & colIndices,
                           arraySlice1d< real64 > const & values ) const override;
 
  virtual void extractDiagonal( EpetraVector & dst ) const override;
 
  virtual void extract( CRSMatrixView< real64, globalIndex > const & localMat ) const override;
 
  virtual void extract( CRSMatrixView< real64, globalIndex const > const & localMat ) const override;
 
  virtual void extractLocal( CRSMatrixView< real64, localIndex > const & localMat ) const override;
 
  virtual void getRowSums( EpetraVector & dst,
                           RowSumType const rowSumType ) const override;
 
  virtual globalIndex numGlobalRows() const override;
 
  virtual globalIndex numGlobalCols() const override;
 
  virtual localIndex numLocalRows() const override;
 
  virtual localIndex numLocalCols() const override;
 
  virtual globalIndex ilower() const override;
 
  virtual globalIndex iupper() const override;
 
  virtual globalIndex jlower() const override;
 
  virtual globalIndex jupper() const override;
 
  virtual localIndex numLocalNonzeros() const override;
 
  virtual globalIndex numGlobalNonzeros() const override;
 
  virtual real64 normInf() const override;
 
  virtual real64 norm1() const override;
 
  virtual real64 normFrobenius() const override;
 
  virtual real64 normMax() const override;
 
  virtual real64 normMax( arrayView1d< globalIndex const > const & rowIndices ) const override;
 
  virtual localIndex getLocalRowID( globalIndex const index ) const override;
 
  virtual globalIndex getGlobalRowID( localIndex const index ) const override;
 
  virtual MPI_Comm comm() const override;
 
  virtual void print( std::ostream & os = std::cout ) const override;
 
  virtual void write( string const & filename,
                      LAIOutputFormat const format = LAIOutputFormat::MATRIX_MARKET ) const override;
 
 
  Epetra_FECrsMatrix const & unwrapped() const;
 
  Epetra_FECrsMatrix & unwrapped();
 
private:
 
  void multiply( bool const transA,
                 EpetraMatrix const & B,
                 bool const transB,
                 EpetraMatrix & C ) const;
 
  void create( Epetra_CrsMatrix const & src );
 
  std::unique_ptr< Epetra_FECrsMatrix > m_matrix;
 
  std::unique_ptr< Epetra_Map > m_src_map;
 
  std::unique_ptr< Epetra_Map > m_dst_map;
};
 
} // namespace geos
 
#endif /*GEOS_LINEARALGEBRA_INTERFACES_EPETRAMATRIX_HPP_*/