FLA_LU_piv.c File Reference

(r)


Functions

FLA_Error FLA_LU_piv (FLA_Obj A, FLA_Obj p)
void FLA_F2C() fla_lu_piv_f (F_INT *A, F_INT *p, F_INT *IERROR)

Variables

fla_lu_tfla_lu_piv_cntl
fla_lu_tfla_lu_piv_cntl2

Function Documentation

FLA_Error FLA_LU_piv ( FLA_Obj  A,
FLA_Obj  p 
)

References FLA_Check_error_level(), FLA_LU_piv_check(), and FLA_LU_piv_internal().

Referenced by fla_lu_piv_f().

00039 {
00040   FLA_Error r_val;
00041 
00042   // Check parameters.
00043   if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
00044     FLA_LU_piv_check( A, p );
00045 
00046   // Invoke FLA_LU_piv_internal() with large control tree.
00047   r_val = FLA_LU_piv_internal( A, p, fla_lu_piv_cntl2 );
00048 
00049   return r_val;
00050 }

void FLA_F2C() fla_lu_piv_f ( F_INT *  A,
F_INT *  p,
F_INT *  IERROR 
)

References FLA_LU_piv().

00054 {
00055   *IERROR = FLA_LU_piv( *( ( FLA_Obj * ) A ), 
00056                         *( ( FLA_Obj * ) p ) );
00057 }


Variable Documentation


Generated on Mon Jul 6 05:45:56 2009 for libflame by  doxygen 1.5.9