Functions | |
FLA_Error | FLA_Repart_2x1_to_3x1_check (FLA_Obj AT, FLA_Obj *A0, FLA_Obj *A1, FLA_Obj AB, FLA_Obj *A2, dim_t mb, FLA_Side side) |
FLA_Error FLA_Repart_2x1_to_3x1_check | ( | FLA_Obj | AT, | |
FLA_Obj * | A0, | |||
FLA_Obj * | A1, | |||
FLA_Obj | AB, | |||
FLA_Obj * | A2, | |||
dim_t | mb, | |||
FLA_Side | side | |||
) |
References FLA_Check_attempted_repart_2x1(), FLA_Check_null_pointer(), FLA_Check_valid_object_datatype(), and FLA_Check_valid_side().
Referenced by FLA_Repart_2x1_to_3x1().
00039 { 00040 FLA_Error e_val; 00041 00042 e_val = FLA_Check_valid_object_datatype( AT ); 00043 FLA_Check_error_code( e_val ); 00044 00045 e_val = FLA_Check_valid_object_datatype( AB ); 00046 FLA_Check_error_code( e_val ); 00047 00048 e_val = FLA_Check_null_pointer( A0 ); 00049 FLA_Check_error_code( e_val ); 00050 00051 e_val = FLA_Check_null_pointer( A1 ); 00052 FLA_Check_error_code( e_val ); 00053 00054 e_val = FLA_Check_null_pointer( A2 ); 00055 FLA_Check_error_code( e_val ); 00056 00057 e_val = FLA_Check_valid_side( side ); 00058 FLA_Check_error_code( e_val ); 00059 00060 if ( side == FLA_TOP ) 00061 { 00062 e_val = FLA_Check_attempted_repart_2x1( AT, mb ); 00063 FLA_Check_error_code( e_val ); 00064 } 00065 else if ( side == FLA_BOTTOM ) 00066 { 00067 e_val = FLA_Check_attempted_repart_2x1( AB, mb ); 00068 FLA_Check_error_code( e_val ); 00069 } 00070 00071 // Needed: check for adjacency, similar to those in FLA_Merge_*(). 00072 00073 return FLA_SUCCESS; 00074 }