FLA_Axpy.c File Reference

(r)


Functions

FLA_Error FLA_Axpy (FLA_Obj alpha, FLA_Obj A, FLA_Obj B)
void FLA_F2C() fla_axpy_f (F_INT *alpha, F_INT *A, F_INT *B, F_INT *IERROR)

Variables

fla_axpy_tfla_axpy_cntl_blas

Function Documentation

FLA_Error FLA_Axpy ( FLA_Obj  alpha,
FLA_Obj  A,
FLA_Obj  B 
)

References FLA_Axpy_check(), FLA_Axpy_internal(), and FLA_Check_error_level().

Referenced by fla_axpy_f().

00038 {
00039   FLA_Error r_val;
00040 
00041   // Check parameters.
00042   if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
00043     FLA_Axpy_check( alpha, A, B );
00044 
00045   // Invoke FLA_Axpy_internal() with flat control tree that simply calls
00046   // external wrapper.
00047   r_val = FLA_Axpy_internal( alpha, A, B, fla_axpy_cntl_blas );
00048 
00049   return r_val;
00050 }

void FLA_F2C() fla_axpy_f ( F_INT *  alpha,
F_INT *  A,
F_INT *  B,
F_INT *  IERROR 
)

References FLA_Axpy().

00054 {
00055   *IERROR = FLA_Axpy( *( ( FLA_Obj * ) alpha ),
00056                       *( ( FLA_Obj * ) A     ),
00057                       *( ( FLA_Obj * ) B     ) );
00058 }


Variable Documentation


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