libflame  revision_anchor
Functions
FLA_Gemv_n.c File Reference

(r)

Functions

FLA_Error FLA_Gemv_n (FLA_Obj alpha, FLA_Obj A, FLA_Obj x, FLA_Obj beta, FLA_Obj y, fla_gemv_t *cntl)
 

Function Documentation

◆ FLA_Gemv_n()

FLA_Error FLA_Gemv_n ( FLA_Obj  alpha,
FLA_Obj  A,
FLA_Obj  x,
FLA_Obj  beta,
FLA_Obj  y,
fla_gemv_t cntl 
)
14 {
15  FLA_Error r_val = FLA_SUCCESS;
16 
17  if ( FLA_Cntl_variant( cntl ) == FLA_SUBPROBLEM )
18  {
19  r_val = FLA_Gemv_n_task( alpha, A, x, beta, y, cntl );
20  }
21  else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT1 )
22  {
23  r_val = FLA_Gemv_n_blk_var1( alpha, A, x, beta, y, cntl );
24  }
25 #ifdef FLA_ENABLE_NON_CRITICAL_CODE
26  else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT2 )
27  {
28  r_val = FLA_Gemv_n_blk_var2( alpha, A, x, beta, y, cntl );
29  }
30 #endif
31  else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT5 )
32  {
33  r_val = FLA_Gemv_n_blk_var5( alpha, A, x, beta, y, cntl );
34  }
35 #ifdef FLA_ENABLE_NON_CRITICAL_CODE
36  else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT6 )
37  {
38  r_val = FLA_Gemv_n_blk_var6( alpha, A, x, beta, y, cntl );
39  }
40 #endif
41  else
42  {
43  r_val = FLA_Check_error_code( FLA_NOT_YET_IMPLEMENTED );
44  }
45 
46  return r_val;
47 }
FLA_Error FLA_Gemv_n_blk_var2(FLA_Obj alpha, FLA_Obj A, FLA_Obj x, FLA_Obj beta, FLA_Obj y, fla_gemv_t *cntl)
Definition: FLA_Gemv_n_blk_var2.c:15
FLA_Error FLA_Gemv_n_blk_var6(FLA_Obj alpha, FLA_Obj A, FLA_Obj x, FLA_Obj beta, FLA_Obj y, fla_gemv_t *cntl)
Definition: FLA_Gemv_n_blk_var6.c:15
FLA_Error FLA_Gemv_n_blk_var1(FLA_Obj alpha, FLA_Obj A, FLA_Obj x, FLA_Obj beta, FLA_Obj y, fla_gemv_t *cntl)
Definition: FLA_Gemv_n_blk_var1.c:13
FLA_Error FLA_Gemv_n_blk_var5(FLA_Obj alpha, FLA_Obj A, FLA_Obj x, FLA_Obj beta, FLA_Obj y, fla_gemv_t *cntl)
Definition: FLA_Gemv_n_blk_var5.c:13
FLA_Error FLA_Gemv_n_task(FLA_Obj alpha, FLA_Obj A, FLA_Obj x, FLA_Obj beta, FLA_Obj y, fla_gemv_t *cntl)
Definition: FLA_Gemv_task.c:23
int FLA_Error
Definition: FLA_type_defs.h:47

References FLA_Gemv_n_blk_var1(), FLA_Gemv_n_blk_var2(), FLA_Gemv_n_blk_var5(), FLA_Gemv_n_blk_var6(), and FLA_Gemv_n_task().

Referenced by FLA_Gemv_internal().