libflame  revision_anchor
Functions
bl1_free_saved_contigm.c File Reference

(r)

Functions

void bl1_sfree_saved_contigm (int m, int n, float *a_save, int a_rs_save, int a_cs_save, float **a, int *a_rs, int *a_cs)
 
void bl1_dfree_saved_contigm (int m, int n, double *a_save, int a_rs_save, int a_cs_save, double **a, int *a_rs, int *a_cs)
 
void bl1_cfree_saved_contigm (int m, int n, scomplex *a_save, int a_rs_save, int a_cs_save, scomplex **a, int *a_rs, int *a_cs)
 
void bl1_zfree_saved_contigm (int m, int n, dcomplex *a_save, int a_rs_save, int a_cs_save, dcomplex **a, int *a_rs, int *a_cs)
 

Function Documentation

◆ bl1_cfree_saved_contigm()

void bl1_cfree_saved_contigm ( int  m,
int  n,
scomplex a_save,
int  a_rs_save,
int  a_cs_save,
scomplex **  a,
int *  a_rs,
int *  a_cs 
)
60 {
61  if ( bl1_is_gen_storage( a_rs_save, a_cs_save ) )
62  {
63  // Copy the contents of the temporary matrix back to the original.
65  m,
66  n,
67  *a, *a_rs, *a_cs,
68  a_save, a_rs_save, a_cs_save );
69 
70  // Free the temporary contiguous storage for the matrix.
71  bl1_cfree( *a );
72 
73  // Restore the original matrix address.
74  *a = a_save;
75 
76  // Restore the original row and column strides.
77  *a_rs = a_rs_save;
78  *a_cs = a_cs_save;
79  }
80 }
void bl1_ccopymt(trans1_t trans, int m, int n, scomplex *a, int a_rs, int a_cs, scomplex *b, int b_rs, int b_cs)
Definition: bl1_copymt.c:215
int bl1_is_gen_storage(int rs, int cs)
Definition: bl1_is.c:100
void bl1_cfree(scomplex *p)
Definition: bl1_free.c:40
@ BLIS1_NO_TRANSPOSE
Definition: blis_type_defs.h:54

References bl1_ccopymt(), bl1_cfree(), bl1_is_gen_storage(), and BLIS1_NO_TRANSPOSE.

Referenced by bl1_cgemm(), bl1_cger(), bl1_chemm(), bl1_cher(), bl1_cher2(), bl1_csymm(), bl1_csyr(), bl1_csyr2(), bl1_ctrmm(), bl1_ctrmmsx(), bl1_ctrsm(), and bl1_ctrsmsx().

◆ bl1_dfree_saved_contigm()

void bl1_dfree_saved_contigm ( int  m,
int  n,
double *  a_save,
int  a_rs_save,
int  a_cs_save,
double **  a,
int *  a_rs,
int *  a_cs 
)
37 {
38  if ( bl1_is_gen_storage( a_rs_save, a_cs_save ) )
39  {
40  // Copy the contents of the temporary matrix back to the original.
42  m,
43  n,
44  *a, *a_rs, *a_cs,
45  a_save, a_rs_save, a_cs_save );
46 
47  // Free the temporary contiguous storage for the matrix.
48  bl1_dfree( *a );
49 
50  // Restore the original matrix address.
51  *a = a_save;
52 
53  // Restore the original row and column strides.
54  *a_rs = a_rs_save;
55  *a_cs = a_cs_save;
56  }
57 }
void bl1_dcopymt(trans1_t trans, int m, int n, double *a, int a_rs, int a_cs, double *b, int b_rs, int b_cs)
Definition: bl1_copymt.c:148
void bl1_dfree(double *p)
Definition: bl1_free.c:35

References bl1_dcopymt(), bl1_dfree(), bl1_is_gen_storage(), and BLIS1_NO_TRANSPOSE.

Referenced by bl1_dgemm(), bl1_dger(), bl1_dsymm(), bl1_dsyr(), bl1_dsyr2(), bl1_dtrmm(), bl1_dtrmmsx(), bl1_dtrsm(), and bl1_dtrsmsx().

◆ bl1_sfree_saved_contigm()

void bl1_sfree_saved_contigm ( int  m,
int  n,
float *  a_save,
int  a_rs_save,
int  a_cs_save,
float **  a,
int *  a_rs,
int *  a_cs 
)
14 {
15  if ( bl1_is_gen_storage( a_rs_save, a_cs_save ) )
16  {
17  // Copy the contents of the temporary matrix back to the original.
19  m,
20  n,
21  *a, *a_rs, *a_cs,
22  a_save, a_rs_save, a_cs_save );
23 
24  // Free the temporary contiguous storage for the matrix.
25  bl1_sfree( *a );
26 
27  // Restore the original matrix address.
28  *a = a_save;
29 
30  // Restore the original row and column strides.
31  *a_rs = a_rs_save;
32  *a_cs = a_cs_save;
33  }
34 }
void bl1_scopymt(trans1_t trans, int m, int n, float *a, int a_rs, int a_cs, float *b, int b_rs, int b_cs)
Definition: bl1_copymt.c:81
void bl1_sfree(float *p)
Definition: bl1_free.c:30

References bl1_is_gen_storage(), bl1_scopymt(), bl1_sfree(), and BLIS1_NO_TRANSPOSE.

Referenced by bl1_sgemm(), bl1_sger(), bl1_ssymm(), bl1_ssyr(), bl1_ssyr2(), bl1_strmm(), bl1_strmmsx(), bl1_strsm(), and bl1_strsmsx().

◆ bl1_zfree_saved_contigm()

void bl1_zfree_saved_contigm ( int  m,
int  n,
dcomplex a_save,
int  a_rs_save,
int  a_cs_save,
dcomplex **  a,
int *  a_rs,
int *  a_cs 
)
83 {
84  if ( bl1_is_gen_storage( a_rs_save, a_cs_save ) )
85  {
86  // Copy the contents of the temporary matrix back to the original.
88  m,
89  n,
90  *a, *a_rs, *a_cs,
91  a_save, a_rs_save, a_cs_save );
92 
93  // Free the temporary contiguous storage for the matrix.
94  bl1_zfree( *a );
95 
96  // Restore the original matrix address.
97  *a = a_save;
98 
99  // Restore the original row and column strides.
100  *a_rs = a_rs_save;
101  *a_cs = a_cs_save;
102  }
103 }
void bl1_zcopymt(trans1_t trans, int m, int n, dcomplex *a, int a_rs, int a_cs, dcomplex *b, int b_rs, int b_cs)
Definition: bl1_copymt.c:286
void bl1_zfree(dcomplex *p)
Definition: bl1_free.c:45

References bl1_is_gen_storage(), bl1_zcopymt(), bl1_zfree(), and BLIS1_NO_TRANSPOSE.

Referenced by bl1_zgemm(), bl1_zger(), bl1_zhemm(), bl1_zher(), bl1_zher2(), bl1_zsymm(), bl1_zsyr(), bl1_zsyr2(), bl1_ztrmm(), bl1_ztrmmsx(), bl1_ztrsm(), and bl1_ztrsmsx().