Ejemplo n.º 1
0
void bli_trsv_int_check( obj_t*  alpha,
                         obj_t*  a,
                         obj_t*  x,
                         trsv_t* cntl )
{
	err_t e_val;

	// Check basic properties of the operation.

	bli_trsv_basic_check( alpha, a, x );

	// Check object structure

	e_val = bli_check_triangular_object( a );
	bli_check_error_code( e_val );

	// Check object buffers (for non-NULLness).

	e_val = bli_check_object_buffer( alpha );
	bli_check_error_code( e_val );

	e_val = bli_check_object_buffer( a );
	bli_check_error_code( e_val );

	e_val = bli_check_object_buffer( x );
	bli_check_error_code( e_val );

	// Check control tree pointer

	e_val = bli_check_valid_cntl( ( void* )cntl );
	bli_check_error_code( e_val );
}
Ejemplo n.º 2
0
void bli_trsv_check( obj_t*  alpha,
                     obj_t*  a,
                     obj_t*  x )
{
	err_t e_val;

	// Check basic properties of the operation.

	bli_trsv_basic_check( alpha, a, x );

	// Check object structure

	e_val = bli_check_triangular_object( a );
	bli_check_error_code( e_val );
}
Ejemplo n.º 3
0
void bli_trmm3_check( side_t  side,
                      obj_t*  alpha,
                      obj_t*  a,
                      obj_t*  b,
                      obj_t*  beta,
                      obj_t*  c )
{
	err_t e_val;

	// Check basic properties of the operation.

	bli_trmm3_basic_check( side, alpha, a, b, beta, c );

	// Check matrix structure.

	e_val = bli_check_triangular_object( a );
	bli_check_error_code( e_val );
}