Functions | |
FLA_Error | FLASH_LU_nopiv (FLA_Obj A) |
void FLA_F2C() | flash_lu_nopiv_f (F_INT *A, F_INT *IERROR) |
Variables | |
fla_lu_t * | flash_lu_nopiv_cntl |
References FLA_Check_error_level(), FLA_LU_nopiv_check(), FLA_LU_nopiv_internal(), FLASH_Queue_begin(), and FLASH_Queue_end().
Referenced by flash_lu_nopiv_f().
00038 { 00039 FLA_Error r_val; 00040 00041 // Check parameters. 00042 if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING ) 00043 FLA_LU_nopiv_check( A ); 00044 00045 // Begin a parallel region. 00046 FLASH_Queue_begin(); 00047 00048 // Enqueue tasks via a SuperMatrix-aware control tree. 00049 r_val = FLA_LU_nopiv_internal( A, flash_lu_nopiv_cntl ); 00050 00051 // End the parallel region. 00052 FLASH_Queue_end(); 00053 00054 return r_val; 00055 }
void FLA_F2C() flash_lu_nopiv_f | ( | F_INT * | A, | |
F_INT * | IERROR | |||
) |
References FLASH_LU_nopiv().
00059 { 00060 *IERROR = FLASH_LU_nopiv( *( ( FLA_Obj * ) A ) ); 00061 }