libflame  revision_anchor
Functions
FLA_Repart_1x2_to_1x3_check.c File Reference

(r)

Functions

FLA_Error FLA_Repart_1x2_to_1x3_check (FLA_Obj AL, FLA_Obj AR, FLA_Obj *A0, FLA_Obj *A1, FLA_Obj *A2, dim_t nb, FLA_Side side)
 

Function Documentation

◆ FLA_Repart_1x2_to_1x3_check()

FLA_Error FLA_Repart_1x2_to_1x3_check ( FLA_Obj  AL,
FLA_Obj  AR,
FLA_Obj A0,
FLA_Obj A1,
FLA_Obj A2,
dim_t  nb,
FLA_Side  side 
)

References FLA_Check_attempted_repart_1x2(), FLA_Check_null_pointer(), FLA_Check_valid_leftright_side(), and FLA_Check_valid_object_datatype().

Referenced by FLA_Repart_1x2_to_1x3().

16 {
17  FLA_Error e_val;
18 
19  e_val = FLA_Check_valid_object_datatype( AL );
20  FLA_Check_error_code( e_val );
21 
22  e_val = FLA_Check_valid_object_datatype( AR );
23  FLA_Check_error_code( e_val );
24 
25  e_val = FLA_Check_null_pointer( A0 );
26  FLA_Check_error_code( e_val );
27 
28  e_val = FLA_Check_null_pointer( A1 );
29  FLA_Check_error_code( e_val );
30 
31  e_val = FLA_Check_null_pointer( A2 );
32  FLA_Check_error_code( e_val );
33 
34  e_val = FLA_Check_valid_leftright_side( side );
35  FLA_Check_error_code( e_val );
36 
37  if ( side == FLA_LEFT )
38  {
39  e_val = FLA_Check_attempted_repart_1x2( AL, nb );
40  FLA_Check_error_code( e_val );
41  }
42  else if ( side == FLA_RIGHT )
43  {
44  e_val = FLA_Check_attempted_repart_1x2( AR, nb );
45  FLA_Check_error_code( e_val );
46  }
47 
48  // Needed: check for adjacency, similar to those in FLA_Merge_*().
49 
50  return FLA_SUCCESS;
51 }
FLA_Error FLA_Check_attempted_repart_1x2(FLA_Obj A_side, dim_t b_n)
Definition: FLA_Check.c:1114
int FLA_Error
Definition: FLA_type_defs.h:47
FLA_Error FLA_Check_valid_object_datatype(FLA_Obj A)
Definition: FLA_Check.c:171
FLA_Error FLA_Check_valid_leftright_side(FLA_Side side)
Definition: FLA_Check.c:1124
FLA_Error FLA_Check_null_pointer(void *ptr)
Definition: FLA_Check.c:518