Functions | |
FLA_Error | FLA_Gemv (FLA_Trans transa, FLA_Obj alpha, FLA_Obj A, FLA_Obj x, FLA_Obj beta, FLA_Obj y) |
void FLA_F2C() | fla_gemv_f (F_INT *transa, F_INT *alpha, F_INT *A, F_INT *x, F_INT *beta, F_INT *y, F_INT *IERROR) |
Variables | |
fla_gemv_t * | fla_gemv_cntl_blas |
FLA_Error FLA_Gemv | ( | FLA_Trans | transa, | |
FLA_Obj | alpha, | |||
FLA_Obj | A, | |||
FLA_Obj | x, | |||
FLA_Obj | beta, | |||
FLA_Obj | y | |||
) |
References FLA_Check_error_level(), FLA_Gemv_check(), and FLA_Gemv_internal().
Referenced by fla_gemv_f().
00038 { 00039 FLA_Error r_val; 00040 00041 // Check parameters. 00042 if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING ) 00043 FLA_Gemv_check( transa, alpha, A, x, beta, y ); 00044 00045 // Invoke FLA_Gemv_internal() with flat control tree that simply calls 00046 // external wrapper. 00047 r_val = FLA_Gemv_internal( transa, alpha, A, x, beta, y, fla_gemv_cntl_blas ); 00048 00049 return r_val; 00050 }
void FLA_F2C() fla_gemv_f | ( | F_INT * | transa, | |
F_INT * | alpha, | |||
F_INT * | A, | |||
F_INT * | x, | |||
F_INT * | beta, | |||
F_INT * | y, | |||
F_INT * | IERROR | |||
) |