RectMatrixCol Class Reference

#include <newmatrm.h>

Inheritance diagram for RectMatrixCol:

Public Member Functions
	RectMatrixCol (const Matrix &, int, int, int)
	RectMatrixCol (const Matrix &, int)
void	Reset (const Matrix &, int, int, int)
void	Reset (const Matrix &, int)
void	Down ()
void	Right ()
void	Up ()
void	Left ()
Public Member Functions inherited from RectMatrixRowCol
Real	operator* (const RectMatrixRowCol &) const
void	AddScaled (const RectMatrixRowCol &, Real)
void	Divide (const RectMatrixRowCol &, Real)
void	Divide (Real)
void	Negate ()
void	Zero ()
Real &	operator[] (int i)
Real	SumSquare () const
Real &	First ()
void	DownDiag ()
void	UpDiag ()

Friends
void	ComplexScale (RectMatrixCol &, RectMatrixCol &, Real, Real)
void	Rotate (RectMatrixCol &, RectMatrixCol &, Real, Real)

Additional Inherited Members
Protected Member Functions inherited from RectMatrixRowCol
	RectMatrixRowCol (Real *st, int nx, int sp, int sh)
void	Reset (Real *st, int nx, int sp, int sh)
Protected Attributes inherited from RectMatrixRowCol
Real *	store
int	n
int	spacing
int	shift

Detailed Description

Definition at line 63 of file newmatrm.h.

Constructor & Destructor Documentation

RectMatrixCol() [1/2]

RectMatrixCol::RectMatrixCol ( const Matrix &  M, int  skip, int  col, int  length  )

inline

Definition at line 101 of file newmatrm.h.

   : RectMatrixRowCol( M.Store()+col+skip*M.Ncols(), length, M.Ncols(), 1 ) {}

RectMatrixCol() [2/2]

RectMatrixCol::RectMatrixCol ( const Matrix &  M, int  col  )

inline

Definition at line 104 of file newmatrm.h.

   : RectMatrixRowCol( M.Store()+col, M.Nrows(), M.Ncols(), 1 ) {}

Member Function Documentation

Down()

void RectMatrixCol::Down ( )

inline

Definition at line 70 of file newmatrm.h.

References n.

Referenced by SVD().

{ store += spacing; n--; }

Left()

void RectMatrixCol::Left ( )

inline

Definition at line 73 of file newmatrm.h.

Referenced by SVD().

{ store--; }

Reset() [1/2]

void RectMatrixCol::Reset	(	const Matrix &	M,
		int	skip,
		int	col,
		int	length
	)

Definition at line 38 of file newmatrm.cpp.

References GeneralMatrix::Ncols(), REPORT, RectMatrixRowCol::Reset(), and GeneralMatrix::Store().

{
   REPORT
   RectMatrixRowCol::Reset
      ( M.Store()+col+skip*M.Ncols(), length, M.Ncols(), 1 );
}

Reset() [2/2]

void RectMatrixCol::Reset	(	const Matrix &	M,
		int	col
	)

Definition at line 45 of file newmatrm.cpp.

References GeneralMatrix::Ncols(), GeneralMatrix::Nrows(), REPORT, RectMatrixRowCol::Reset(), and GeneralMatrix::Store().

{
   REPORT
   RectMatrixRowCol::Reset( M.Store()+col, M.Nrows(), M.Ncols(), 1 );
}

Right()

void RectMatrixCol::Right ( )

inline

Definition at line 71 of file newmatrm.h.

Referenced by SVD().

{ store++; }

Up()

void RectMatrixCol::Up ( )

inline

Definition at line 72 of file newmatrm.h.

References n.

Referenced by SVD().

{ store -= spacing; n++; }

Friends And Related Function Documentation

ComplexScale

void ComplexScale ( RectMatrixCol &  U, RectMatrixCol &  V, Real  x, Real  y  )

friend

Definition at line 132 of file newmatrm.cpp.

{
   REPORT
   int n = U.n;
   if (n != V.n)
   {
      Tracer tr("newmatrm");
      Throw(InternalException("Dimensions differ in ComplexScale"));
   }
   Real* u = U.store; Real* v = V.store; 
   int su = U.spacing; int sv = V.spacing;
   //while (n--)
   //{
   //   Real z = *u * x - *v * y;  *v =  *u * y + *v * x;  *u = z;
   //   u += su;  v += sv;
   //}
   if (n) for (;;)
   {
      Real z = *u * x - *v * y;  *v =  *u * y + *v * x;  *u = z;
      if (!(--n)) break;
      u += su;  v += sv;
   }
}

Rotate

void Rotate ( RectMatrixCol &  U, RectMatrixCol &  V, Real  tau, Real  s  )

friend

Definition at line 156 of file newmatrm.cpp.

{
   REPORT
   //  (U, V) = (U, V) * (c, s)  where  tau = s/(1+c), c^2 + s^2 = 1
   int n = U.n;
   if (n != V.n)
   {
      Tracer tr("newmatrm");
      Throw(InternalException("Dimensions differ in Rotate"));
   }
   Real* u = U.store; Real* v = V.store;
   int su = U.spacing; int sv = V.spacing;
   //while (n--)
   //{
   //   Real zu = *u; Real zv = *v;
   //   *u -= s * (zv + zu * tau); *v += s * (zu - zv * tau);
   //   u += su;  v += sv;
   //}
   if (n) for(;;)
   {
      Real zu = *u; Real zv = *v;
      *u -= s * (zv + zu * tau); *v += s * (zu - zv * tau);
      if (!(--n)) break;
      u += su;  v += sv;
   }
}

---

The documentation for this class was generated from the following files:

• newmatrm.h
• newmatrm.cpp