libflame  revision_anchor
Functions | Variables
FLA_LU_nopiv.c File Reference

(r)

Functions

FLA_Error FLA_LU_nopiv (FLA_Obj A)

Variables

fla_lu_tfla_lu_nopiv_cntl
fla_lu_tfla_lu_nopiv_cntl2

Function Documentation

References FLA_Check_error_level(), FLA_LU_find_zero_on_diagonal(), FLA_LU_nopiv_check(), and FLA_LU_nopiv_internal().

{
  FLA_Error r_val;

  // Check parameters.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    FLA_LU_nopiv_check( A );

  // Invoke FLA_LU_nopiv_internal() with large control tree.
  r_val = FLA_LU_nopiv_internal( A, fla_lu_nopiv_cntl2 );

  // Check for singularity.
  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
    r_val = FLA_LU_find_zero_on_diagonal( A );

  return r_val;
}

Variable Documentation