void bli_symm_basic_check( side_t side, obj_t* alpha, obj_t* a, obj_t* b, obj_t* beta, obj_t* c ) { // The basic properties of symm are identical to that of hemm. bli_hemm_basic_check( side, alpha, a, b, beta, c ); }
void bli_hemm_int_check( side_t side, obj_t* alpha, obj_t* a, obj_t* b, obj_t* beta, obj_t* c, gemm_t* cntl ) { err_t e_val; // Check basic properties of the operation. bli_hemm_basic_check( side, alpha, a, b, beta, c ); // Check control tree pointer. e_val = bli_check_valid_cntl( ( void* )cntl ); bli_check_error_code( e_val ); }
void bli_hemm_check( side_t side, obj_t* alpha, obj_t* a, obj_t* b, obj_t* beta, obj_t* c ) { err_t e_val; // Check object pointers. e_val = bli_check_null_pointer( alpha ); bli_check_error_code( e_val ); e_val = bli_check_null_pointer( a ); bli_check_error_code( e_val ); e_val = bli_check_null_pointer( b ); bli_check_error_code( e_val ); e_val = bli_check_null_pointer( beta ); bli_check_error_code( e_val ); e_val = bli_check_null_pointer( c ); bli_check_error_code( e_val ); // Check basic properties of the operation. bli_hemm_basic_check( side, alpha, a, b, beta, c ); // Check matrix squareness. e_val = bli_check_square_object( a ); bli_check_error_code( e_val ); // Check matrix structure. e_val = bli_check_hermitian_object( a ); bli_check_error_code( e_val ); }