FLASH_blas1_prototypes.h File Reference

(r12600)

Go to the source code of this file.

Functions
FLA_Error	FLASH_Axpy (FLA_Obj alpha, FLA_Obj A, FLA_Obj B)
FLA_Error	FLASH_Axpyt (FLA_Trans trans, FLA_Obj alpha, FLA_Obj A, FLA_Obj B)
FLA_Error	FLASH_Copy (FLA_Obj A, FLA_Obj B)
FLA_Error	FLASH_Copyt (FLA_Trans trans, FLA_Obj A, FLA_Obj B)
FLA_Error	FLASH_Scal (FLA_Obj alpha, FLA_Obj A)
FLA_Error	FLASH_Scalr (FLA_Uplo uplo, FLA_Obj alpha, FLA_Obj A)

---

Function Documentation

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

References FLA_Axpy_check(), FLA_Axpy_internal(), FLA_Check_error_level(), FLASH_Queue_disable(), FLASH_Queue_enable(), and FLASH_Queue_get_enabled().

{
  FLA_Error r_val;
  FLA_Bool  enable_supermatrix;
  
  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Axpy_check( alpha, A, B );

  // Find the status of SuperMatrix.
  enable_supermatrix = FLASH_Queue_get_enabled();

  // Temporarily disable SuperMatrix.
  FLASH_Queue_disable();

  // Execute tasks.
  r_val = FLA_Axpy_internal( alpha, A, B, flash_axpy_cntl );

  // Restore SuperMatrix to its previous status.
  if ( enable_supermatrix )
     FLASH_Queue_enable();
  
  return r_val;
}

FLA_Error FLASH_Axpyt	(	FLA_Trans	trans,
		FLA_Obj	alpha,
		FLA_Obj	A,
		FLA_Obj	B
	)

References FLA_Axpyt_check(), FLA_Axpyt_internal(), FLA_Check_error_level(), FLASH_Queue_disable(), FLASH_Queue_enable(), and FLASH_Queue_get_enabled().

{
  FLA_Error r_val;
  FLA_Bool  enable_supermatrix;
  
  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Axpyt_check( trans, alpha, A, B );

  // Find the status of SuperMatrix.
  enable_supermatrix = FLASH_Queue_get_enabled();

  // Temporarily disable SuperMatrix.
  FLASH_Queue_disable();

  // Execute tasks.
  r_val = FLA_Axpyt_internal( trans, alpha, A, B, flash_axpyt_cntl );

  // Restore SuperMatrix to its previous status.
  if ( enable_supermatrix )
     FLASH_Queue_enable();
  
  return r_val;
}

FLA_Error FLASH_Copy	(	FLA_Obj	A,
		FLA_Obj	B
	)

References FLA_Check_error_level(), FLA_Copy_check(), FLA_Copy_internal(), FLASH_Queue_begin(), and FLASH_Queue_end().

Referenced by FLASH_CAQR_UT_inc_solve(), FLASH_Chol_solve(), FLASH_LQ_UT_solve(), FLASH_LU_incpiv_solve(), FLASH_LU_nopiv_solve(), FLASH_LU_piv_solve(), FLASH_Obj_create_copy_of(), FLASH_QR_UT_inc_solve(), FLASH_QR_UT_solve(), and FLASH_UDdate_UT_inc_solve().

{
  FLA_Error r_val;

  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Copy_check( A, B );

  // Begin a parallel region.
  FLASH_Queue_begin();

  // Execute tasks.
  r_val = FLA_Copy_internal( A, B, flash_copy_cntl );

  // End the parallel region.
  FLASH_Queue_end();

  return r_val;
}

FLA_Error FLASH_Copyt	(	FLA_Trans	trans,
		FLA_Obj	A,
		FLA_Obj	B
	)

References FLA_Check_error_level(), FLA_Copyt_check(), FLA_Copyt_internal(), FLASH_Queue_disable(), FLASH_Queue_enable(), and FLASH_Queue_get_enabled().

{
  FLA_Error r_val;
  FLA_Bool  enable_supermatrix;
  
  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Copyt_check( trans, A, B );

  // Find the status of SuperMatrix.
  enable_supermatrix = FLASH_Queue_get_enabled();

  // Temporarily disable SuperMatrix.
  FLASH_Queue_disable();

  // Execute tasks.
  r_val = FLA_Copyt_internal( trans, A, B, flash_copyt_cntl );

  // Restore SuperMatrix to its previous status.
  if ( enable_supermatrix )
     FLASH_Queue_enable();
  
  return r_val;
}

FLA_Error FLASH_Scal	(	FLA_Obj	alpha,
		FLA_Obj	A
	)

References FLA_Check_error_level(), FLA_Scal_check(), FLA_Scal_internal(), FLASH_Queue_disable(), FLASH_Queue_enable(), and FLASH_Queue_get_enabled().

{
  FLA_Error r_val;
  FLA_Bool  enable_supermatrix;
  
  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Scal_check( alpha, A );

  // Find the status of SuperMatrix.
  enable_supermatrix = FLASH_Queue_get_enabled();

  // Temporarily disable SuperMatrix.
  FLASH_Queue_disable();

  // Execute tasks.
  r_val = FLA_Scal_internal( alpha, A, flash_scal_cntl );

  // Restore SuperMatrix to its previous status.
  if ( enable_supermatrix )
     FLASH_Queue_enable();
  
  return r_val;
}

FLA_Error FLASH_Scalr	(	FLA_Uplo	uplo,
		FLA_Obj	alpha,
		FLA_Obj	A
	)

References FLA_Check_error_level(), FLA_Scalr_check(), FLA_Scalr_internal(), FLASH_Queue_disable(), FLASH_Queue_enable(), and FLASH_Queue_get_enabled().

{
  FLA_Error r_val;
  FLA_Bool  enable_supermatrix;
  
  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Scalr_check( uplo, alpha, A );

  // Find the status of SuperMatrix.
  enable_supermatrix = FLASH_Queue_get_enabled();

  // Temporarily disable SuperMatrix.
  FLASH_Queue_disable();

  // Execute tasks.
  r_val = FLA_Scalr_internal( uplo, alpha, A, flash_scalr_cntl );

  // Restore SuperMatrix to its previous status.
  if ( enable_supermatrix )
     FLASH_Queue_enable();
  
  return r_val;
}