|
libflame
12600
|
Functions | |
| FLA_Error | FLA_Gemm (FLA_Trans transa, FLA_Trans transb, FLA_Obj alpha, FLA_Obj A, FLA_Obj B, FLA_Obj beta, FLA_Obj C) |
Variables | |
| fla_gemm_t * | fla_gemm_cntl_mm_op |
| FLA_Error FLA_Gemm | ( | FLA_Trans | transa, |
| FLA_Trans | transb, | ||
| FLA_Obj | alpha, | ||
| FLA_Obj | A, | ||
| FLA_Obj | B, | ||
| FLA_Obj | beta, | ||
| FLA_Obj | C | ||
| ) |
References FLA_Check_error_level(), FLA_Gemm_check(), FLA_Gemm_external(), and FLA_Gemm_internal().
Referenced by FLA_Svd_ext_u_unb_var1(), FLA_Svd_uv_unb_var1(), and FLA_Svd_uv_unb_var2().
{
FLA_Error r_val = FLA_SUCCESS;
// Check parameters.
if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
FLA_Gemm_check( transa, transb, alpha, A, B, beta, C );
#ifdef FLA_ENABLE_BLAS3_FRONT_END_CNTL_TREES
r_val = FLA_Gemm_internal( transa, transb, alpha, A, B, beta, C, fla_gemm_cntl_mm_op );
#else
r_val = FLA_Gemm_external( transa, transb, alpha, A, B, beta, C );
#endif
return r_val;
}
1.7.6.1