Functions | |
FLA_Error | FLA_QR_UT_create_T (FLA_Obj A, FLA_Obj *T) |
void FLA_F2C() | fla_qr_ut_create_t_f (F_INT *A, F_INT *T, F_INT *IERROR) |
References FLA_Obj_create(), FLA_Obj_datatype(), FLA_Obj_width(), and FLA_Query_blocksize().
Referenced by fla_qr_ut_create_t_f().
00036 { 00037 FLA_Datatype datatype; 00038 dim_t b, n; 00039 00040 // Query the datatype of A. 00041 datatype = FLA_Obj_datatype( A ); 00042 00043 // Query the blocksize from the library. 00044 b = FLA_Query_blocksize( datatype, FLA_DIMENSION_MIN ); 00045 00046 // Query the width of A. 00047 n = FLA_Obj_width( A ); 00048 00049 // Create a b x n matrix to hold the block Householder transforms that will be 00050 // accumulated within the QR factorization algorithm. 00051 FLA_Obj_create( datatype, b, n, T ); 00052 00053 return FLA_SUCCESS; 00054 }
void FLA_F2C() fla_qr_ut_create_t_f | ( | F_INT * | A, | |
F_INT * | T, | |||
F_INT * | IERROR | |||
) |
References FLA_QR_UT_create_T().
00058 { 00059 *IERROR = FLA_QR_UT_create_T( *( ( FLA_Obj * ) A ), 00060 ( ( FLA_Obj * ) T ) ); 00061 }