libflame  revision_anchor
Functions
bl1_create_contigmsr.c File Reference

(r)

Functions

void bl1_screate_contigmsr (side1_t side, uplo1_t uplo, 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_dcreate_contigmsr (side1_t side, uplo1_t uplo, 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_ccreate_contigmsr (side1_t side, uplo1_t uplo, 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_zcreate_contigmsr (side1_t side, uplo1_t uplo, 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_ccreate_contigmsr()

void bl1_ccreate_contigmsr ( side1_t  side,
uplo1_t  uplo,
int  m,
int  n,
scomplex a_save,
int  a_rs_save,
int  a_cs_save,
scomplex **  a,
int *  a_rs,
int *  a_cs 
)

References bl1_ccreate_contigmr(), and bl1_is_left().

46 {
47  int dim_a;
48 
49  // Choose the dimension of the matrix based on the side parameter.
50  if ( bl1_is_left( side ) ) dim_a = m;
51  else dim_a = n;
52 
53  // Call the simple version with chosen dimensions.
55  dim_a,
56  dim_a,
57  a_save, a_rs_save, a_cs_save,
58  a, a_rs, a_cs );
59 }
int bl1_is_left(side1_t side)
Definition: bl1_is.c:61
void bl1_ccreate_contigmr(uplo1_t uplo, int m, int n, scomplex *a_save, int a_rs_save, int a_cs_save, scomplex **a, int *a_rs, int *a_cs)
Definition: bl1_create_contigmr.c:77

◆ bl1_dcreate_contigmsr()

void bl1_dcreate_contigmsr ( side1_t  side,
uplo1_t  uplo,
int  m,
int  n,
double *  a_save,
int  a_rs_save,
int  a_cs_save,
double **  a,
int *  a_rs,
int *  a_cs 
)

References bl1_dcreate_contigmr(), and bl1_is_left().

30 {
31  int dim_a;
32 
33  // Choose the dimension of the matrix based on the side parameter.
34  if ( bl1_is_left( side ) ) dim_a = m;
35  else dim_a = n;
36 
37  // Call the simple version with chosen dimensions.
39  dim_a,
40  dim_a,
41  a_save, a_rs_save, a_cs_save,
42  a, a_rs, a_cs );
43 }
int bl1_is_left(side1_t side)
Definition: bl1_is.c:61
void bl1_dcreate_contigmr(uplo1_t uplo, int m, int n, double *a_save, int a_rs_save, int a_cs_save, double **a, int *a_rs, int *a_cs)
Definition: bl1_create_contigmr.c:45

◆ bl1_screate_contigmsr()

void bl1_screate_contigmsr ( side1_t  side,
uplo1_t  uplo,
int  m,
int  n,
float *  a_save,
int  a_rs_save,
int  a_cs_save,
float **  a,
int *  a_rs,
int *  a_cs 
)

References bl1_is_left(), and bl1_screate_contigmr().

14 {
15  int dim_a;
16 
17  // Choose the dimension of the matrix based on the side parameter.
18  if ( bl1_is_left( side ) ) dim_a = m;
19  else dim_a = n;
20 
21  // Call the simple version with chosen dimensions.
23  dim_a,
24  dim_a,
25  a_save, a_rs_save, a_cs_save,
26  a, a_rs, a_cs );
27 }
int bl1_is_left(side1_t side)
Definition: bl1_is.c:61
void bl1_screate_contigmr(uplo1_t uplo, int m, int n, float *a_save, int a_rs_save, int a_cs_save, float **a, int *a_rs, int *a_cs)
Definition: bl1_create_contigmr.c:13

◆ bl1_zcreate_contigmsr()

void bl1_zcreate_contigmsr ( side1_t  side,
uplo1_t  uplo,
int  m,
int  n,
dcomplex a_save,
int  a_rs_save,
int  a_cs_save,
dcomplex **  a,
int *  a_rs,
int *  a_cs 
)

References bl1_is_left(), and bl1_zcreate_contigmr().

62 {
63  int dim_a;
64 
65  // Choose the dimension of the matrix based on the side parameter.
66  if ( bl1_is_left( side ) ) dim_a = m;
67  else dim_a = n;
68 
69  // Call the simple version with chosen dimensions.
71  dim_a,
72  dim_a,
73  a_save, a_rs_save, a_cs_save,
74  a, a_rs, a_cs );
75 }
void bl1_zcreate_contigmr(uplo1_t uplo, int m, int n, dcomplex *a_save, int a_rs_save, int a_cs_save, dcomplex **a, int *a_rs, int *a_cs)
Definition: bl1_create_contigmr.c:109
int bl1_is_left(side1_t side)
Definition: bl1_is.c:61