Mentions légales du service

Skip to content
Snippets Groups Projects
Commit ecbee0df authored by Mathieu Faverge's avatar Mathieu Faverge
Browse files

Add descriptor declarations

parent 579dc09e
No related branches found
No related tags found
1 merge request!78Cleanup - Lapack to tile
Hide whitespace changes
Inline Side-by-side
Showing
with 38 additions and 38 deletions
compute/zbuild.c
+ 1
− 1
View file @ ecbee0df
......@@ -91,7 +91,7 @@ int MORSE_zbuild( MORSE_enum uplo, int M, int N,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descAl, descAt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgeadd.c
+ 2
− 2
View file @ ecbee0df
......@@ -98,8 +98,8 @@ int MORSE_zgeadd(MORSE_enum trans, int M, int N,
int NB;
int Am, An;
int status;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
......
compute/zgelqf.c
+ 1
− 1
View file @ ecbee0df
......@@ -84,7 +84,7 @@ int MORSE_zgelqf(int M, int N,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descAl, descAt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgelqf_param.c
+ 1
− 1
View file @ ecbee0df
......@@ -81,7 +81,7 @@ int MORSE_zgelqf_param(const libhqr_tree_t *qrtree, int M, int N,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descAl, descAt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgelqs.c
+ 2
− 2
View file @ ecbee0df
......@@ -91,8 +91,8 @@ int MORSE_zgelqs(int M, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgelqs_param.c
+ 2
− 2
View file @ ecbee0df
......@@ -93,8 +93,8 @@ int MORSE_zgelqs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgels.c
+ 2
− 2
View file @ ecbee0df
......@@ -118,8 +118,8 @@ int MORSE_zgels(MORSE_enum trans, int M, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgels_param.c
+ 2
− 2
View file @ ecbee0df
......@@ -120,8 +120,8 @@ int MORSE_zgels_param(const libhqr_tree_t *qrtree, MORSE_enum trans, int M, int
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgemm.c
+ 3
− 3
View file @ ecbee0df
......@@ -138,9 +138,9 @@ int MORSE_zgemm(MORSE_enum transA, MORSE_enum transB, int M, int N, int K,
int NB;
int Am, An, Bm, Bn;
int status;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descC;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
MORSE_desc_t descCl, descCt;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
......
compute/zgeqrf.c
+ 1
− 1
View file @ ecbee0df
......@@ -83,7 +83,7 @@ int MORSE_zgeqrf(int M, int N,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descAl, descAt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgeqrf_param.c
+ 1
− 1
View file @ ecbee0df
......@@ -86,7 +86,7 @@ int MORSE_zgeqrf_param(const libhqr_tree_t *qrtree, int M, int N,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descAl, descAt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgeqrs.c
+ 2
− 2
View file @ ecbee0df
......@@ -91,8 +91,8 @@ int MORSE_zgeqrs(int M, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgeqrs_param.c
+ 2
− 2
View file @ ecbee0df
......@@ -86,8 +86,8 @@ int MORSE_zgeqrs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgesv_incpiv.c
+ 2
− 2
View file @ ecbee0df
......@@ -96,8 +96,8 @@ int MORSE_zgesv_incpiv(int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgesv_nopiv.c
+ 2
− 2
View file @ ecbee0df
......@@ -95,8 +95,8 @@ int MORSE_zgesv_nopiv(int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgesvd.c
+ 6
− 6
View file @ ecbee0df
......@@ -160,7 +160,7 @@ int MORSE_zgesvd(MORSE_enum jobu, MORSE_enum jobvt,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descAl, descAt;
morse = morse_context_self();
if (morse == NULL) {
......@@ -400,11 +400,11 @@ int MORSE_zgesvd_Tile_Async(MORSE_enum jobu, MORSE_enum jobvt,
MORSE_Complex64_t *VT, int LDVT,
MORSE_sequence_t *sequence, MORSE_request_t *request)
{
MORSE_desc_t descA;
MORSE_desc_t descT;
MORSE_desc_t descU;
MORSE_desc_t descVT;
MORSE_desc_t descAB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descTl, descTt;
MORSE_desc_t descUl, descUt;
MORSE_desc_t descVTl, descVTt;
MORSE_desc_t descABl, descABt;
MORSE_desc_t D, *Dptr = NULL;
MORSE_desc_t *subA, *subT, *subUVT;
double *E;
......
compute/zgetrf_incpiv.c
+ 1
− 1
View file @ ecbee0df
......@@ -87,7 +87,7 @@ int MORSE_zgetrf_incpiv(int M, int N,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descAl, descAt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgetrf_nopiv.c
+ 1
− 1
View file @ ecbee0df
......@@ -77,7 +77,7 @@ int MORSE_zgetrf_nopiv(int M, int N,
{
int NB;
int status;
MORSE_desc_t descA ;
MORSE_desc_t descAl, descAt;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
......
compute/zgetrs_incpiv.c
+ 2
− 2
View file @ ecbee0df
......@@ -98,8 +98,8 @@ int MORSE_zgetrs_incpiv(MORSE_enum trans, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
morse = morse_context_self();
if (morse == NULL) {
......
compute/zgetrs_nopiv.c
+ 2
− 2
View file @ ecbee0df
......@@ -92,8 +92,8 @@ int MORSE_zgetrs_nopiv(MORSE_enum trans, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
MORSE_desc_t descA;
MORSE_desc_t descB;
MORSE_desc_t descAl, descAt;
MORSE_desc_t descBl, descBt;
morse = morse_context_self();
if (morse == NULL) {
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment