Functions | |
FLA_Error | FLASH_Sylv (FLA_Trans transa, FLA_Trans transb, FLA_Obj isgn, FLA_Obj A, FLA_Obj B, FLA_Obj C, FLA_Obj scale) |
void FLA_F2C() | flash_sylv_f (F_INT *transa, F_INT *transb, F_INT *isgn, F_INT *A, F_INT *B, F_INT *C, F_INT *scale, F_INT *IERROR) |
Variables | |
fla_sylv_t * | flash_sylv_cntl |
FLA_Error FLASH_Sylv | ( | FLA_Trans | transa, | |
FLA_Trans | transb, | |||
FLA_Obj | isgn, | |||
FLA_Obj | A, | |||
FLA_Obj | B, | |||
FLA_Obj | C, | |||
FLA_Obj | scale | |||
) |
References FLA_Check_error_level(), FLA_Sylv_check(), FLA_Sylv_internal(), FLASH_Queue_begin(), and FLASH_Queue_end().
Referenced by flash_sylv_f().
00038 { 00039 FLA_Error r_val; 00040 00041 // Check parameters. 00042 if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING ) 00043 FLA_Sylv_check( transa, transb, isgn, A, B, C, scale ); 00044 00045 // Begin a parallel region. 00046 FLASH_Queue_begin(); 00047 00048 // Enqueue tasks via a SuperMatrix-aware control tree. 00049 r_val = FLA_Sylv_internal( transa, transb, isgn, A, B, C, scale, flash_sylv_cntl ); 00050 00051 // End the parallel region. 00052 FLASH_Queue_end(); 00053 00054 return r_val; 00055 }
void FLA_F2C() flash_sylv_f | ( | F_INT * | transa, | |
F_INT * | transb, | |||
F_INT * | isgn, | |||
F_INT * | A, | |||
F_INT * | B, | |||
F_INT * | C, | |||
F_INT * | scale, | |||
F_INT * | IERROR | |||
) |
References FLASH_Sylv().
00059 { 00060 *IERROR = FLASH_Sylv( *( ( FLA_Trans * ) transa ), 00061 *( ( FLA_Trans * ) transb ), 00062 *( ( FLA_Obj * ) isgn ), 00063 *( ( FLA_Obj * ) A ), 00064 *( ( FLA_Obj * ) B ), 00065 *( ( FLA_Obj * ) C ), 00066 *( ( FLA_Obj * ) scale ) ); 00067 }