62 lines
1.7 KiB
C++
62 lines
1.7 KiB
C++
/* $Header: /var/lib/cvs/dynare_cpp/sylv/cc/BlockDiagonal.h,v 1.1.1.1 2004/06/04 13:00:20 kamenik Exp $ */
|
|
|
|
/* Tag $Name: $ */
|
|
|
|
#ifndef BLOCK_DIAGONAL_H
|
|
#define BLOCK_DIAGONAL_H
|
|
|
|
#include "QuasiTriangular.hh"
|
|
|
|
class BlockDiagonal : public QuasiTriangular
|
|
{
|
|
int *const row_len;
|
|
int *const col_len;
|
|
public:
|
|
BlockDiagonal(const double *d, int d_size);
|
|
BlockDiagonal(int p, const BlockDiagonal &b);
|
|
BlockDiagonal(const BlockDiagonal &b);
|
|
BlockDiagonal(const QuasiTriangular &t);
|
|
const BlockDiagonal &
|
|
operator=(const QuasiTriangular &t)
|
|
{
|
|
GeneralMatrix::operator=(t); return *this;
|
|
}
|
|
const BlockDiagonal &operator=(const BlockDiagonal &b);
|
|
~BlockDiagonal()
|
|
{
|
|
delete [] row_len; delete [] col_len;
|
|
}
|
|
void setZeroBlockEdge(diag_iter edge);
|
|
int getNumZeros() const;
|
|
int getNumBlocks() const;
|
|
int getLargestBlock() const;
|
|
void printInfo() const;
|
|
|
|
void multKron(KronVector &x) const;
|
|
void multKronTrans(KronVector &x) const;
|
|
|
|
const_col_iter col_begin(const DiagonalBlock &b) const;
|
|
col_iter col_begin(const DiagonalBlock &b);
|
|
const_row_iter row_end(const DiagonalBlock &b) const;
|
|
row_iter row_end(const DiagonalBlock &b);
|
|
QuasiTriangular *
|
|
clone() const
|
|
{
|
|
return new BlockDiagonal(*this);
|
|
}
|
|
private:
|
|
void setZerosToRU(diag_iter edge);
|
|
const_diag_iter findBlockStart(const_diag_iter from) const;
|
|
static void savePartOfX(int si, int ei, const KronVector &x, Vector &work);
|
|
void multKronBlock(const_diag_iter start, const_diag_iter end,
|
|
KronVector &x, Vector &work) const;
|
|
void multKronBlockTrans(const_diag_iter start, const_diag_iter end,
|
|
KronVector &x, Vector &work) const;
|
|
};
|
|
|
|
#endif /* BLOCK_DIAGONAL_H */
|
|
|
|
// Local Variables:
|
|
// mode:C++
|
|
// End:
|