CMatrix.cc File Reference

#include <cfloat>
#include <iostream>
#include <vector>
#include <sys/types.h>
#include "Array-util.h"
#include "CMatrix.h"
#include "CmplxAEPBAL.h"
#include "CmplxCHOL.h"
#include "CmplxSCHUR.h"
#include "CmplxSVD.h"
#include "DET.h"
#include "f77-fcn.h"
#include "functor.h"
#include "lo-error.h"
#include "lo-ieee.h"
#include "lo-mappers.h"
#include "lo-utils.h"
#include "mx-base.h"
#include "mx-cm-dm.h"
#include "mx-cm-s.h"
#include "mx-dm-cm.h"
#include "mx-inlines.cc"
#include "mx-op-defs.h"
#include "oct-cmplx.h"
#include "oct-fftw.h"
#include "oct-locbuf.h"
#include "oct-norm.h"

Include dependency graph for CMatrix.cc:

Go to the source code of this file.

Defines
#define	EMPTY_RETURN_CHECK(T)
Functions
static const Complex	Complex_NaN_result (octave_NaN, octave_NaN)
ComplexMatrix	conj (const ComplexMatrix &a)
F77_RET_T	F77_FUNC (zgebal, ZGEBAL)(F77_CONST_CHAR_ARG_DECL
F77_RET_T	F77_FUNC (zgemm, ZGEMM)(F77_CONST_CHAR_ARG_DECL
F77_RET_T const Complex const octave_idx_type const Complex const octave_idx_type Complex &F77_RET_T const Complex const octave_idx_type const Complex const octave_idx_type Complex &F77_RET_T	F77_FUNC (zsyrk, ZSYRK)(F77_CONST_CHAR_ARG_DECL
F77_RET_T const octave_idx_type const octave_idx_type Complex const octave_idx_type Complex const octave_idx_type octave_idx_type double octave_idx_type Complex const octave_idx_type double octave_idx_type &F77_RET_T const octave_idx_type const octave_idx_type Complex const octave_idx_type Complex const octave_idx_type double double octave_idx_type Complex const octave_idx_type double octave_idx_type octave_idx_type &F77_RET_T	F77_FUNC (zpotrf, ZPOTRF)(F77_CONST_CHAR_ARG_DECL
F77_RET_T	F77_FUNC (zpocon, ZPOCON)(F77_CONST_CHAR_ARG_DECL
F77_RET_T	F77_FUNC (zherk, ZHERK)(F77_CONST_CHAR_ARG_DECL
F77_RET_T	F77_FUNC (zpotrs, ZPOTRS)(F77_CONST_CHAR_ARG_DECL
F77_RET_T	F77_FUNC (ztrtri, ZTRTRI)(F77_CONST_CHAR_ARG_DECL
F77_RET_T	F77_FUNC (zgemv, ZGEMV)(F77_CONST_CHAR_ARG_DECL
F77_RET_T	F77_FUNC (zgetrf, ZGETRF)(const octave_idx_type &
F77_RET_T	F77_FUNC (ztrcon, ZTRCON)(F77_CONST_CHAR_ARG_DECL
F77_RET_T	F77_FUNC (ztrtrs, ZTRTRS)(F77_CONST_CHAR_ARG_DECL
F77_RET_T const octave_idx_type Complex const octave_idx_type octave_idx_type octave_idx_type &F77_RET_T	F77_FUNC (zgetrs, ZGETRS)(F77_CONST_CHAR_ARG_DECL
F77_RET_T	F77_FUNC (zlartg, ZLARTG)(const Complex &
F77_RET_T const Complex double Complex Complex &F77_RET_T	F77_FUNC (ztrsyl, ZTRSYL)(F77_CONST_CHAR_ARG_DECL
F77_RET_T	F77_FUNC (xilaenv, XILAENV)(const octave_idx_type &
F77_RET_T	F77_FUNC (xzdotu, XZDOTU)(const octave_idx_type &
F77_RET_T	F77_FUNC (xzlange, XZLANGE)(F77_CONST_CHAR_ARG_DECL
F77_RET_T Complex *F77_RET_T Complex Complex *F77_RET_T	F77_FUNC (zfftb, ZFFTB)(const octave_idx_type &
F77_RET_T Complex *F77_RET_T	F77_FUNC (zfftf, ZFFTF)(const octave_idx_type &
F77_RET_T	F77_FUNC (zffti, ZFFTI)(const octave_idx_type &
F77_RET_T	F77_FUNC (zgetri, ZGETRI)(const octave_idx_type &
F77_RET_T	F77_FUNC (dgebak, DGEBAK)(F77_CONST_CHAR_ARG_DECL
F77_RET_T Complex const octave_idx_type const octave_idx_type Complex const octave_idx_type octave_idx_type &F77_RET_T	F77_FUNC (zgecon, ZGECON)(F77_CONST_CHAR_ARG_DECL
F77_RET_T const Complex const octave_idx_type const Complex const octave_idx_type Complex &F77_RET_T	F77_FUNC (xzdotc, XZDOTC)(const octave_idx_type &
F77_RET_T	F77_FUNC (zgelsy, ZGELSY)(const octave_idx_type &
F77_RET_T const octave_idx_type const octave_idx_type Complex const octave_idx_type Complex const octave_idx_type octave_idx_type double octave_idx_type Complex const octave_idx_type double octave_idx_type &F77_RET_T	F77_FUNC (zgelsd, ZGELSD)(const octave_idx_type &
static char	get_blas_trans_arg (bool trans, bool conj)
ComplexMatrix	Givens (const Complex &x, const Complex &y)
ComplexMatrix	linspace (const ComplexColumnVector &x1, const ComplexColumnVector &x2, octave_idx_type n)
ComplexMatrix	max (const ComplexMatrix &a, const ComplexMatrix &b)
ComplexMatrix	max (const Complex &c, const ComplexMatrix &m)
ComplexMatrix	max (const ComplexMatrix &m, const Complex &c)
ComplexMatrix	min (const Complex &c, const ComplexMatrix &m)
ComplexMatrix	min (const ComplexMatrix &a, const ComplexMatrix &b)
ComplexMatrix	min (const ComplexMatrix &m, const Complex &c)
ComplexMatrix	operator* (const ComplexMatrix &m, const Matrix &a)
ComplexMatrix	operator* (const ComplexColumnVector &a, const RowVector &b)
ComplexMatrix	operator* (const ComplexColumnVector &v, const ComplexRowVector &a)
ComplexMatrix	operator* (const ColumnVector &v, const ComplexRowVector &a)
ComplexMatrix	operator* (const ComplexMatrix &a, const ComplexMatrix &b)
ComplexMatrix	operator* (const Matrix &m, const ComplexMatrix &a)
std::ostream &	operator<< (std::ostream &os, const ComplexMatrix &a)
std::istream &	operator>> (std::istream &is, ComplexMatrix &a)
ComplexMatrix	Sylvester (const ComplexMatrix &a, const ComplexMatrix &b, const ComplexMatrix &c)
ComplexMatrix	xgemm (const ComplexMatrix &a, const ComplexMatrix &b, blas_trans_type transa, blas_trans_type transb)
Variables
F77_RET_T const octave_idx_type const octave_idx_type const octave_idx_type const octave_idx_type octave_idx_type &F77_CHAR_ARG_LEN_DECL	F77_CHAR_ARG_LEN_DECL
F77_RET_T	F77_CONST_CHAR_ARG_DECL

---

Define Documentation

#define EMPTY_RETURN_CHECK

(

T

)

Value:

if (nr == 0 || nc == 0) \
    return T (nr, nc);

Definition at line 3864 of file CMatrix.cc.

Referenced by max(), and min().

---

Function Documentation

static const Complex Complex_NaN_result	(	octave_NaN	,
		octave_NaN
	)			[static]

ComplexMatrix conj

(

const ComplexMatrix &

a

)

Definition at line 922 of file CMatrix.cc.

F77_RET_T F77_FUNC	(	zgebal	,
		ZGEBAL
	)

F77_RET_T F77_FUNC	(	zgemm	,
		ZGEMM
	)

F77_RET_T const Complex const octave_idx_type const Complex const octave_idx_type Complex& F77_RET_T const Complex const octave_idx_type const Complex const octave_idx_type Complex& F77_RET_T F77_FUNC	(	zsyrk	,
		ZSYRK
	)

F77_RET_T const octave_idx_type const octave_idx_type Complex const octave_idx_type Complex const octave_idx_type octave_idx_type double octave_idx_type Complex const octave_idx_type double octave_idx_type& F77_RET_T const octave_idx_type const octave_idx_type Complex const octave_idx_type Complex const octave_idx_type double double octave_idx_type Complex const octave_idx_type double octave_idx_type octave_idx_type& F77_RET_T F77_FUNC	(	zpotrf	,
		ZPOTRF
	)

F77_RET_T F77_FUNC	(	zpocon	,
		ZPOCON
	)

F77_RET_T F77_FUNC	(	zherk	,
		ZHERK
	)

F77_RET_T F77_FUNC	(	zpotrs	,
		ZPOTRS
	)

F77_RET_T F77_FUNC	(	ztrtri	,
		ZTRTRI
	)

F77_RET_T F77_FUNC	(	zgemv	,
		ZGEMV
	)

F77_RET_T F77_FUNC	(	zgetrf	,
		ZGETRF
	)			const

F77_RET_T F77_FUNC	(	ztrcon	,
		ZTRCON
	)

F77_RET_T F77_FUNC	(	ztrtrs	,
		ZTRTRS
	)

F77_RET_T const octave_idx_type Complex const octave_idx_type octave_idx_type octave_idx_type& F77_RET_T F77_FUNC	(	zgetrs	,
		ZGETRS
	)

F77_RET_T F77_FUNC	(	zlartg	,
		ZLARTG
	)			const

F77_RET_T const Complex double Complex Complex& F77_RET_T F77_FUNC	(	ztrsyl	,
		ZTRSYL
	)

F77_RET_T F77_FUNC	(	xilaenv	,
		XILAENV
	)			const

F77_RET_T F77_FUNC	(	xzdotu	,
		XZDOTU
	)			const

F77_RET_T F77_FUNC	(	xzlange	,
		XZLANGE
	)

F77_RET_T Complex* F77_RET_T Complex Complex* F77_RET_T F77_FUNC	(	zfftb	,
		ZFFTB
	)			const

F77_RET_T Complex* F77_RET_T F77_FUNC	(	zfftf	,
		ZFFTF
	)			const

F77_RET_T F77_FUNC	(	zffti	,
		ZFFTI
	)			const

F77_RET_T F77_FUNC	(	zgetri	,
		ZGETRI
	)			const

F77_RET_T F77_FUNC	(	dgebak	,
		DGEBAK
	)

F77_RET_T Complex const octave_idx_type const octave_idx_type Complex const octave_idx_type octave_idx_type& F77_RET_T F77_FUNC	(	zgecon	,
		ZGECON
	)

F77_RET_T const Complex const octave_idx_type const Complex const octave_idx_type Complex& F77_RET_T F77_FUNC	(	xzdotc	,
		XZDOTC
	)			const

F77_RET_T F77_FUNC	(	zgelsy	,
		ZGELSY
	)			const

F77_RET_T const octave_idx_type const octave_idx_type Complex const octave_idx_type Complex const octave_idx_type octave_idx_type double octave_idx_type Complex const octave_idx_type double octave_idx_type& F77_RET_T F77_FUNC	(	zgelsd	,
		ZGELSD
	)			const

static char get_blas_trans_arg	(	bool	trans,
		bool	conj
	)			[inline, static]

Definition at line 3734 of file CMatrix.cc.

Referenced by xgemm().

ComplexMatrix Givens	(	const Complex &	x,
		const Complex &	y
	)

Definition at line 3626 of file CMatrix.cc.

Referenced by DEFUN_DLD().

ComplexMatrix linspace	(	const ComplexColumnVector &	x1,
		const ComplexColumnVector &	x2,
		octave_idx_type	n
	)

Definition at line 4047 of file CMatrix.cc.

References current_liboctave_error_handler, and Array< T >::length().

Referenced by do_linspace().

ComplexMatrix max	(	const ComplexMatrix &	a,
		const ComplexMatrix &	b
	)

Definition at line 3997 of file CMatrix.cc.

References Array< T >::columns(), ComplexMatrix::ComplexMatrix(), EMPTY_RETURN_CHECK, imag(), real, Array< T >::rows(), and xmax().

ComplexMatrix max	(	const Complex &	c,
		const ComplexMatrix &	m
	)

Definition at line 3957 of file CMatrix.cc.

References Array< T >::columns(), EMPTY_RETURN_CHECK, Array< T >::rows(), and xmax().

ComplexMatrix max	(	const ComplexMatrix &	m,
		const Complex &	c
	)

Definition at line 3977 of file CMatrix.cc.

References Array< T >::columns(), EMPTY_RETURN_CHECK, Array< T >::rows(), and xmax().

ComplexMatrix min	(	const Complex &	c,
		const ComplexMatrix &	m
	)

Definition at line 3869 of file CMatrix.cc.

References Array< T >::columns(), EMPTY_RETURN_CHECK, Array< T >::rows(), and xmin().

ComplexMatrix min	(	const ComplexMatrix &	a,
		const ComplexMatrix &	b
	)

Definition at line 3909 of file CMatrix.cc.

References Array< T >::columns(), ComplexMatrix::ComplexMatrix(), EMPTY_RETURN_CHECK, imag(), real, Array< T >::rows(), and xmin().

ComplexMatrix min	(	const ComplexMatrix &	m,
		const Complex &	c
	)

Definition at line 3889 of file CMatrix.cc.

References Array< T >::columns(), EMPTY_RETURN_CHECK, Array< T >::rows(), and xmin().

ComplexMatrix operator*	(	const ComplexMatrix &	m,
		const Matrix &	a
	)

Definition at line 3695 of file CMatrix.cc.

References Array< T >::columns(), ComplexMatrix::ComplexMatrix(), imag(), min(), real, and Array< T >::rows().

ComplexMatrix operator*	(	const ComplexColumnVector &	a,
		const RowVector &	b
	)

Definition at line 2913 of file CMatrix.cc.

ComplexMatrix operator*	(	const ComplexColumnVector &	v,
		const ComplexRowVector &	a
	)

Definition at line 2920 of file CMatrix.cc.

References ComplexMatrix::ComplexMatrix(), Array< T >::data(), F77_CHAR_ARG_LEN, F77_CONST_CHAR_ARG2, F77_XFCN, Array< T >::fortran_vec(), and Array< T >::length().

ComplexMatrix operator*	(	const ColumnVector &	v,
		const ComplexRowVector &	a
	)

Definition at line 2906 of file CMatrix.cc.

ComplexMatrix operator*	(	const ComplexMatrix &	a,
		const ComplexMatrix &	b
	)

Definition at line 3856 of file CMatrix.cc.

References xgemm().

ComplexMatrix operator*	(	const Matrix &	m,
		const ComplexMatrix &	a
	)

Definition at line 3704 of file CMatrix.cc.

References Array< T >::columns(), ComplexMatrix::ComplexMatrix(), imag(), min(), real, and Array< T >::rows().

std::ostream& operator<<	(	std::ostream &	os,
		const ComplexMatrix &	a
	)

Definition at line 3586 of file CMatrix.cc.

References Array< T >::cols(), Array< T >::elem(), octave_write_complex(), and Array< T >::rows().

std::istream& operator>>	(	std::istream &	is,
		ComplexMatrix &	a
	)

Definition at line 3601 of file CMatrix.cc.

References Array< T >::cols(), Array< T >::elem(), and Array< T >::rows().

ComplexMatrix Sylvester	(	const ComplexMatrix &	a,
		const ComplexMatrix &	b,
		const ComplexMatrix &	c
	)

Definition at line 3644 of file CMatrix.cc.

References F77_CHAR_ARG_LEN, F77_CONST_CHAR_ARG2, F77_XFCN, Array< T >::fortran_vec(), ComplexMatrix::hermitian(), Array< T >::rows(), ComplexSCHUR::schur_matrix(), and ComplexSCHUR::unitary_matrix().

Referenced by DEFUN_DLD().

ComplexMatrix xgemm	(	const ComplexMatrix &	a,
		const ComplexMatrix &	b,
		blas_trans_type	transa,
		blas_trans_type	transb
	)

Definition at line 3742 of file CMatrix.cc.

References Array< T >::cols(), ComplexMatrix::ComplexMatrix(), conj(), Array< T >::data(), F77_CHAR_ARG_LEN, F77_CONST_CHAR_ARG2, F77_FUNC(), F77_XFCN, Array< T >::fortran_vec(), get_blas_trans_arg(), gripe_nonconformant(), Array< T >::rows(), Array< T >::xelem(), xzdotc(), and xzdotu().

Referenced by DEFBINOP(), do_sqrtm(), and operator*().

---

Variable Documentation

F77_RET_T const octave_idx_type const octave_idx_type const Complex const octave_idx_type double double& F77_CHAR_ARG_LEN_DECL

Definition at line 68 of file CMatrix.cc.

F77_RET_T const Complex double Complex Complex& F77_RET_T F77_CONST_CHAR_ARG_DECL

Definition at line 68 of file CMatrix.cc.