Functions | |
FLA_Error | FLA_Accum_T_UT (FLA_Direct direct, FLA_Store storev, FLA_Obj A, FLA_Obj tau, FLA_Obj T) |
void FLA_F2C() | fla_accum_t_ut_f (F_INT *direct, F_INT *storev, F_INT *A, F_INT *tau, F_INT *T, F_INT *IERROR) |
References FLA_Accum_T_UT_check(), FLA_Accum_T_UT_internal(), and FLA_Check_error_level().
Referenced by fla_accum_t_ut_f().
00036 { 00037 FLA_Error r_val; 00038 00039 // Check parameters. 00040 if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING ) 00041 FLA_Accum_T_UT_check( direct, storev, A, tau, T ); 00042 00043 // Invoke FLA_Accum_T_UT_internal(). 00044 r_val = FLA_Accum_T_UT_internal( direct, storev, A, tau, T ); 00045 00046 return r_val; 00047 }
void FLA_F2C() fla_accum_t_ut_f | ( | F_INT * | direct, | |
F_INT * | storev, | |||
F_INT * | A, | |||
F_INT * | tau, | |||
F_INT * | T, | |||
F_INT * | IERROR | |||
) |
References FLA_Accum_T_UT().
00051 { 00052 *IERROR = FLA_Accum_T_UT( *( ( FLA_Direct * ) direct ), 00053 *( ( FLA_Store * ) storev ), 00054 *( ( FLA_Obj * ) A ), 00055 *( ( FLA_Obj * ) tau ), 00056 *( ( FLA_Obj * ) T ) ) ; 00057 }