FLA_Apply_Q_UT_inc_internal.c File Reference

(r)


Functions

FLA_Error FLA_Apply_Q_UT_inc_internal (FLA_Side side, FLA_Trans trans, FLA_Store storev, FLA_Obj A, FLA_Obj TW, FLA_Obj W1, FLA_Obj B, fla_apqutinc_t *cntl)

Function Documentation

FLA_Error FLA_Apply_Q_UT_inc_internal ( FLA_Side  side,
FLA_Trans  trans,
FLA_Store  storev,
FLA_Obj  A,
FLA_Obj  TW,
FLA_Obj  W1,
FLA_Obj  B,
fla_apqutinc_t cntl 
)

References FLA_Apply_Q_UT_inc_internal_check(), FLA_Apply_Q_UT_inc_lhc(), and FLA_Check_error_level().

Referenced by FLASH_Apply_Q_UT_inc().

00038 {
00039     FLA_Error r_val = FLA_SUCCESS;
00040 
00041     if ( FLA_Check_error_level() == FLA_FULL_ERROR_CHECKING )
00042         FLA_Apply_Q_UT_inc_internal_check( side, trans, storev, A, TW, W1, B, cntl );
00043 
00044     if      ( side == FLA_LEFT )
00045     {
00046         if      ( trans == FLA_NO_TRANSPOSE )
00047         {
00048             if      ( storev == FLA_COLUMNWISE )
00049                 FLA_Check_error_code( FLA_NOT_YET_IMPLEMENTED );
00050             else if ( storev == FLA_ROWWISE )
00051                 FLA_Check_error_code( FLA_NOT_YET_IMPLEMENTED );
00052         }
00053         else if ( trans == FLA_TRANSPOSE || trans == FLA_CONJ_TRANSPOSE )
00054         {
00055             if      ( storev == FLA_COLUMNWISE )
00056                 r_val = FLA_Apply_Q_UT_inc_lhc( A, TW, W1, B, cntl );
00057             else if ( storev == FLA_ROWWISE )
00058                 FLA_Check_error_code( FLA_NOT_YET_IMPLEMENTED );
00059         }
00060     }
00061     else if ( side == FLA_RIGHT )
00062     {
00063         if      ( trans == FLA_NO_TRANSPOSE )
00064         {
00065             if      ( storev == FLA_COLUMNWISE )
00066                 FLA_Check_error_code( FLA_NOT_YET_IMPLEMENTED );
00067             else if ( storev == FLA_ROWWISE )
00068                 FLA_Check_error_code( FLA_NOT_YET_IMPLEMENTED );
00069         }
00070         else if ( trans == FLA_TRANSPOSE || trans == FLA_CONJ_TRANSPOSE )
00071         {
00072             if      ( storev == FLA_COLUMNWISE )
00073                 FLA_Check_error_code( FLA_NOT_YET_IMPLEMENTED );
00074             else if ( storev == FLA_ROWWISE )
00075                 FLA_Check_error_code( FLA_NOT_YET_IMPLEMENTED );
00076         }
00077     }
00078 
00079     return r_val;
00080 }


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