FLA_Scal.c File Reference

(r12600)

Functions
FLA_Error	FLA_Scal (FLA_Obj alpha, FLA_Obj A)
Variables
fla_scal_t *	fla_scal_cntl_blas

---

Function Documentation

FLA_Error FLA_Scal	(	FLA_Obj	alpha,
		FLA_Obj	A
	)

References FLA_Check_error_level(), FLA_Scal_check(), FLA_Scal_external(), and FLA_Scal_internal().

Referenced by FLA_Bidiag_UT_u_step_unb_var2(), FLA_Bidiag_UT_u_step_unb_var3(), FLA_Bidiag_UT_u_step_unb_var4(), FLA_Bidiag_UT_u_step_unb_var5(), FLA_Fill_with_geometric_dist(), FLA_Fill_with_random_dist(), FLA_Hess_UT_step_unb_var2(), FLA_Hess_UT_step_unb_var3(), FLA_Hess_UT_step_unb_var4(), FLA_Lyap_h_unb_var1(), FLA_Lyap_h_unb_var2(), FLA_Lyap_h_unb_var3(), FLA_Lyap_h_unb_var4(), FLA_Lyap_n_unb_var1(), FLA_Lyap_n_unb_var2(), FLA_Lyap_n_unb_var3(), FLA_Lyap_n_unb_var4(), FLA_Negate(), FLA_Svd_ext_u_unb_var1(), FLA_Svd_uv_unb_var1(), FLA_Svd_uv_unb_var2(), FLA_Tridiag_UT_l_step_unb_var1(), FLA_Tridiag_UT_l_step_unb_var2(), and FLA_Tridiag_UT_l_step_unb_var3().

{
  FLA_Error r_val;

#ifdef FLA_ENABLE_BLAS1_FRONT_END_CNTL_TREES
  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Scal_check( alpha, A );

  // Invoke FLA_Scal_internal() with flat control tree that simply calls
  // external wrapper.
  r_val = FLA_Scal_internal( alpha, A, fla_scal_cntl_blas );

#else
  r_val = FLA_Scal_external( alpha, A );
#endif

  return r_val;
}

---

Variable Documentation

fla_scal_t* fla_scal_cntl_blas