FLA_Set_to_identity.c File Reference

(r12600)

Functions
FLA_Error	FLA_Set_to_identity (FLA_Obj A)

---

Function Documentation

FLA_Error FLA_Set_to_identity

(

FLA_Obj

A

)

References FLA_Check_error_level(), FLA_ONE, FLA_Set(), FLA_Set_diag(), FLA_Set_to_identity_check(), and FLA_ZERO.

Referenced by FLA_Form_perm_matrix(), FLA_QR_UT_form_Q(), FLA_Svd_uv_unb_var2(), and FLA_UDdate_UT_unb_var1().

{
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_Set_to_identity_check( A );

  FLA_Set( FLA_ZERO, A );

  FLA_Set_diag( FLA_ONE, A );

  return FLA_SUCCESS;
}