Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
AGULLO Emmanuel
Chameleon
Commits
06546b16
Commit
06546b16
authored
Jan 22, 2018
by
Mathieu Faverge
Browse files
Use uplo when possible
parent
3ef551c6
Changes
27
Hide whitespace changes
Inline
Side-by-side
compute/zbuild.c
View file @
06546b16
...
...
@@ -135,7 +135,7 @@ int MORSE_zbuild( MORSE_enum uplo, int M, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zheevd.c
View file @
06546b16
...
...
@@ -153,7 +153,7 @@ int MORSE_zheevd(MORSE_enum jobz, MORSE_enum uplo, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -161,7 +161,7 @@ int MORSE_zheevd(MORSE_enum jobz, MORSE_enum uplo, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zhemm.c
View file @
06546b16
...
...
@@ -176,11 +176,11 @@ int MORSE_zhemm(MORSE_enum side, MORSE_enum uplo, int M, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
Am
,
Am
,
Am
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
uplo
,
B
,
NB
,
NB
,
LDB
,
N
,
M
,
N
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
uplo
,
C
,
NB
,
NB
,
LDC
,
N
,
M
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -188,7 +188,7 @@ int MORSE_zhemm(MORSE_enum side, MORSE_enum uplo, int M, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zher2k.c
View file @
06546b16
...
...
@@ -181,11 +181,11 @@ int MORSE_zher2k(MORSE_enum uplo, MORSE_enum trans, int N, int K,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
An
,
Am
,
An
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
uplo
,
B
,
NB
,
NB
,
LDB
,
An
,
Am
,
An
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
uplo
,
C
,
NB
,
NB
,
LDC
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -193,7 +193,7 @@ int MORSE_zher2k(MORSE_enum uplo, MORSE_enum trans, int N, int K,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zherk.c
View file @
06546b16
...
...
@@ -166,9 +166,9 @@ int MORSE_zherk(MORSE_enum uplo, MORSE_enum trans, int N, int K,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
An
,
Am
,
An
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
uplo
,
C
,
NB
,
NB
,
LDC
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -176,7 +176,7 @@ int MORSE_zherk(MORSE_enum uplo, MORSE_enum trans, int N, int K,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zhetrd.c
View file @
06546b16
...
...
@@ -167,7 +167,7 @@ int MORSE_zhetrd(MORSE_enum jobz, MORSE_enum uplo, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -175,7 +175,7 @@ int MORSE_zhetrd(MORSE_enum jobz, MORSE_enum uplo, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zlacpy.c
View file @
06546b16
...
...
@@ -132,9 +132,9 @@ int MORSE_zlacpy(MORSE_enum uplo, int M, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
M
,
N
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
uplo
,
B
,
NB
,
NB
,
LDB
,
N
,
M
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -142,7 +142,7 @@ int MORSE_zlacpy(MORSE_enum uplo, int M, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zlanhe.c
View file @
06546b16
...
...
@@ -135,7 +135,7 @@ double MORSE_zlanhe(MORSE_enum norm, MORSE_enum uplo, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -143,7 +143,7 @@ double MORSE_zlanhe(MORSE_enum norm, MORSE_enum uplo, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zlansy.c
View file @
06546b16
...
...
@@ -135,7 +135,7 @@ double MORSE_zlansy(MORSE_enum norm, MORSE_enum uplo, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
compute/zlantr.c
View file @
06546b16
...
...
@@ -155,7 +155,7 @@ double MORSE_zlantr(MORSE_enum norm, MORSE_enum uplo, MORSE_enum diag,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
M
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
compute/zlascal.c
View file @
06546b16
...
...
@@ -114,7 +114,7 @@ int MORSE_zlascal(MORSE_enum uplo, int M, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
M
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -122,7 +122,7 @@ int MORSE_zlascal(MORSE_enum uplo, int M, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
RUNTIME_sequence_wait
(
morse
,
sequence
);
morse_ztile2lap_cleanup
(
morse
,
&
descAl
,
&
descAt
);
...
...
compute/zlaset.c
View file @
06546b16
...
...
@@ -128,7 +128,7 @@ int MORSE_zlaset(MORSE_enum uplo, int M, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
M
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
compute/zlauum.c
View file @
06546b16
...
...
@@ -122,7 +122,7 @@ int MORSE_zlauum(MORSE_enum uplo, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -130,7 +130,7 @@ int MORSE_zlauum(MORSE_enum uplo, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zposv.c
View file @
06546b16
...
...
@@ -151,9 +151,9 @@ int MORSE_zposv(MORSE_enum uplo, int N, int NRHS,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
N
,
N
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
uplo
,
B
,
NB
,
NB
,
LDB
,
NRHS
,
N
,
NRHS
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -161,9 +161,9 @@ int MORSE_zposv(MORSE_enum uplo, int N, int NRHS,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_ztile2lap
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zpotri.c
View file @
06546b16
...
...
@@ -119,7 +119,7 @@ int MORSE_zpotri(MORSE_enum uplo, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -127,7 +127,7 @@ int MORSE_zpotri(MORSE_enum uplo, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zpotrimm.c
View file @
06546b16
...
...
@@ -131,11 +131,11 @@ int MORSE_zpotrimm(MORSE_enum uplo, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
N
,
N
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
uplo
,
B
,
NB
,
NB
,
LDB
,
N
,
N
,
N
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
uplo
,
C
,
NB
,
NB
,
LDC
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -143,11 +143,11 @@ int MORSE_zpotrimm(MORSE_enum uplo, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_ztile2lap
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_ztile2lap
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zpotrs.c
View file @
06546b16
...
...
@@ -135,9 +135,9 @@ int MORSE_zpotrs(MORSE_enum uplo, int N, int NRHS,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
N
,
N
,
N
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
uplo
,
B
,
NB
,
NB
,
LDB
,
NRHS
,
N
,
NRHS
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -145,7 +145,7 @@ int MORSE_zpotrs(MORSE_enum uplo, int N, int NRHS,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zsymm.c
View file @
06546b16
...
...
@@ -176,11 +176,11 @@ int MORSE_zsymm(MORSE_enum side, MORSE_enum uplo, int M, int N,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
Am
,
Am
,
Am
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
uplo
,
B
,
NB
,
NB
,
LDB
,
N
,
M
,
N
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
uplo
,
C
,
NB
,
NB
,
LDC
,
N
,
M
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -188,7 +188,7 @@ int MORSE_zsymm(MORSE_enum side, MORSE_enum uplo, int M, int N,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zsyr2k.c
View file @
06546b16
...
...
@@ -181,11 +181,11 @@ int MORSE_zsyr2k(MORSE_enum uplo, MORSE_enum trans, int N, int K,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
An
,
Am
,
An
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descBl
,
&
descBt
,
uplo
,
B
,
NB
,
NB
,
LDB
,
An
,
Am
,
An
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
uplo
,
C
,
NB
,
NB
,
LDC
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -193,7 +193,7 @@ int MORSE_zsyr2k(MORSE_enum uplo, MORSE_enum trans, int N, int K,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
compute/zsyrk.c
View file @
06546b16
...
...
@@ -166,9 +166,9 @@ int MORSE_zsyrk(MORSE_enum uplo, MORSE_enum trans, int N, int K,
morse_sequence_create
(
morse
,
&
sequence
);
/* Submit the matrix conversion */
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descAl
,
&
descAt
,
uplo
,
A
,
NB
,
NB
,
LDA
,
An
,
Am
,
An
,
sequence
,
&
request
);
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
morse_zlap2tile
(
morse
,
&
descCl
,
&
descCt
,
uplo
,
C
,
NB
,
NB
,
LDC
,
N
,
N
,
N
,
sequence
,
&
request
);
/* Call the tile interface */
...
...
@@ -176,7 +176,7 @@ int MORSE_zsyrk(MORSE_enum uplo, MORSE_enum trans, int N, int K,
/* Submit the matrix conversion back */
morse_ztile2lap
(
morse
,
&
descCl
,
&
descCt
,
MorseUpperLower
,
sequence
,
&
request
);
uplo
,
sequence
,
&
request
);
morse_sequence_wait
(
morse
,
sequence
);
...
...
Prev
1
2
Next
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment