FLA_Accum_T_UT.c File Reference

(r)


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)

Function Documentation

FLA_Error FLA_Accum_T_UT ( FLA_Direct  direct,
FLA_Store  storev,
FLA_Obj  A,
FLA_Obj  tau,
FLA_Obj  T 
)

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 }


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