FLA_Copy_global_to_submatrix_check.c File Reference

(r)


Functions

FLA_Error FLA_Copy_global_to_submatrix_check (FLA_Trans trans, dim_t i, dim_t j, FLA_Obj A, dim_t m, dim_t n, void *B_buffer, dim_t ldim)

Function Documentation

FLA_Error FLA_Copy_global_to_submatrix_check ( FLA_Trans  trans,
dim_t  i,
dim_t  j,
FLA_Obj  A,
dim_t  m,
dim_t  n,
void *  B_buffer,
dim_t  ldim 
)

References FLA_Check_floating_object(), FLA_Check_m_against_ldim(), FLA_Check_nonconstant_object(), FLA_Check_null_pointer(), FLA_Check_object_dims(), FLA_Check_submatrix_dims_and_offset(), and FLA_Check_valid_real_trans().

Referenced by FLA_Copy_global_to_submatrix().

00036 {
00037   FLA_Error e_val;
00038 
00039   e_val = FLA_Check_valid_real_trans( trans );
00040   FLA_Check_error_code( e_val );
00041 
00042   e_val = FLA_Check_floating_object( A );
00043   FLA_Check_error_code( e_val );
00044 
00045   e_val = FLA_Check_nonconstant_object( A );
00046   FLA_Check_error_code( e_val );
00047 
00048   e_val = FLA_Check_null_pointer( B_buffer );
00049   FLA_Check_error_code( e_val );
00050 
00051   e_val = FLA_Check_object_dims( trans, m, n, A );
00052   FLA_Check_error_code( e_val );
00053 
00054   e_val = FLA_Check_m_against_ldim( m, ldim );
00055   FLA_Check_error_code( e_val );
00056 
00057   if ( trans == FLA_NO_TRANSPOSE )
00058   {
00059     e_val = FLA_Check_submatrix_dims_and_offset( m, n, i, j, A );
00060     FLA_Check_error_code( e_val );
00061   }
00062   else
00063   {
00064     e_val = FLA_Check_submatrix_dims_and_offset( n, m, i, j, A );
00065     FLA_Check_error_code( e_val );
00066   }
00067 
00068   e_val = FLA_Check_nonconstant_object( A );
00069   FLA_Check_error_code( e_val );
00070 
00071   return FLA_SUCCESS;
00072 }


Generated on Mon Jul 6 05:45:51 2009 for libflame by  doxygen 1.5.9