PlayaDenseSerialMatrix.hpp

/* @HEADER@ */
//
 /* @HEADER@ */



#ifndef PLAYA_DENSE_SERIAL_MATRIX_H
#define PLAYA_DENSE_SERIAL_MATRIX_H

#include "PlayaDefs.hpp"
#include "Teuchos_Array.hpp"
#include "Teuchos_RCP.hpp"
#include "PlayaPrintable.hpp"
#include "Teuchos_Describable.hpp"
#include "PlayaLinearOpWithSpacesDecl.hpp"
#include "PlayaSerialVectorSpace.hpp"
#include "PlayaLoadableMatrix.hpp"
#include "PlayaSolverState.hpp"

namespace Playa
{
using namespace Teuchos;

template <class T> class LinearOperator;

class DenseSerialMatrix : public LinearOpWithSpaces<double>,
                          public LoadableMatrix<double>,
                          public Playa::Printable
{
public:
  DenseSerialMatrix(
    const VectorSpace<double>& domain,
    const VectorSpace<double>& range);

  ~DenseSerialMatrix(){;}

  virtual void apply(Teuchos::ETransp transApplyType,
    const Vector<double>& in,
    Vector<double> out) const ;

  virtual void addToRow(int globalRowIndex,
    int nElemsToInsert,
    const int* globalColumnIndices,
    const double* elementValues) ;

  virtual void zero() ;



  void print(std::ostream& os) const ;

  const double * const dataPtr() const {return &(data_[0]);}

  double* dataPtr() {return &(data_[0]);}

  int numRows() const {return nRows_;}

  int numCols() const {return nCols_;}

  void setRow(int row, const Array<double>& rowVals);


private:

  int nRows_;
  int nCols_;
  Array<double> data_;
};


void denseSVD(const LinearOperator<double>& A,
  LinearOperator<double>& U,  
  Vector<double>& Sigma,
  LinearOperator<double>& Vt);

SolverState<double> denseSolve(const LinearOperator<double>& A,
  const Vector<double>& b,
  Vector<double>& x);

}

#endif