Functions | |
FLA_Error | FLA_LQ_UT_create_T (FLA_Obj A, FLA_Obj *T) |
void FLA_F2C() | fla_lq_ut_create_t_f (F_INT *A, F_INT *T, F_INT *IERROR) |
References FLA_Obj_create(), FLA_Obj_datatype(), FLA_Obj_length(), and FLA_Query_blocksize().
Referenced by fla_lq_ut_create_t_f().
00036 { 00037 FLA_Datatype datatype; 00038 dim_t b, m; 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 length of A. 00047 m = FLA_Obj_length( A ); 00048 00049 // Create an m x b matrix to hold the block Householder transforms that will be 00050 // accumulated within the LQ factorization algorithm. 00051 FLA_Obj_create( datatype, m, b, T ); 00052 00053 return FLA_SUCCESS; 00054 }
void FLA_F2C() fla_lq_ut_create_t_f | ( | F_INT * | A, | |
F_INT * | T, | |||
F_INT * | IERROR | |||
) |
References FLA_LQ_UT_create_T().
00058 { 00059 *IERROR = FLA_LQ_UT_create_T( *( ( FLA_Obj * ) A ), 00060 ( ( FLA_Obj * ) T ) ); 00061 }