GNU Octave  4.2.1
A high-level interpreted language, primarily intended for numerical computations, mostly compatible with Matlab
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Properties Friends Macros Pages
Namespaces | Macros
svd.cc File Reference
#include "svd.h"
#include <cassert>
#include <algorithm>
#include "CMatrix.h"
#include "dDiagMatrix.h"
#include "fDiagMatrix.h"
#include "dMatrix.h"
#include "fCMatrix.h"
#include "fMatrix.h"
#include "lo-error.h"
#include "lo-lapack-proto.h"
#include "oct-locbuf.h"
Include dependency graph for svd.cc:

Go to the source code of this file.

Namespaces

 octave
 Octave interface to the compression and uncompression libraries.
 
 octave::math
 

Macros

#define GESDD_COMPLEX_STEP(f, F, CMPLX_ARG)
 
#define GESDD_REAL_STEP(f, F)
 
#define GESVD_COMPLEX_STEP(f, F, CMPLX_ARG)
 
#define GESVD_REAL_STEP(f, F)
 

Macro Definition Documentation

#define GESDD_COMPLEX_STEP (   f,
  F,
  CMPLX_ARG 
)
Value:
F77_XFCN (f, F, (F77_CONST_CHAR_ARG2 (&jobz, 1), m, n, \
CMPLX_ARG (tmp_data), m1, \
s_vec, CMPLX_ARG (u), m1, \
CMPLX_ARG (vt), nrow_vt1, \
CMPLX_ARG (work.data ()), lwork, \
rwork.data (), iwork, info \
F77_CHAR_ARG_LEN (1)))
F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_REAL const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_DBLE F77_DBLE &F77_RET_T const F77_REAL F77_REAL &F77_RET_T F77_REAL F77_REAL &F77_RET_T F77_DBLE F77_DBLE &F77_RET_T const F77_DBLE const F77_DBLE * f
u
Definition: lu.cc:138
#define F77_XFCN(f, F, args)
Definition: f77-fcn.h:52
nd deftypefn *octave_map m
Definition: ov-struct.cc:2058
void F(const TSRC *v, TRES *r, octave_idx_type m, octave_idx_type n)
Definition: mx-inlines.cc:719

Definition at line 178 of file svd.cc.

Referenced by svd< T >::gesdd().

#define GESDD_REAL_STEP (   f,
  F 
)
Value:
F77_XFCN (f, F, (F77_CONST_CHAR_ARG2 (&jobz, 1), \
m, n, tmp_data, m1, s_vec, u, m1, vt, nrow_vt1, \
work.data (), lwork, iwork, info \
F77_CHAR_ARG_LEN (1)))
F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_REAL const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_DBLE F77_DBLE &F77_RET_T const F77_REAL F77_REAL &F77_RET_T F77_REAL F77_REAL &F77_RET_T F77_DBLE F77_DBLE &F77_RET_T const F77_DBLE const F77_DBLE * f
u
Definition: lu.cc:138
#define F77_XFCN(f, F, args)
Definition: f77-fcn.h:52
nd deftypefn *octave_map m
Definition: ov-struct.cc:2058
void F(const TSRC *v, TRES *r, octave_idx_type m, octave_idx_type n)
Definition: mx-inlines.cc:719

Definition at line 172 of file svd.cc.

Referenced by svd< T >::gesdd().

#define GESVD_COMPLEX_STEP (   f,
  F,
  CMPLX_ARG 
)
Value:
F77_XFCN (f, F, (F77_CONST_CHAR_ARG2 (&jobu, 1), \
F77_CONST_CHAR_ARG2 (&jobv, 1), \
m, n, CMPLX_ARG (tmp_data), \
m1, s_vec, CMPLX_ARG (u), m1, \
CMPLX_ARG (vt), nrow_vt1, \
CMPLX_ARG (work.data ()), \
lwork, rwork.data (), info \
F77_CHAR_ARG_LEN (1) \
F77_CHAR_ARG_LEN (1)))
F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_REAL const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_DBLE F77_DBLE &F77_RET_T const F77_REAL F77_REAL &F77_RET_T F77_REAL F77_REAL &F77_RET_T F77_DBLE F77_DBLE &F77_RET_T const F77_DBLE const F77_DBLE * f
u
Definition: lu.cc:138
#define F77_XFCN(f, F, args)
Definition: f77-fcn.h:52
nd deftypefn *octave_map m
Definition: ov-struct.cc:2058
void F(const TSRC *v, TRES *r, octave_idx_type m, octave_idx_type n)
Definition: mx-inlines.cc:719

Definition at line 80 of file svd.cc.

Referenced by svd< T >::gesvd().

#define GESVD_REAL_STEP (   f,
  F 
)
Value:
F77_XFCN (f, F, (F77_CONST_CHAR_ARG2 (&jobu, 1), \
F77_CONST_CHAR_ARG2 (&jobv, 1), \
m, n, tmp_data, m1, s_vec, u, m1, vt, \
nrow_vt1, work.data (), lwork, info \
F77_CHAR_ARG_LEN (1) \
F77_CHAR_ARG_LEN (1)))
F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_REAL const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T F77_DBLE &F77_RET_T F77_REAL &F77_RET_T F77_REAL &F77_RET_T F77_DBLE &F77_RET_T const F77_DBLE F77_DBLE &F77_RET_T const F77_REAL F77_REAL &F77_RET_T F77_REAL F77_REAL &F77_RET_T F77_DBLE F77_DBLE &F77_RET_T const F77_DBLE const F77_DBLE * f
u
Definition: lu.cc:138
#define F77_XFCN(f, F, args)
Definition: f77-fcn.h:52
nd deftypefn *octave_map m
Definition: ov-struct.cc:2058
void F(const TSRC *v, TRES *r, octave_idx_type m, octave_idx_type n)
Definition: mx-inlines.cc:719

Definition at line 72 of file svd.cc.

Referenced by svd< T >::gesvd().