FLASH_blas2_prototypes.h File Reference

(r)

Go to the source code of this file.

Functions
FLA_Error	FLASH_Gemv (FLA_Trans transa, FLA_Obj alpha, FLA_Obj A, FLA_Obj x, FLA_Obj beta, FLA_Obj y)
FLA_Error	FLASH_Trsv (FLA_Uplo uplo, FLA_Trans transa, FLA_Diag diag, FLA_Obj A, FLA_Obj x)

Function Documentation

FLASH_Gemv()

FLA_Error FLASH_Gemv	(	FLA_Trans	transa,
		FLA_Obj	alpha,
		FLA_Obj	A,
		FLA_Obj	x,
		FLA_Obj	beta,
		FLA_Obj	y )

{
  FLA_Error r_val;
  FLA_Bool  enable_supermatrix;
  
  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Gemv_check( transa, alpha, A, x, beta, y );
 
  // Find the status of SuperMatrix.
  enable_supermatrix = FLASH_Queue_get_enabled();
 
  // Temporarily disable SuperMatrix.
  FLASH_Queue_disable();
 
  // Execute tasks.
  r_val = FLA_Gemv_internal( transa, alpha, A, x, beta, y, flash_gemv_cntl_fm_rp );
 
  // Restore SuperMatrix to its previous status.
  if ( enable_supermatrix )
     FLASH_Queue_enable();
  
  return r_val;
}

References FLA_Check_error_level(), FLA_Gemv_check(), FLA_Gemv_internal(), flash_gemv_cntl_fm_rp, FLASH_Queue_disable(), FLASH_Queue_enable(), and FLASH_Queue_get_enabled().

FLASH_Trsv()

FLA_Error FLASH_Trsv	(	FLA_Uplo	uplo,
		FLA_Trans	transa,
		FLA_Diag	diag,
		FLA_Obj	A,
		FLA_Obj	x )

{
  FLA_Error r_val;
  FLA_Bool  enable_supermatrix;
 
  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Trsv_check( uplo, trans, diag, A, x );
 
  // Find the status of SuperMatrix.
  enable_supermatrix = FLASH_Queue_get_enabled();
 
  // Temporarily disable SuperMatrix.
  FLASH_Queue_disable();
 
  // Execute tasks.
  r_val = FLA_Trsv_internal( uplo, trans, diag, A, x, flash_trsv_cntl );
 
  // Restore SuperMatrix to its previous status.
  if ( enable_supermatrix )
     FLASH_Queue_enable();
  
  return r_val;
}

References FLA_Check_error_level(), FLA_Trsv_check(), FLA_Trsv_internal(), FLASH_Queue_disable(), FLASH_Queue_enable(), FLASH_Queue_get_enabled(), and flash_trsv_cntl.