libflame  revision_anchor
Functions
FLA_Bidiag_UT_internal_check.c File Reference

(r)

Functions

FLA_Error FLA_Bidiag_UT_internal_check (FLA_Obj A, FLA_Obj TU, FLA_Obj TV, fla_bidiagut_t *cntl)
 

Function Documentation

◆ FLA_Bidiag_UT_internal_check()

FLA_Error FLA_Bidiag_UT_internal_check ( FLA_Obj  A,
FLA_Obj  TU,
FLA_Obj  TV,
fla_bidiagut_t cntl 
)
14 {
15  FLA_Error e_val;
16 
17  // Abort if the control structure is NULL.
18  e_val = FLA_Check_null_pointer( ( void* ) cntl );
19  FLA_Check_error_code( e_val );
20 
21  // Verify that the object element types are identical.
22  e_val = FLA_Check_identical_object_elemtype( A, TU );
23  FLA_Check_error_code( e_val );
24 
25  e_val = FLA_Check_identical_object_elemtype( A, TV );
26  FLA_Check_error_code( e_val );
27 
28  return FLA_SUCCESS;
29 }
FLA_Error FLA_Check_null_pointer(void *ptr)
Definition: FLA_Check.c:518
FLA_Error FLA_Check_identical_object_elemtype(FLA_Obj A, FLA_Obj B)
Definition: FLA_Check.c:987
int FLA_Error
Definition: FLA_type_defs.h:47

References FLA_Check_identical_object_elemtype(), and FLA_Check_null_pointer().

Referenced by FLA_Bidiag_UT_internal().