libflame  revision_anchor
Functions
FLA_Bidiag_UT_realify_diagonals_check.c File Reference

(r)

Functions

FLA_Error FLA_Bidiag_UT_realify_diagonals_check (FLA_Uplo uplo, FLA_Obj a, FLA_Obj b, FLA_Obj d, FLA_Obj e)
 

Function Documentation

◆ FLA_Bidiag_UT_realify_diagonals_check()

FLA_Error FLA_Bidiag_UT_realify_diagonals_check ( FLA_Uplo  uplo,
FLA_Obj  a,
FLA_Obj  b,
FLA_Obj  d,
FLA_Obj  e 
)
14 {
15  FLA_Error e_val;
16  dim_t m_a;
17 
18  e_val = FLA_Check_valid_uplo( uplo );
19  FLA_Check_error_code( e_val );
20 
21  e_val = FLA_Check_floating_object( a );
22  FLA_Check_error_code( e_val );
23 
24  e_val = FLA_Check_if_vector( a );
25  FLA_Check_error_code( e_val );
26 
27  m_a = FLA_Obj_vector_dim( a );
28 
29  if ( m_a > 1 )
30  {
31  e_val = FLA_Check_floating_object( b );
32  FLA_Check_error_code( e_val );
33 
34  e_val = FLA_Check_if_vector( b );
35  FLA_Check_error_code( e_val );
36  }
37 
39  FLA_Check_error_code( e_val );
40 
41  e_val = FLA_Check_if_vector( d );
42  FLA_Check_error_code( e_val );
43 
45  FLA_Check_error_code( e_val );
46 
47  e_val = FLA_Check_if_vector( e );
48  FLA_Check_error_code( e_val );
49 
50  e_val = FLA_Check_vector_dim( d, m_a );
51  FLA_Check_error_code( e_val );
52 
53  e_val = FLA_Check_vector_dim( e, m_a );
54  FLA_Check_error_code( e_val );
55 
56  return FLA_SUCCESS;
57 }
FLA_Error FLA_Check_identical_object_datatype(FLA_Obj A, FLA_Obj B)
Definition: FLA_Check.c:967
FLA_Error FLA_Check_vector_dim(FLA_Obj x, dim_t expected_length)
Definition: FLA_Check.c:1213
FLA_Error FLA_Check_if_vector(FLA_Obj A)
Definition: FLA_Check.c:383
FLA_Error FLA_Check_valid_uplo(FLA_Uplo uplo)
Definition: FLA_Check.c:76
dim_t FLA_Obj_vector_dim(FLA_Obj obj)
Definition: FLA_Query.c:137
FLA_Error FLA_Check_floating_object(FLA_Obj A)
Definition: FLA_Check.c:232
int FLA_Error
Definition: FLA_type_defs.h:47
unsigned long dim_t
Definition: FLA_type_defs.h:71

References FLA_Check_floating_object(), FLA_Check_identical_object_datatype(), FLA_Check_if_vector(), FLA_Check_valid_uplo(), FLA_Check_vector_dim(), and FLA_Obj_vector_dim().

Referenced by FLA_Bidiag_UT_realify_diagonals().