FLA_Scalr.c File Reference

(r)

Functions
FLA_Error	FLA_Scalr (FLA_Uplo uplo, FLA_Obj alpha, FLA_Obj A)

Variables
fla_scalr_t *	fla_scalr_cntl_blas

Function Documentation

FLA_Scalr()

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

{
  FLA_Error r_val;
 
#ifdef FLA_ENABLE_BLAS1_FRONT_END_CNTL_TREES
  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Scalr_check( alpha, A );
 
  // Invoke FLA_Scalr_internal() with flat control tree that simply calls
  // external wrapper.
  r_val = FLA_Scalr_internal( uplo, alpha, A, fla_scalr_cntl_blas );
 
#else
  r_val = FLA_Scalr_external( uplo, alpha, A );
#endif
 
  return r_val;
}

References FLA_Check_error_level(), FLA_Scalr_check(), fla_scalr_cntl_blas, FLA_Scalr_external(), and FLA_Scalr_internal().

Referenced by FLA_Hevd_lv_unb_var1(), and FLA_Hevd_lv_unb_var2().

Variable Documentation

fla_scalr_cntl_blas

fla_scalr_t* fla_scalr_cntl_blas

extern

Referenced by FLA_Scalr(), FLA_Scalr_cntl_finalize(), and FLA_Scalr_cntl_init().