libflame
revision_anchor
src
lapack
dec
tevd
front
flamec
FLA_Tevd.h
Go to the documentation of this file.
1
/*
2
3
Copyright (C) 2014, The University of Texas at Austin
4
5
This file is part of libflame and is available under the 3-Clause
6
BSD license, which can be found in the LICENSE file at the top-level
7
directory, or at http://opensource.org/licenses/BSD-3-Clause
8
9
*/
10
11
#include "
FLA_Tevd_n.h
"
12
#include "
FLA_Tevd_v.h
"
13
14
// --- MAC_Tevd_eigval_converged() ---------------------------------------------
15
16
#define MAC_Tevd_eigval_converged_ops( eps, safmin, d1, e1, d2 ) \
17
fabsf( e1 ) <= (eps) * sqrt( fabsf( d1 ) ) * sqrt( fabsf( d2 ) ) + (safmin)
18
19
#define MAC_Tevd_eigval_converged_opd( eps, safmin, d1, e1, d2 ) \
20
fabs( e1 ) <= (eps) * sqrt( fabs( d1 ) ) * sqrt( fabs( d2 ) ) + (safmin)
21
22
// --- MAC_Tevd_eigval_converged2() ---------------------------------------------
23
24
#define MAC_Tevd_eigval_converged2_ops( eps2, safmin, d1, e1, d2 ) \
25
(e1) * (e1) <= (eps2) * fabsf( (d1) * (d2) ) + (safmin)
26
27
#define MAC_Tevd_eigval_converged2_opd( eps2, safmin, d1, e1, d2 ) \
28
(e1) * (e1) <= (eps2) * fabs( (d1) * (d2) ) + (safmin)
29
30
FLA_Error
FLA_Tevd
(
FLA_Evd_type
jobz,
FLA_Obj
U,
FLA_Obj
d,
FLA_Obj
e,
FLA_Obj
l );
31
FLA_Tevd
FLA_Error FLA_Tevd(FLA_Evd_type jobz, FLA_Obj U, FLA_Obj d, FLA_Obj e, FLA_Obj l)
Definition:
FLA_Tevd.c:13
FLA_Tevd_n.h
FLA_Tevd_v.h
FLA_Error
int FLA_Error
Definition:
FLA_type_defs.h:47
FLA_Evd_type
int FLA_Evd_type
Definition:
FLA_type_defs.h:64
FLA_Obj_view
Definition:
FLA_type_defs.h:159
Generated on Thu Sep 23 2021 17:46:17 for libflame by
1.9.1